[svn:parrot] r21743 - branches/reconfigure/lib/Parrot

[jkeenan]

Author: jkeenan
Date: Tue Oct  2 04:51:23 2007
New Revision: 21743

Modified:
   branches/reconfigure/lib/Parrot/Configure.pm

Log:
Correction in _finish_printing_result:  simplify pattern match.


Modified: branches/reconfigure/lib/Parrot/Configure.pm
==============================================================================
--- branches/reconfigure/lib/Parrot/Configure.pm        (original)
+++ branches/reconfigure/lib/Parrot/Configure.pm        Tue Oct  2 04:51:23 2007
@@ -413,7 +413,7 @@
         print "...";
     }
     print "." x ( 71 - length($argsref->{description}) - length($result) );
-    unless ($argsref->{step_name} =~ m{^inter/} && $argsref->{args}->{ask}) {
+    unless ($argsref->{step_name} =~ m{^inter} && $argsref->{args}->{ask}) {
         print "$result.";
     }
     return 1;