r54408 - /trunk/dh-make-perl/lib/Debian/Rules.pm

[dmn at users.alioth.debian.org]

Author: dmn
Date: Wed Mar 17 10:27:30 2010
New Revision: 54408

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=54408
Log:
Rules::copy_from: flush file on disk when done

this makes sure the file is created if it doesn't exist (make). This way
a subsequent chmod() won't fail

Modified:
    trunk/dh-make-perl/lib/Debian/Rules.pm

Modified: trunk/dh-make-perl/lib/Debian/Rules.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/Debian/Rules.pm?rev=54408&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/Debian/Rules.pm (original)
+++ trunk/dh-make-perl/lib/Debian/Rules.pm Wed Mar 17 10:27:30 2010
@@ -311,6 +311,8 @@
         push @{ $self->lines }, $_;
     }
     $self->_parsed(0);
+
+    ( tied @{ $self->lines } )->flush;
 }
 
 =back