Change default SQL server host

[umlisp.git] / data-structures.lisp

diff --git a/data-structures.lisp b/data-structures.lisp
index e658c1063a643d7f208b87a6117422e33f207873..f45de422125d88abf9fb2751880d5d7140ddefb2 100644 (file)
--- a/data-structures.lisp
+++ b/data-structures.lisp
@@ -28,7 +28,7 @@
   (make-pathname :directory '(:relative "META")))
 
 (defparameter *lex-dir*
-  (make-pathname :directory '(:relative "LEX" "LEX")))
+  (make-pathname :directory '(:relative "LEX")))
 
 (defparameter *net-dir*
   (make-pathname :directory '(:relative "NET")))