diff options
| author | Miller Puckette <millerpuckette@users.sourceforge.net> | 2009-09-01 18:22:23 +0000 |
|---|---|---|
| committer | Miller Puckette <millerpuckette@users.sourceforge.net> | 2009-09-01 18:22:23 +0000 |
| commit | 22a829cb1907c79bfe68ad91314a1dddbf1beeb3 (patch) | |
| tree | 510dcb1af070f5eac5b1192d9fffad2f3e431958 /pd/tcl/apple_events.tcl | |
| parent | 1cc6aed4bfdd84b06d418bc5198a0380479e639a (diff) | |
merge in HC's new tcl code and start taking patches
svn path=/trunk/; revision=12166
Diffstat (limited to 'pd/tcl/apple_events.tcl')
| -rw-r--r-- | pd/tcl/apple_events.tcl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/pd/tcl/apple_events.tcl b/pd/tcl/apple_events.tcl index b52dcdba..cfc92982 100644 --- a/pd/tcl/apple_events.tcl +++ b/pd/tcl/apple_events.tcl @@ -29,14 +29,14 @@ proc ::tk::mac::OnShow {} { # kAEShowPreferences proc ::tk::mac::ShowPreferences {} { - menu_preferences_panel + menu_preferences_dialog } # kAEQuitApplication #proc ::tk::mac::Quit {} { -# # TODO sort this out... how to quit pd-gui after sending the message -# puts stderr "Custom exit proc" -# pdsend "pd verifyquit" +# # TODO sort this out... how to quit pd-gui after sending the message +# puts stderr "Custom exit proc" +# pdsend "pd verifyquit" #} # these I gleaned by reading the source (tkMacOSXHLEvents.c) |