From 8dd7091534940d5f012370024f718b913e950f9b Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Wed, 27 Jun 1990 11:22:07 +0000
Subject: [PATCH] Un-commented-out loading of CLX, instead making it
 conditional on the CLX feature.

---
 tools/worldload.lisp | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index 9f04018f9..e3518296f 100644
--- a/tools/worldload.lisp
+++ b/tools/worldload.lisp
@@ -72,12 +72,16 @@
 ;;;
 (load "code:run-program")
 
-#|
+
 ;;; CLX.
 ;;;
+#+clx(progn
 (load "clx:defsystem")
-(load-clx (pathname "clx:"))
+(setf (symbol-function 'xlib::clx-foreign-files) #'list); #### Hack...
+(xlib::load-clx (pathname "clx:"))
+)
 
+#|
 ;;; A hack to fix a bug in the X11 R3 server.  This should go away when
 ;;; the server is fixed.
 ;;;
-- 
GitLab