Comment 1 for bug 454856

Revision history for this message
buzzdee (sebastia) wrote :

citing: http://www.tcl.tk/man/tcl8.5/TclCmd/clock.htm
-gmt boolean
    If boolean is true, specifies that a time specified to clock add, clock format or clock scan should be processed in UTC. If boolean is false, the processing defaults to the local time zone. This usage is obsolete; the correct current usage is to specify the UTC time zone with “-timezone :UTC” or any of the equivalent ways to specify it.

The -gmt is used in these places:

$ grep -r -e "-gmt" * | grep -v svn
bin/unix/Linux/i686/vfs1.3/zipvfs.tcl: return [clock scan $dt -gmt 1]
bin/unix/Linux/i686/snack2.2/snack.tcl: set tmp x[clock format [expr {int($t)}] -format "%M:%S" -gmt 1]
bin/unix/Linux/i686/snack2.2/snack.tcl: set tmp [clock format [expr {int($t)}] -format "%H:%M:%S" -gmt 1]
bin/unix/NetBSD/i686/vfs1.3/zipvfs.tcl: return [clock scan $dt -gmt 1]
bin/unix/NetBSD/i686/snack2.2/snack.tcl: set tmp x[clock format [expr {int($t)}] -format "%M:%S" -gmt 1]
bin/unix/NetBSD/i686/snack2.2/snack.tcl: set tmp [clock format [expr {int($t)}] -format "%H:%M:%S" -gmt 1]
bin/windows/intel/vfs1.3/zipvfs.tcl: return [clock scan $dt -gmt 1]
bin/windows/intel/Snack2.2/snack.tcl: set tmp x[clock format [expr {int($t)}] -format "%M:%S" -gmt 1]
bin/windows/intel/Snack2.2/snack.tcl: set tmp [clock format [expr {int($t)}] -format "%H:%M:%S" -gmt 1]
contrib/tablelist/scripts/tablelistEdit.tcl:# "-gmt 1" option for the mentry::putClockVal and mentry::getClockVal commands,
contrib/tablelist/scripts/tablelistEdit.tcl: if {[string compare $arg "-gmt"] == 0} {
contrib/tablelist/scripts/tablelistEdit.tcl: if {[string compare $arg0 "-gmt"] != 0} {
contrib/tablelist/scripts/tablelistEdit.tcl: return -code error "bad option \"$arg0\": must be -gmt"
contrib/tablelist/scripts/tablelistEdit.tcl: mwutil::wrongNumArgs "addDateMentry format separator ?-gmt? ?name?"
contrib/tablelist/scripts/tablelistEdit.tcl: $name-putValueCmd "mentry::putClockVal %T %W -gmt $useGMT" \
contrib/tablelist/scripts/tablelistEdit.tcl: $name-getValueCmd "mentry::getClockVal %W -gmt $useGMT" \
contrib/tablelist/scripts/tablelistEdit.tcl:# "-gmt 1" option for the mentry::putClockVal and mentry::getClockVal commands,
contrib/tablelist/scripts/tablelistEdit.tcl: if {[string compare $arg "-gmt"] == 0} {
contrib/tablelist/scripts/tablelistEdit.tcl: if {[string compare $arg0 "-gmt"] != 0} {
contrib/tablelist/scripts/tablelistEdit.tcl: return -code error "bad option \"$arg0\": must be -gmt"
contrib/tablelist/scripts/tablelistEdit.tcl: mwutil::wrongNumArgs "addTimeMentry format separator ?-gmt? ?name?"
contrib/tablelist/scripts/tablelistEdit.tcl: $name-putValueCmd "mentry::putClockVal %T %W -gmt $useGMT" \
contrib/tablelist/scripts/tablelistEdit.tcl: $name-getValueCmd "mentry::getClockVal %W -gmt $useGMT" \
contrib/httpex.tcl: -format "%a, %d %b %Y %H:%M:%S GMT" -gmt 1} modTime]} {
contrib/tinyhttpd.tcl: -format "%a, %d %b %Y %H:%M:%S GMT" -gmt 1]
contrib/tinyhttpd.tcl: -format "%a, %d %b %Y %H:%M:%S GMT" -gmt 1]
jabber/RosterTree.tcl: set tstr [::Utils::SmartClockFormat [clock scan $stamp -gmt 1]]
jabber/Chat.tcl: set secs [clock scan $tm -gmt 1]
jabber/History.tcl: set secs [clock scan $stamp -gmt 1]
jabber/Jabber.tcl: if {[catch {clock scan $utc1 -gmt 1} secs]} {
jabber/Jabber.tcl: set msg [clock format $secs -format "%c" -gmt 1]
jabber/MailBox.tcl: set secs [clock scan $stamp -gmt 1]
jabber/MailBox.tcl: set secs [clock scan $stamp -gmt 1]
jabber/MailBox.tcl: set secs [clock scan $stamp -gmt 1]
jabber/MailBox.tcl: set secs [clock scan $tm -gmt 1]
jabber/GroupChat.tcl: set secs [clock scan $stamp -gmt 1]
jabberlib/jabberlib.tcl: set utc [clock format $secs -format "%Y%m%dT%H:%M:%S" -gmt 1]
jabberlib/jabberlib.tcl: set gmt [clock format $secs -format $format -gmt 1]
jabberlib/jabberlib.tcl: set utc [clock format $secs -format "%Y-%m-%dT%H:%M:%SZ" -gmt 1]
jabberlib/roster.tcl: set time [clock scan $stamp -gmt 1]

However, for now, I'll not care about the stuff below the bin directory.