diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-26 15:07:03 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-26 15:07:03 (GMT) |
| commit | 34d3750e3ce6bd9d08b641e6f99b992ad80740b1 (patch) | |
| tree | 26a8f502102bfcadba52f027e82956d3886ca679 /library | |
| parent | 1c788e178d149302a1d9d5265bc46120de4f5a6a (diff) | |
| download | tcl-34d3750e3ce6bd9d08b641e6f99b992ad80740b1.zip tcl-34d3750e3ce6bd9d08b641e6f99b992ad80740b1.tar.gz tcl-34d3750e3ce6bd9d08b641e6f99b992ad80740b1.tar.bz2 | |
Fix [48898ab5f6a0d957]: Too few is better than not enough? (Inconsistent error messages)
Diffstat (limited to 'library')
| -rw-r--r-- | library/init.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/init.tcl b/library/init.tcl index da1850c..0713aa2 100644 --- a/library/init.tcl +++ b/library/init.tcl @@ -84,7 +84,7 @@ namespace eval tcl { proc min {args} { if {![llength $args]} { return -code error \ - "too few arguments to math function \"min\"" + "not enough arguments to math function \"min\"" } set val Inf foreach arg $args { @@ -100,7 +100,7 @@ namespace eval tcl { proc max {args} { if {![llength $args]} { return -code error \ - "too few arguments to math function \"max\"" + "not enough arguments to math function \"max\"" } set val -Inf foreach arg $args { |