File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -337,15 +337,15 @@ test clock-1.4.1 "clock format - unexpected option for this sub-command" {
337
337
list [catch {clock format 0 -base 0} msg] $msg $::errorCode
338
338
} [subst {1 {bad option "-base": should be "$syntax"} {CLOCK badOption -base}}]
339
339
340
- test clock-1.5 "clock format - bad timezone" -body {
340
+ test clock-1.5 "clock format - bad timezone (not found) " -body {
341
341
clock format 0 -format "%s" -timezone :NOWHERE
342
342
} -returnCodes 1 -result {time zone ":NOWHERE" not found} -errorCode {CLOCK badTimeZone :NOWHERE}
343
343
foreach tz [list {*}{
344
344
../UNSAFEPATH/NOWHERE UNSAFEPATH/../GMT //UNSAFEPATH/NOWHERE
345
345
zipfs:/UNSAFEPATH/NOWHERE C:/UNSAFEPATH/NOWHERE
346
346
} [list $::tcl::clock::DataDir/GMT]
347
347
] {
348
- test clock-1.5.1 "clock format - bad timezone" -body {
348
+ test clock-1.5.1 "clock format - bad timezone (not valid - unsafe path) " -body {
349
349
clock format 0 -format "%s" -timezone $tz
350
350
} -returnCodes 1 -result "time zone \":$tz\" not valid" -errorCode [list CLOCK badTimeZone :$tz]
351
351
}
You can’t perform that action at this time.
0 commit comments