Check-in [fa1920eed6]

Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Tweak testing code for 536
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: fa1920eed6a7d0b54aebeb4be177f7101a84256f12353d85a24505e8763a7cd3
User & Date: kevin_walzer 2019-05-20 02:40:55.555
Context
2019-05-20
02:42
Tweak documentation for 536 check-in: febab60bc9 user: kevin_walzer tags: trunk
02:40
Tweak testing code for 536 check-in: fa1920eed6 user: kevin_walzer tags: trunk
2019-05-19
18:54
Add: TIP 545: image photo SVG options: remove -unit and add target height/width option check-in: 429d23a233 user: oehhar tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to tip/536.md.
90
91
92
93
94
95
96





97
98
99
100
101
102
103
	proc ::tk::mac::Quit {args} {  
	   exit
	}

	proc appPath {} {
		tk_messageBox -message "The app path is [::tk::mac::GetAppPath]"
	}






	proc main {} {

		wm title . "IPC Test"

		pack [text .t]
		.t insert end "Select this text and select \"Services\" from the Apple menu; make sure Services for the Text Edit app are enabled. (You can select this in the System Preferences app.) You should see an option to \"Open new window in Text Edit with selected text.\" Choose that one.







>
>
>
>
>







90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
	proc ::tk::mac::Quit {args} {  
	   exit
	}

	proc appPath {} {
		tk_messageBox -message "The app path is [::tk::mac::GetAppPath]"
	}
	
	proc ::tk::mac::PerformService {} {
    	set data [clipboard get]
    	tk_messageBox -message $data
	}

	proc main {} {

		wm title . "IPC Test"

		pack [text .t]
		.t insert end "Select this text and select \"Services\" from the Apple menu; make sure Services for the Text Edit app are enabled. (You can select this in the System Preferences app.) You should see an option to \"Open new window in Text Edit with selected text.\" Choose that one.