Changeset 11563


Ignore:
Timestamp:
Dec 30, 2008, 1:33:17 PM (11 years ago)
Author:
gz
Message:

Propagate r11562 to trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/pathnames.lisp

    r10642 r11563  
    396396          (when (and (or all (neq (%schar sub 0) #\.))
    397397                     (or include-emacs-lockfiles
    398                          (and (>= (length sub) 2)
    399                               (not (string= sub ".#" :end1 2))))
     398                         (< (length sub) 2)
     399                         (not (string= sub ".#" :end1 2)))
    400400                     (not (string= sub "."))
    401401                     (not (string= sub ".."))
Note: See TracChangeset for help on using the changeset viewer.