(Info-find-node): Don't treat file name `dir' specially

if it comes with a directory name.
This commit is contained in:
Richard M. Stallman 1996-05-02 06:08:40 +00:00
parent d21e67b565
commit f0e1cd3354

View file

@ -259,7 +259,7 @@ In standalone mode, \\<Info-mode-map>\\[Info-exit] exits Emacs itself."
(if filename
(let (temp temp-downcase found)
(setq filename (substitute-in-file-name filename))
(if (string= (downcase (file-name-nondirectory filename)) "dir")
(if (string= (downcase filename) "dir")
(setq found t)
(let ((dirs (if (string-match "^\\./" filename)
;; If specified name starts with `./'