Mercurial > emacs

changeset 57459:dc60b5774fad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(files-in-below-directory): remove unneeded `or' expression that looks at both . and .. since argument to `substring' specifies just one character.
author Robert J. Chassell <bob@rattlesnake.com>
date Tue, 12 Oct 2004 17:15:06 +0000
parents 4dab182e8b05
children a60664800358
files lispintro/emacs-lisp-intro.texi
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lispintro/emacs-lisp-intro.texi	Tue Oct 12 16:40:38 2004 +0000
+++ b/lispintro/emacs-lisp-intro.texi	Tue Oct 12 17:15:06 2004 +0000
@@ -14930,11 +14930,11 @@
        ;; check whether filename is that of a directory
        ((eq t (car (cdr (car current-directory-list))))
         ;; decide whether to skip or recurse
-        (if
-            (equal (or "." "..")
+        (if 
+            (equal "."
                    (substring (car (car current-directory-list)) -1))
-            ;; then do nothing if filename is that of
-            ;;   current directory or parent
+            ;; then do nothing since filename is that of
+            ;;   current directory or parent, "." or ".."
             ()
 @end group
 @group