r11098: 2006 updates
[umlisp.git] / data-structures.lisp
index beb209a844b1c94eba38e24b875d23061a6bd0e4..3f51b3ed45df3c8f4502d22d97d90b191f7f1332 100644 (file)
@@ -10,7 +10,7 @@
 ;;;; $Id$
 ;;;;
 ;;;; This file, part of UMLisp, is
-;;;;    Copyright (c) 2000-2004 by Kevin M. Rosenberg, M.D.
+;;;;    Copyright (c) 2000-2006 by Kevin M. Rosenberg, M.D.
 ;;;;
 ;;;; UMLisp users are granted the rights to distribute and use this software
 ;;;; as governed by the terms of the GNU General Public License.
@@ -20,8 +20,8 @@
 
 ;;; Paths for files
 
-(defvar *umls-path*
-  (make-pathname :directory '(:absolute "data" "umls" "2004AA"))
+(defparameter *umls-path*
+  (make-pathname :directory '(:absolute "home" "kevin" "2006AC"))
   "Path for base of UMLS data files")
 
 (defvar *meta-path*