Ignore:
Timestamp:
Apr 27, 2010, 12:09:29 PM (10 years ago)
Author:
gz
Message:

Rename feature ccl-0711 to ccl-qres

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-pathnames.lisp

    r13579 r13675  
    627627          (ignore-errors
    628628            (truename
    629              (native-to-directory-pathname (or #+ccl-0711 (getenv "HOME")
     629             (native-to-directory-pathname (or #+ccl-qres (getenv "HOME")
    630630                                               (get-user-home-dir (getuid))))))))
    631631    (if (and native (eq :absolute (car (pathname-directory native))))
Note: See TracChangeset for help on using the changeset viewer.