r77700 - in /trunk/dh-make-perl: debian/changelog lib/DhMakePerl/Command/Packaging.pm

[dmn at users.alioth.debian.org]

Author: dmn
Date: Thu Jul 21 18:58:29 2011
New Revision: 77700

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=77700
Log:
Packaging.pm: extend the examples regular expression to match demo/demos.
Thanks to Kevin Ryde. Closes: #634932

Modified:
    trunk/dh-make-perl/debian/changelog
    trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm

Modified: trunk/dh-make-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/debian/changelog?rev=77700&op=diff
==============================================================================
--- trunk/dh-make-perl/debian/changelog (original)
+++ trunk/dh-make-perl/debian/changelog Thu Jul 21 18:58:29 2011
@@ -1,10 +1,15 @@
 dh-make-perl (0.74-1) UNRELEASED; urgency=low
 
+  [ Tim Retout ]
   * t/cache.t: New test for handling unreadable cache files.
   * Debian::WNPP::Query: return an empty hashref rather than undef after
     failing to read cache file.
 
- -- Tim Retout <diocles at debian.org>  Mon, 04 Jul 2011 17:12:39 +0100
+  [ Damyan Ivanov ]
+  * Packaging.pm: extend the examples regular expression to match demo/demos.
+    Thanks to Kevin Ryde. Closes: #634932
+
+ -- Damyan Ivanov <dmn at debian.org>  Thu, 21 Jul 2011 20:58:01 +0200
 
 dh-make-perl (0.73-1) unstable; urgency=low
 

Modified: trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm?rev=77700&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm Thu Jul 21 18:58:29 2011
@@ -725,7 +725,7 @@
     # we need the relative path here. Otherwise the check will give bogus
     # results if the working dir matches the pattern
     my $rel_path = substr( $File::Find::name, length( $self->main_dir ) );
-    ( $rel_path !~ m{/(?:examples?|samples|eg|t|docs|win32?)/} )
+    ( $rel_path !~ m{/(?:examples?|samples|eg|t|docs|win32?|demos?)/} )
             and
     ( !$self->cfg->exclude or $rel_path !~ $self->cfg->exclude )
         && /\.(xs|c|cpp|cxx)$/i