[Po4a-commits] r2745 - /trunk/Po4aBuilder.pm

[barbier at users.alioth.debian.org]

Author: barbier
Date: Wed Aug 21 22:20:55 2013
New Revision: 2745

URL: http://svn.debian.org/wsvn/po4a/?sc=1&rev=2745
Log:
Fix installation of man3 pages

Modified:
    trunk/Po4aBuilder.pm

Modified: trunk/Po4aBuilder.pm
URL: http://svn.debian.org/wsvn/po4a/trunk/Po4aBuilder.pm?rev=2745&op=diff
==============================================================================
--- trunk/Po4aBuilder.pm	(original)
+++ trunk/Po4aBuilder.pm	Wed Aug 21 22:20:55 2013
@@ -217,10 +217,11 @@
         copy($file, File::Spec->catdir($man1path, "$1.1p.pod")) or die;
     }
     foreach $file (@{$self->rscan_dir('lib',qr{\.pm$})}) {
-        $file =~ m,([^/]*)$,;
+        $file =~ m,([^/]*).pm$,;
         copy($file, File::Spec->catdir($man3path, "Locale::Po4a::$1.3pm.pod")) or die;
     }
     $self->delete_filetree( File::Spec->catdir("blib", "bindoc") );
+    $self->delete_filetree( File::Spec->catdir("blib", "libdoc") );
 
     foreach $file (@{$self->rscan_dir($manpath, qr{\.pod$})}) {
         next if $file =~ m/^man7/;