Update of /project/phemlock/cvsroot/phemlock/src/core In directory common-lisp.net:/tmp/cvs-serv7389/src/core Modified Files: hemlock-ext.lisp Log Message: remove duplicate disable-clx-event-handling Date: Fri Jul 9 08:41:19 2004 Author: dbarlow Index: phemlock/src/core/hemlock-ext.lisp diff -u phemlock/src/core/hemlock-ext.lisp:1.1 phemlock/src/core/hemlock-ext.lisp:1.2 --- phemlock/src/core/hemlock-ext.lisp:1.1 Fri Jul 9 08:00:36 2004 +++ phemlock/src/core/hemlock-ext.lisp Fri Jul 9 08:41:19 2004 @@ -13,9 +13,15 @@ (peek-char t stream)) +;;; These are just stubs for now: + +(defun enable-clx-event-handling (display handler) + (declare (ignore display handler)) + nil) + (defun disable-clx-event-handling (display) (declare (ignore display)) - ) + nil) (defun quit () ) @@ -234,15 +240,6 @@ ,@body) (disable-clx-event-handling ,display) )) -;;; These are just stubs for now: - -(defun enable-clx-event-handling (display handler) - (declare (ignore display handler)) - nil) - -(defun disable-clx-event-handling (display) - (declare (ignore display)) - nil) #|| ;;; ENABLE-CLX-EVENT-HANDLING associates the display with the handler in