[47792] contrib/port_cutleaves/port_cutleaves

[perry at macports.org]

Revision: 47792
          http://trac.macports.org/changeset/47792
Author:   perry at macports.org
Date:     2009-03-06 00:53:29 -0800 (Fri, 06 Mar 2009)
Log Message:
-----------
contrib/port_cutleaves:
Changed the invalid answer message and replaced [expr + 1] with incr.

Modified Paths:
--------------
    contrib/port_cutleaves/port_cutleaves

Modified: contrib/port_cutleaves/port_cutleaves
===================================================================
--- contrib/port_cutleaves/port_cutleaves	2009-03-06 05:54:37 UTC (rev 47791)
+++ contrib/port_cutleaves/port_cutleaves	2009-03-06 08:53:29 UTC (rev 47792)
@@ -74,7 +74,7 @@
                     puts "** $full_name will be kept.\n"
                 }
                 default {
-                    puts "** Invalid answer.\n"
+                    puts "** '$action' is an invalid answer.\n"
                     continue
                 }
             }
@@ -86,7 +86,7 @@
             break
         }
 
-        set current_leaf [expr $current_leaf + 1]
+        incr current_leaf
     }
 
     if {[llength $to_uninstall] < 1} {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090306/631f711f/attachment.html>