[Phemlock-cvs] CVS update: phemlock/src/core/hemlock-ext.lisp

[Dan Barlow]

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 @@
 	 , at 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