ports/137626: [PATCH] ports-mgmt/pkg_cutleaves: default to continue with leaf packages

[Ulrich Spoerlein]

>Number:         137626
>Category:       ports
>Synopsis:       [PATCH] ports-mgmt/pkg_cutleaves: default to continue with leaf packages
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          change-request
>Submitter-Id:   current-users
>Arrival-Date:   Mon Aug 10 10:20:01 UTC 2009
>Closed-Date:
>Last-Modified:
>Originator:     Ulrich Spoerlein
>Release:        FreeBSD 8.0-BETA2 amd64
>Organization:
>Environment:
>Description:
- Change the default behaviour to continue on newly found leaf packages

The reasoning is that it is dead easy to abort (hit CTRL-C) but impossible to
resume if you hit return too fast. Therefore resuming the de-installation
process shall be the default.

Port maintainer (stefan at FreeBSD.org) is cc'd.
Generated with FreeBSD Port Tools 0.77
>How-To-Repeat:
>Fix:

--- pkg_cutleaves-20090810.patch begins here ---
Index: Makefile
===================================================================
RCS file: /tank/ncvs/ports/ports-mgmt/pkg_cutleaves/Makefile,v
retrieving revision 1.15
diff -u -p -u -r1.15 Makefile
--- Makefile	25 Mar 2008 18:55:29 -0000	1.15
+++ Makefile	10 Aug 2009 10:07:59 -0000
@@ -6,7 +6,7 @@
 #
 
 PORTNAME=	pkg_cutleaves
-PORTVERSION=	20080320
+PORTVERSION=	20090810
 CATEGORIES=	ports-mgmt
 MASTER_SITES=	# none
 DISTFILES=	# none
Index: files/pkg_cutleaves
===================================================================
RCS file: /tank/ncvs/ports/ports-mgmt/pkg_cutleaves/files/pkg_cutleaves,v
retrieving revision 1.2
diff -u -p -u -r1.2 pkg_cutleaves
--- files/pkg_cutleaves	25 Mar 2008 18:55:30 -0000	1.2
+++ files/pkg_cutleaves	10 Aug 2009 10:07:59 -0000
@@ -121,7 +121,7 @@ else {
     $again = 'n';
   }
   # Loop while the user wants to
-  ROUND: while($again eq 'y') {
+  ROUND: while($again ne 'n') {
     # Always start with an empty list of leaves to cut
     my %leavestocut;
     # Initialize counter for progress status
@@ -259,7 +259,7 @@ else {
       goto AUTOPRUNE;
     } # AUTOPRUNE
 
-    print "Go on with new leaf packages ((y)es/[no])? ";
+    print "Go on with new leaf packages ([yes]/no)? ";
     # Get first character of input, without leading whitespace
     ($again) = (lc(<STDIN>) =~ /(\S)/o);
     print "\n";
--- pkg_cutleaves-20090810.patch ends here ---

>Release-Note:
>Audit-Trail:
>Unformatted: