[cldoc-devel] asdf-binary-locations

[Kilian Sprotte]

Hi,

there is a tiny change, I made for asdf-binary-locations.
You might want to apply it?

Cheers,

  Kilian

--------------------------------
diff -ur cldoc-orig/src/cldoc.asd cldoc/src/cldoc.asd
--- cldoc-orig/src/cldoc.asd       2005-11-18 15:52:18.000000000 +0100
+++ cldoc/src/cldoc.asd 2007-01-10 12:41:43.000000000 +0100
@@ -20,8 +20,6 @@

  (in-package :cldoc.system)

-(defparameter *cludg-directory* (directory-namestring *load-truename*))
-
  (defsystem :cldoc
   :components
   ((:file "package")
@@ -30,6 +28,8 @@
    (:file "string-parser" :depends-on ("cludg"))
    (:file "html" :depends-on ("cludg" "cache-system" "string-parser"))))

+(defparameter *cludg-directory* (component-pathname (find-system :cldoc)))
+
  #+:sbcl
  (defmethod perform :around (o f)
   ;; SBCL signals an error if DEFCONSTANT is asked to redefine a