diff options
| author | culler <culler> | 2019-10-25 18:02:22 (GMT) |
|---|---|---|
| committer | culler <culler> | 2019-10-25 18:02:22 (GMT) |
| commit | 3e8df0bd27a22fd54be7c6b1b1e5b14b403371ba (patch) | |
| tree | cd4aff3256c732f889b84e58fecd13083ecf3adb /library/tk.tcl | |
| parent | 137c7a5bd525f7873c164ff78efb0b2ed4c56f9a (diff) | |
| parent | c7c2b3b52832d1b78f18359507d3b971ec1506e2 (diff) | |
| download | tk-3e8df0bd27a22fd54be7c6b1b1e5b14b403371ba.zip tk-3e8df0bd27a22fd54be7c6b1b1e5b14b403371ba.tar.gz tk-3e8df0bd27a22fd54be7c6b1b1e5b14b403371ba.tar.bz2 | |
Merge 8.6
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 5803d00..87e0586 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 ""} { |