Mercurial > emacs
comparison lisp/ls-lisp.el @ 48800:4ba3749055f0
Fix URL.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Wed, 11 Dec 2002 06:53:24 +0000 |
parents | e783253d4d5a |
children | 9b8d6678be5c |
comparison
equal
deleted
inserted
replaced
48799:9daf1020fccf | 48800:4ba3749055f0 |
---|---|
166 (or (featurep 'ls-lisp) ; FJW: unless this file is being reloaded! | 166 (or (featurep 'ls-lisp) ; FJW: unless this file is being reloaded! |
167 (fset 'original-insert-directory (symbol-function 'insert-directory))) | 167 (fset 'original-insert-directory (symbol-function 'insert-directory))) |
168 | 168 |
169 ;; This stub is to allow ls-lisp to parse symbolic links via another | 169 ;; This stub is to allow ls-lisp to parse symbolic links via another |
170 ;; library such as w32-symlinks.el from | 170 ;; library such as w32-symlinks.el from |
171 ;; http://centaur.qmw.ac.uk/Emacs/: | 171 ;; http://centaur.maths.qmw.ac.uk/Emacs/: |
172 (defun ls-lisp-parse-symlink (file-name) | 172 (defun ls-lisp-parse-symlink (file-name) |
173 "This stub may be redefined to parse FILE-NAME as a symlink. | 173 "This stub may be redefined to parse FILE-NAME as a symlink. |
174 It should return nil or the link target as a string." | 174 It should return nil or the link target as a string." |
175 nil) | 175 nil) |
176 | 176 |