Permalink
Browse files

This commit was manufactured by cvs2svn to create tag

'pre-linux-1-0'.

git-svn-id: https://supercollider.svn.sourceforge.net/svnroot/supercollider/tags/pre-linux-1-0@5291 a380766d-ff14-0410-b294-a243070f3f08
  • Loading branch information...
1 parent bd2e496 commit 95e6b89847581544cc96227825c5e2ccfa993db5 Stefan Kersten committed Mar 6, 2006
Showing with 18 additions and 2 deletions.
  1. +18 −2 build/SCClassLibrary/DefaultLibrary/UI.sc
@@ -1,8 +1,24 @@
UI {
+ classvar resetActions, shutdownActions;
+
+ initClass {
+ resetActions = Array.new;
+ shutdownActions = Array.new;
+ }
+
*shutdown {
- SCWindow.closeAll;
+ shutdownActions.do({ arg function; function.value });
}
*reset {
- CocoaDialog.clear;
+ resetActions.do({ arg function; function.value });
+ }
+
+ *registerForReset {
+ arg function;
+ resetActions = resetActions.add(function);
+ }
+ *registerForShutdown {
+ arg function;
+ shutdownActions = shutdownActions.add(function);
}
}

0 comments on commit 95e6b89

Please sign in to comment.