cvs commit: parrot Configure.pl

[dan]

cvsuser     01/12/31 13:58:15

  Modified:    .        Configure.pl
  Log:
  Stupid thinko fix
  
  Revision  Changes    Path
  1.58      +3 -3      parrot/Configure.pl
  
  Index: Configure.pl
  ===================================================================
  RCS file: /home/perlcvs/parrot/Configure.pl,v
  retrieving revision 1.57
  retrieving revision 1.58
  diff -u -w -r1.57 -r1.58
  --- Configure.pl      31 Dec 2001 21:34:26 -0000      1.57
  +++ Configure.pl      31 Dec 2001 21:58:15 -0000      1.58
  @@ -2,7 +2,7 @@
   #
   # Configure.pl
   #
  -# $Id: Configure.pl,v 1.57 2001/12/31 21:34:26 dan Exp $
  +# $Id: Configure.pl,v 1.58 2001/12/31 21:58:15 dan Exp $
   #
   # Author: Brent Dax
   #
  @@ -42,7 +42,7 @@
   
   if($opt_version) {
       print "Parrot Version $parrot_version Configure\n";
  -    print '$Id: Configure.pl,v 1.57 2001/12/31 21:34:26 dan Exp $' . "\n";
  +    print '$Id: Configure.pl,v 1.58 2001/12/31 21:58:15 dan Exp $' . "\n";
       exit;
   }
   
  @@ -213,7 +213,7 @@
       open HINT, "< $hints" or die "Unable to open hints file '$hints'";
       my $hint = <HINT>;
       close HINT;
  -    eval $hint or die "Error in hints file $hints: '$@/$!'" if $@;
  +    eval $hint; die "Error in hints file $hints: '$@/$!'" if $@;
   }