[elephant-cvs] CVS elephant

[ieslick]

Update of /project/elephant/cvsroot/elephant
In directory clnet:/tmp/cvs-serv11649

Modified Files:
	elephant.asd 
Log Message:
Typo

--- /project/elephant/cvsroot/elephant/elephant.asd	2007/04/30 00:38:29	1.47
+++ /project/elephant/cvsroot/elephant/elephant.asd	2007/04/30 00:54:03	1.48
@@ -256,7 +256,7 @@
 	      (error "Could not load ~A" file))
 	  (format t "Loaded ~A~%" file))
 	(let* ((root-dir (asdf:component-pathname (asdf:component-system c)))
-	       (root-library-file (merge-pathnames (file-namestring file) root-path)))
+	       (root-library-file (merge-pathnames (file-namestring file) root-dir)))
 	  (or (uffi-funcall :load-foreign-library 
 			    root-library-file
 			    :module (component-name c))