Changeset 2581

Timestamp:

Mar 9, 2006, 12:02:29 AM (19 years ago)

Author:

bird

Message:

fixed warning.

Location:

trunk/coreutils/tests

Files:

• head/Test.pm (modified) (1 diff)
• mk-script (modified) (1 diff)

trunk/coreutils/tests/head/Test.pm

@@ -86 +86 @@
 
   # bird - \n -> \r\n hacking
-  $Test::binmode_tests{'no-oct-4'} = 1;
+  $Test::binmode_tests{'no-oct-4'} = { ALL_BINARY => 1 };
 
   return (@tv, @derived_tests);

trunk/coreutils/tests/mk-script

@@ -290 +290 @@
       die if 0 && $Test::input_via{$test_name} && $Test::input_via_default;
       die if 0 && $Test::env{$test_name} && $Test::env_default;
+      die if 0 && $Test::binmode_tests{$test_name}; # bird
 
       my $vias = $Test::input_via{$test_name} || $Test::input_via_default