/[emacs]/emacs/lispintro/emacs-lisp-intro.texi
ViewVC logotype

Diff of /emacs/lispintro/emacs-lisp-intro.texi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.29 by bob, Fri Oct 8 13:07:25 2004 UTC revision 1.30 by bob, Tue Oct 12 17:15:06 2004 UTC
# Line 14930  Here is the function: Line 14930  Here is the function:
14930         ;; check whether filename is that of a directory         ;; check whether filename is that of a directory
14931         ((eq t (car (cdr (car current-directory-list))))         ((eq t (car (cdr (car current-directory-list))))
14932          ;; decide whether to skip or recurse          ;; decide whether to skip or recurse
14933          (if          (if
14934              (equal (or "." "..")              (equal "."
14935                     (substring (car (car current-directory-list)) -1))                     (substring (car (car current-directory-list)) -1))
14936              ;; then do nothing if filename is that of              ;; then do nothing since filename is that of
14937              ;;   current directory or parent              ;;   current directory or parent, "." or ".."
14938              ()              ()
14939  @end group  @end group
14940  @group  @group

Legend:
Removed from v.1.29  
changed lines
  Added in v.1.30

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26