summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2014-06-17 14:30:06 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2014-06-17 14:30:06 (GMT)
commitd27ff0c78862fc1652325b8c27e0882aa772171f (patch)
tree8f39f23145f82d7c131c79685ec6501399225d4d /library
parent946600db937b025964117d8aaa11a9e27f96e9aa (diff)
downloadtcl-d27ff0c78862fc1652325b8c27e0882aa772171f.zip
tcl-d27ff0c78862fc1652325b8c27e0882aa772171f.tar.gz
tcl-d27ff0c78862fc1652325b8c27e0882aa772171f.tar.bz2
[f0f876c141] Improve consistency in error messages.
Diffstat (limited to 'library')
-rw-r--r--library/clock.tcl8
1 files changed, 4 insertions, 4 deletions
diff --git a/library/clock.tcl b/library/clock.tcl
index 1e652b4..67d15b1 100644
--- a/library/clock.tcl
+++ b/library/clock.tcl
@@ -1227,8 +1227,8 @@ proc ::tcl::clock::scan { args } {
}
default {
return -code error \
- -errorcode [list CLOCK badSwitch $flag] \
- "bad switch \"$flag\",\
+ -errorcode [list CLOCK badOption $flag] \
+ "bad option \"$flag\",\
must be -base, -format, -gmt, -locale or -timezone"
}
}
@@ -4295,8 +4295,8 @@ proc ::tcl::clock::add { clockval args } {
set timezone $b
}
default {
- throw [list CLOCK badSwitch $a] \
- "bad switch \"$a\",\
+ throw [list CLOCK badOption $a] \
+ "bad option \"$a\",\
must be -gmt, -locale or -timezone"
}
}