diff options
| author | sebres <sebres@users.sourceforge.net> | 2017-01-10 22:41:18 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2017-01-10 22:41:18 (GMT) |
| commit | ae0148ee3925f838692b0f69aef337675e32881b (patch) | |
| tree | 0b3b82ec57197c2dc0a9eaee682612848fba26fc /library | |
| parent | bc93c0f3ab88c29a0985e463ccd73fafaddddbc9 (diff) | |
| download | tcl-ae0148ee3925f838692b0f69aef337675e32881b.zip tcl-ae0148ee3925f838692b0f69aef337675e32881b.tar.gz tcl-ae0148ee3925f838692b0f69aef337675e32881b.tar.bz2 | |
[temp-commit]: format almost ready (missing some tokens)
Diffstat (limited to 'library')
| -rwxr-xr-x | library/clock.tcl | 2 | ||||
| -rw-r--r-- | library/init.tcl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/library/clock.tcl b/library/clock.tcl index c4e698c..06aa10a 100755 --- a/library/clock.tcl +++ b/library/clock.tcl @@ -676,7 +676,7 @@ proc mcget {locale args} { # #---------------------------------------------------------------------- -proc ::tcl::clock::format { args } { +proc ::tcl::clock::__org_format { args } { variable FormatProc variable TZData diff --git a/library/init.tcl b/library/init.tcl index ef0a84a..6f34302 100644 --- a/library/init.tcl +++ b/library/init.tcl @@ -178,7 +178,7 @@ if {[interp issafe]} { # Auto-loading stubs for 'clock.tcl' - foreach cmd {add format LocalizeFormat SetupTimeZone GetSystemTimeZone __org_scan} { + foreach cmd {add LocalizeFormat SetupTimeZone GetSystemTimeZone} { proc ::tcl::clock::$cmd args { variable TclLibDir source -encoding utf-8 [file join $TclLibDir clock.tcl] |