From: <kr_...@us...> - 2003-03-25 23:23:44
|
Update of /cvsroot/htoolkit/port/src/Port In directory sc8-pr-cvs1:/tmp/cvs-serv12746/src/Port Modified Files: Handlers.hs Log Message: Fix functions names Index: Handlers.hs =================================================================== RCS file: /cvsroot/htoolkit/port/src/Port/Handlers.hs,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -d -r1.13 -r1.14 *** Handlers.hs 24 Mar 2003 17:07:08 -0000 1.13 --- Handlers.hs 25 Mar 2003 23:23:34 -0000 1.14 *************** *** 38,42 **** -- ** Events ! ,setWindowReLayoutHandler, setWindowReLayoutDefHandler, getWindowReLayoutDefHandler ,setWindowDismissHandler, setWindowDismissDefHandler, getWindowDismissHandler ,setWindowDestroyHandler, setWindowDestroyDefHandler, getWindowDestroyHandler --- 38,42 ---- -- ** Events ! ,setWindowReLayoutHandler, setWindowReLayoutDefHandler, getWindowReLayoutHandler ,setWindowDismissHandler, setWindowDismissDefHandler, getWindowDismissHandler ,setWindowDestroyHandler, setWindowDestroyDefHandler, getWindowDestroyHandler *************** *** 45,49 **** ,setWindowScrollHandler, setWindowScrollDefHandler, getWindowScrollHandler ,setWindowMouseHandler, setWindowMouseDefHandler, getWindowMouseHandler ! ,setWindowKeyboardHandler, setWindowMouseDefHandler, getWindowMouseHandler ,setWindowActivateHandler, setWindowActivateDefHandler, getWindowActivateHandler ,setWindowDeactivateHandler,setWindowDeactivateDefHandler,getWindowDeactivateHandler --- 45,49 ---- ,setWindowScrollHandler, setWindowScrollDefHandler, getWindowScrollHandler ,setWindowMouseHandler, setWindowMouseDefHandler, getWindowMouseHandler ! ,setWindowKeyboardHandler, setWindowKeyboardDefHandler, getWindowKeyboardHandler ,setWindowActivateHandler, setWindowActivateDefHandler, getWindowActivateHandler ,setWindowDeactivateHandler,setWindowDeactivateDefHandler,getWindowDeactivateHandler *************** *** 234,239 **** = setDefHandler hwnd handlersWindowReLayout ! getWindowReLayoutDefHandler :: WindowHandle -> IO (IO ()) ! getWindowReLayoutDefHandler hwnd = getHandler hwnd (return ()) handlersWindowReLayout --- 234,239 ---- = setDefHandler hwnd handlersWindowReLayout ! getWindowReLayoutHandler :: WindowHandle -> IO (IO ()) ! getWindowReLayoutHandler hwnd = getHandler hwnd (return ()) handlersWindowReLayout |