diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-16 15:31:02 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-16 15:31:02 (GMT) |
| commit | 82b14ae2cccdfa8344432dfd5217620a2f425b48 (patch) | |
| tree | 28badadd1321a969e36306bf762bbbc318449002 /library | |
| parent | e184e0fa051c3ec3847b9967a7325b147bc4d0fe (diff) | |
| parent | 757618f52c8485c3a87e829181450c8cb5b297ea (diff) | |
| download | tk-82b14ae2cccdfa8344432dfd5217620a2f425b48.zip tk-82b14ae2cccdfa8344432dfd5217620a2f425b48.tar.gz tk-82b14ae2cccdfa8344432dfd5217620a2f425b48.tar.bz2 | |
In Tk 9.0, remove some unneeded "-encoding utf-8" (it's already the default)
Diffstat (limited to 'library')
| -rw-r--r-- | library/tk.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/library/tk.tcl b/library/tk.tcl index eb7ab74..b15b8c6 100644 --- a/library/tk.tcl +++ b/library/tk.tcl @@ -498,7 +498,7 @@ switch -exact -- [tk windowingsystem] { if {$::tk_library ne ""} { proc ::tk::SourceLibFile {file} { - namespace eval :: [list source -encoding utf-8 [file join $::tk_library $file.tcl]] + namespace eval :: [list source [file join $::tk_library $file.tcl]] } namespace eval ::tk { SourceLibFile icons @@ -715,7 +715,7 @@ if {[tk windowingsystem] eq "aqua"} { #stub procedures to respond to "do script" Apple Events proc ::tk::mac::DoScriptFile {file} { uplevel #0 $file - source -encoding utf-8 $file + source $file } proc ::tk::mac::DoScriptText {script} { uplevel #0 $script @@ -843,7 +843,7 @@ if {[tk windowingsystem] eq "x11"} { # Run the Ttk themed widget set initialization if {$::ttk::library ne ""} { - uplevel \#0 [list source -encoding utf-8 $::ttk::library/ttk.tcl] + uplevel \#0 [list source $::ttk::library/ttk.tcl] } |