summaryrefslogtreecommitdiff
blob: 4a625c7ba6fae30af143a866d173320dd80c49fe (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
diff -ur cl-mcclim-0.9.1.orig.orig/mcclim.asd cl-mcclim-0.9.1.orig/mcclim.asd
--- cl-mcclim-0.9.1.orig.orig/mcclim.asd	2005-04-11 01:45:44.000000000 -0500
+++ cl-mcclim-0.9.1.orig/mcclim.asd	2005-04-11 01:46:54.000000000 -0500
@@ -35,16 +35,8 @@
 ;;; Legacy CMUCL support stuff
 #+cmu
 (progn
-  (unless (fboundp 'ext:stream-read-char)
-    (unless (ignore-errors (ext:search-list "gray-streams:"))
-      (setf (ext:search-list "gray-streams:")
-	'("target:pcl/" "library:subsystems/")))
-    (if (fboundp 'extensions:without-package-locks)
-	(extensions:without-package-locks
-	 (load "gray-streams:gray-streams-library"))
-      (load "gray-streams:gray-streams-library")))
-  #-clx
-  (require :clx)
+  (asdf:oos 'asdf:load-op :cmucl-graystream)
+  (asdf:oos 'asdf:load-op :cmucl-clx)
   #+mp (when (eq mp::*initial-process* mp::*current-process*)
 	 (format t "~%~%You need to run (mp::startup-idle-and-top-level-loops) to start up the multiprocessing support.~%~%")))
 
Only in cl-mcclim-0.9.1.orig: mcclim.asd~