r41553 - in /trunk/libcdk-perl/debian: changelog patches/cdkdemo_help.patch patches/series
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Sun Aug 9 14:08:27 UTC 2009
Author: gregoa
Date: Sun Aug 9 14:08:09 2009
New Revision: 41553
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=41553
Log:
New patch cdkdemo_help.patch to change default path for help system in
cdkdemo; thanks to Rafael Laboissiere for the bug report (closes: #519820).
Added:
trunk/libcdk-perl/debian/patches/cdkdemo_help.patch
Modified:
trunk/libcdk-perl/debian/changelog
trunk/libcdk-perl/debian/patches/series
Modified: trunk/libcdk-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcdk-perl/debian/changelog?rev=41553&op=diff
==============================================================================
--- trunk/libcdk-perl/debian/changelog (original)
+++ trunk/libcdk-perl/debian/changelog Sun Aug 9 14:08:09 2009
@@ -7,6 +7,8 @@
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
(source stanza).
* debian/control: Added: ${misc:Depends} to Depends: field.
+ * New patch cdkdemo_help.patch to change default path for help system in
+ cdkdemo; thanks to Rafael Laboissiere for the bug report (closes: #519820).
-- gregor herrmann <gregoa at debian.org> Fri, 06 Jun 2008 14:36:48 +0200
Added: trunk/libcdk-perl/debian/patches/cdkdemo_help.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcdk-perl/debian/patches/cdkdemo_help.patch?rev=41553&op=file
==============================================================================
--- trunk/libcdk-perl/debian/patches/cdkdemo_help.patch (added)
+++ trunk/libcdk-perl/debian/patches/cdkdemo_help.patch Sun Aug 9 14:08:09 2009
@@ -1,0 +1,25 @@
+Author: gregor herrmann <gregoa at debian.org>
+Bug-Debian: #519820
+Description: make default path for help system "dynamic"
+
+--- a/fulldemo/cdkdemo
++++ b/fulldemo/cdkdemo
+@@ -5,6 +5,9 @@
+ # This script demonstrates the Cdk widget set and how you can use them.
+ #
+
++# for dirname()
++use File::Basename;
++
+ #
+ # Use the Cdk module.
+ #
+@@ -946,7 +949,7 @@
+ sub generalHelp
+ {
+ my $choice = 0;
+- my $helpdir = $ENV{'CDKHELPDIR'} || "./help";
++ my $helpdir = $ENV{'CDKHELPDIR'} || dirname($0) . "/help";
+
+ # Define the names of the help files.
+ my @helpFiles = ("general.help",
Modified: trunk/libcdk-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcdk-perl/debian/patches/series?rev=41553&op=diff
==============================================================================
--- trunk/libcdk-perl/debian/patches/series (original)
+++ trunk/libcdk-perl/debian/patches/series Sun Aug 9 14:08:09 2009
@@ -1,2 +1,3 @@
cdk_viewer.patch
makefile.patch
+cdkdemo_help.patch
More information about the Pkg-perl-cvs-commits
mailing list