]> gitweb.factorcode.org Git - factor.git/commitdiff
Merge branch 'master' of http://factorcode.org/git/factor
authorDoug Coleman <doug.coleman@gmail.com>
Mon, 14 Jun 2010 00:59:38 +0000 (19:59 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Mon, 14 Jun 2010 00:59:38 +0000 (19:59 -0500)
basis/ui/backend/windows/windows.factor

index 0e0de674404dc4b353b64c77d3a3bf5eb512e4b4..06ea870196a5817bd358761dda14c5c1c7b74c03 100755 (executable)
@@ -569,6 +569,9 @@ H{ } clone wm-handlers set-global
     [ [ execute( -- wm ) add-wm-handler ] with each ]
     [ wm-handlers get-global set-at ] if ;
 
+: remove-wm-handler ( wm -- )
+    wm-handlers get-global delete-at ;
+
 [ handle-wm-close 0                  ] WM_CLOSE add-wm-handler
 [ 4dup handle-wm-paint DefWindowProc ] WM_PAINT add-wm-handler