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