From 4cde2561e20d3def79acfa305526c8ebf46f9609 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Sun, 9 Dec 2007 17:50:37 -0600 Subject: [PATCH] 3drop drop -> 4drop --- extra/ui/windows/windows.factor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/extra/ui/windows/windows.factor b/extra/ui/windows/windows.factor index de9ad130fe..9311a1b2a6 100755 --- a/extra/ui/windows/windows.factor +++ b/extra/ui/windows/windows.factor @@ -211,7 +211,7 @@ SYMBOL: hWnd drop ; : handle-wm-syscommand ( hWnd uMsg wParam lParam -- n ) - dup alpha? [ 3drop drop 0 ] [ DefWindowProc ] if ; + dup alpha? [ 4drop 0 ] [ DefWindowProc ] if ; : cleanup-window ( handle -- ) dup win-title [ free ] when* @@ -298,11 +298,11 @@ M: windows-ui-backend (close-window) : handle-wm-cancelmode ( hWnd uMsg wParam lParam -- ) #! message sent if windows needs application to stop dragging - 3drop drop release-capture ; + 4drop release-capture ; : handle-wm-mouseleave ( hWnd uMsg wParam lParam -- ) #! message sent if mouse leaves main application - 3drop drop forget-rollover ; + 4drop forget-rollover ; ! return 0 if you handle the message, else just let DefWindowProc return its val : ui-wndproc ( -- object )