diff options
author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2009-04-20 16:53:13 +0000 |
---|---|---|
committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2009-04-20 16:53:13 +0000 |
commit | fe27153cb911f4756f930f41cac56f1e756b08a7 (patch) | |
tree | 545fd13ae1dce9c25b6a3cbac2feabc2456945b4 /noquit.pd | |
parent | 69924af9abed9b9d548066374320c0a1714eb9de (diff) |
created object to control whether you can quit Pd using the GUI or not
svn path=/trunk/externals/hcs/; revision=11066
Diffstat (limited to 'noquit.pd')
-rw-r--r-- | noquit.pd | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/noquit.pd b/noquit.pd new file mode 100644 index 0000000..9af72ec --- /dev/null +++ b/noquit.pd @@ -0,0 +1,30 @@ +#N canvas 343 307 534 352 10; +#X obj 124 283 sys_gui; +#X obj 85 49 inlet; +#X obj 86 75 route bang float; +#X text 38 12 this disables/enables the menu_quit proc in the GUI to +prevent quitting; +#X obj 132 98 select 0; +#X obj 191 165 bang; +#X obj 123 165 bang; +#X obj 284 121 print ERROR: no method for; +#X msg 192 229 proc menu_quit "" menu_really_quit; +#X msg 123 190 proc menu_quit "" [list pdtk_post "- noquit enabled +-"]; +#X obj 191 98 route reset quit; +#X obj 237 165 send pd; +#X msg 237 142 verifyquit; +#X connect 1 0 2 0; +#X connect 2 0 6 0; +#X connect 2 1 4 0; +#X connect 2 2 10 0; +#X connect 4 0 5 0; +#X connect 4 1 6 0; +#X connect 5 0 8 0; +#X connect 6 0 9 0; +#X connect 8 0 0 0; +#X connect 9 0 0 0; +#X connect 10 0 5 0; +#X connect 10 1 12 0; +#X connect 10 2 7 0; +#X connect 12 0 11 0; |