X-Git-Url: http://git.kpe.io/?p=umlisp.git;a=blobdiff_plain;f=data-structures.lisp;h=f45de422125d88abf9fb2751880d5d7140ddefb2;hp=2db16ae8a8738e715c614b5a761bebe21c0e5b89;hb=HEAD;hpb=6c10979737dc10b0c510b1edfe070346bcac3ff5

diff --git a/data-structures.lisp b/data-structures.lisp
index 2db16ae..f45de42 100644
--- a/data-structures.lisp
+++ b/data-structures.lisp
@@ -8,7 +8,7 @@
 ;;;; Created:  Apr 2000
 ;;;;
 ;;;; This file, part of UMLisp, is
-;;;;    Copyright (c) 2000-2010 by Kevin M. Rosenberg, M.D.
+;;;;    Copyright (c) 2000-2011 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.
@@ -18,10 +18,10 @@
 
 ;;; Paths for files
 
-(defparameter *release* "2010AA")
+(defparameter *release* "2017AA")
 
 (defparameter *umls-path*
-  (make-pathname :directory (list :absolute "srv" "umls" *release*))
+  (make-pathname :directory (list :absolute "srv" "umls" *release* *release*))
   "Path for base of UMLS data files")
 
 (defparameter *meta-dir*
@@ -111,5 +111,3 @@
 (defmethod print-object ((obj ucol) s)
   (print-unreadable-object (obj s :type t)
     (format s "~A" (col obj))))
-
-