Skip to content
Permalink
Browse files

make port(1) exit gracefully when doing: port installed with no

ports installed

git-svn-id: https://svn.macports.org/repository/macports/trunk/base@15616 d073be05-634f-4543-b044-5fe20cf6d1d6
  • Loading branch information
Ole Guldberg Jensen
Ole Guldberg Jensen committed Dec 29, 2005
1 parent 94abbce commit 273d644fd9ac5e8d97ed60a8e4741b6a8746478d
Showing with 2 additions and 1 deletion.
  1. +2 −1 src/port/port.tcl
@@ -2,7 +2,7 @@
#\
exec @TCLSH@ "$0" "$@"
# port.tcl
# $Id: port.tcl,v 1.143 2005/10/30 16:21:02 jberry Exp $
# $Id: port.tcl,v 1.144 2005/12/29 02:34:36 olegb Exp $
#
# Copyright (c) 2004 Robert Shaw <rshaw@opendarwin.org>
# Copyright (c) 2002 Apple Computer, Inc.
@@ -1435,6 +1435,7 @@ switch -- $action {
if { [catch {set ilist [registry::installed]} result] } {
if {$result == "Registry error: No ports registered as installed."} {
puts "No ports are installed!"
set ilist {}
} else {
global errorInfo
ui_debug "$errorInfo"

0 comments on commit 273d644

Please sign in to comment.
You can’t perform that action at this time.