*** empty log message ***
authorJim Meyering <jim@meyering.net>
Mon, 8 Mar 1999 14:40:54 +0000 (14:40 +0000)
committerJim Meyering <jim@meyering.net>
Mon, 8 Mar 1999 14:40:54 +0000 (14:40 +0000)
tests/basename/basic
tests/factor/basic

index 7515ccb..bdbf19c 100755 (executable)
@@ -32,10 +32,10 @@ my @Tests =
        . "Try `$prog --help' for more information.\n"}, {EXIT => '1'}],
 
      ['a', qw(d/f),        {OUT => 'f'}],
-     ['b', qw(a/b),        {OUT => 'b'}],
-     ['c', qw(a/b/),       {OUT => 'b'}],
-     ['d', qw(a/b//),      {OUT => 'b'}],
-     ['e', qw(a),          {OUT => 'a'}],
+     ['b', qw(/d/f),       {OUT => 'f'}],
+     ['c', qw(d/f/),       {OUT => 'f'}],
+     ['d', qw(d/f//),      {OUT => 'f'}],
+     ['e', qw(f),          {OUT => 'f'}],
      ['f', qw(/),          {OUT => '/'}],
      ['g', qw(//),         {OUT => '/'}],
      ['h', qw(///),        {OUT => '/'}],
index 96fef58..b0b2e7b 100755 (executable)
@@ -55,7 +55,7 @@ my @Tests =
      ['y', '4294966998', {OUT => '2 3 7 3917 26107'}],
      ['z', '-1',
       {ERR => "$prog: `-1' is not a valid positive integer\n"
-       . "Try `factor --help' for more information.\n"},
+       . "Try `$prog --help' for more information.\n"},
       {EXIT => 1}],
     );