[svn:parrot] r43347 - branches/one_make/tools/dev

[coke at svn.parrot.org]

Author: coke
Date: Thu Dec 31 19:14:20 2009
New Revision: 43347
URL: https://trac.parrot.org/parrot/changeset/43347

Log:
fix slurping.

chromatic++

Modified:
   branches/one_make/tools/dev/checkdepend.pl

Modified: branches/one_make/tools/dev/checkdepend.pl
==============================================================================
--- branches/one_make/tools/dev/checkdepend.pl	Thu Dec 31 19:06:32 2009	(r43346)
+++ branches/one_make/tools/dev/checkdepend.pl	Thu Dec 31 19:14:20 2009	(r43347)
@@ -44,7 +44,7 @@
     open my $fh, '<', $file;
     my $guts;
     {
-        local undef $/;
+        local $/;
         $guts = <$fh>;
     }
 
@@ -81,7 +81,7 @@
 open my $mf, '<', "Makefile";
 my $rules;
 {
-    local undef $/;
+    local $/;
     $rules = <$mf>;
 }
 close $mf;
@@ -92,7 +92,7 @@
     open my $smf, '<', $sub_makefile;
     my $subrules;
     {
-        local undef $/;
+        local $/;
         $subrules = <$smf>;
     }
     close $smf;