diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-11-22 08:54:22 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-11-22 08:54:22 (GMT) |
| commit | 20a005ef0c7ab42b7f4f703572c56ac2af790137 (patch) | |
| tree | 295f11b07b62234a45581c7e7e7d58a8a02c01d3 /library/tk.tcl | |
| parent | 371daa9f78b7f888ce06ec270477e2dc174a54a1 (diff) | |
| parent | 8e65c4de1acc5309017fcc308dc64b435509e719 (diff) | |
| download | tk-20a005ef0c7ab42b7f4f703572c56ac2af790137.zip tk-20a005ef0c7ab42b7f4f703572c56ac2af790137.tar.gz tk-20a005ef0c7ab42b7f4f703572c56ac2af790137.tar.bz2 | |
Merge trunk
Diffstat (limited to 'library/tk.tcl')
| -rw-r--r-- | library/tk.tcl | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/library/tk.tcl b/library/tk.tcl index fcc987d..75574ca 100644 --- a/library/tk.tcl +++ b/library/tk.tcl @@ -687,11 +687,6 @@ if {[tk windowingsystem] eq "aqua"} { if {[tk windowingsystem] eq "aqua"} { - #register to send data to macOS Services - proc ::tk::RegisterServiceWidget {w} { - ::tk::mac::registerServiceWidget $w - } - #stub procedures to respond to "do script" Apple Events proc ::tk::mac::DoScriptFile {file} { source $file @@ -701,7 +696,10 @@ if {[tk windowingsystem] eq "aqua"} { } } +# Create a dictionary to store the starting index of the IME marked +# text in an Entry or Text widget. +set ::tk::Priv(IMETextMark) [dict create] # Run the Ttk themed widget set initialization if {$::ttk::library ne ""} { |