r16769 - in /trunk/dh-make-perl: debian/changelog dh-make-perl

gregoa-guest at users.alioth.debian.org gregoa-guest at users.alioth.debian.org
Fri Mar 7 23:01:39 UTC 2008


Author: gregoa-guest
Date: Fri Mar  7 23:01:37 2008
New Revision: 16769

URL: http://svn.debian.org/wsvn/?sc=1&rev=16769
Log:
add 'eg' to regex for finding examples directories

Modified:
    trunk/dh-make-perl/debian/changelog
    trunk/dh-make-perl/dh-make-perl

Modified: trunk/dh-make-perl/debian/changelog
URL: http://svn.debian.org/wsvn/trunk/dh-make-perl/debian/changelog?rev=16769&op=diff
==============================================================================
--- trunk/dh-make-perl/debian/changelog (original)
+++ trunk/dh-make-perl/debian/changelog Fri Mar  7 23:01:37 2008
@@ -7,7 +7,7 @@
   * Add comment and additional spaces to the created watch files to make the
     pattern easier to read and understand.
   * Fix small error in output of create_copyright().
-  * Automatically find examples/samples/sample directories for
+  * Automatically find examples/eg/samples/sample directories for
     dh_installexamples; otherwise remove empty dh_installexamples line from
     debian/rules.
 

Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/trunk/dh-make-perl/dh-make-perl?rev=16769&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Fri Mar  7 23:01:37 2008
@@ -661,7 +661,7 @@
 	$dir .= '/' unless $dir =~ m(/$);
 	find(sub {
 		push (@examples, substr($File::Find::name, length($dir)) . '/*')
-			if (/^(examples|samples?)$/i && (! $opts{exclude} || ! $File::Find::name =~ /$opts{exclude}/)) ;
+			if (/^(examples|eg|samples?)$/i && (! $opts{exclude} || ! $File::Find::name =~ /$opts{exclude}/)) ;
 	}, $dir);
 }
 




More information about the Pkg-perl-cvs-commits mailing list