Revision: 116497 https://trac.macports.org/changeset/116497 Author: jmr@macports.org Date: 2014-01-27 02:21:44 -0800 (Mon, 27 Jan 2014) Log Message: ----------- remove redundant calls to expr Modified Paths: -------------- trunk/base/src/port/portindex.tcl trunk/base/src/port/portmirror.tcl Modified: trunk/base/src/port/portindex.tcl =================================================================== --- trunk/base/src/port/portindex.tcl 2014-01-27 10:19:26 UTC (rev 116496) +++ trunk/base/src/port/portindex.tcl 2014-01-27 10:21:44 UTC (rev 116497) @@ -146,7 +146,7 @@ } } -if {[expr {$argc > 8}]} { +if {$argc > 8} { print_usage exit 1 } Modified: trunk/base/src/port/portmirror.tcl =================================================================== --- trunk/base/src/port/portmirror.tcl 2014-01-27 10:19:26 UTC (rev 116496) +++ trunk/base/src/port/portmirror.tcl 2014-01-27 10:21:44 UTC (rev 116497) @@ -82,7 +82,7 @@ puts "Usage: $argv0" } -if {[expr {$argc > 0}]} { +if {$argc > 0} { print_usage exit 1 }