aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTino Calancha2016-12-04 18:12:59 +0900
committerTino Calancha2016-12-04 18:12:59 +0900
commit35d547096293a6ee5233ad086d6e27756f092fee (patch)
treef5d3edc60d021d3309c6d6b68b3cef7982d9785a
parentd993aaf9cdbb1d4f14c46b828f1c6caf17443c9b (diff)
downloademacs-35d547096293a6ee5233ad086d6e27756f092fee.tar.gz
emacs-35d547096293a6ee5233ad086d6e27756f092fee.zip
Fix typo in dired-omit-case-fold-p
* lisp/dired-x.el (dired-omit-case-fold-p): Write 'file-name-case-insensitive-p' instead of 'file-name-case-sensitive-p'. Add declaration of 'file-name-case-insensitive-p'.
-rw-r--r--lisp/dired-x.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/dired-x.el b/lisp/dired-x.el
index 88caca458c8..bddf1ebf78d 100644
--- a/lisp/dired-x.el
+++ b/lisp/dired-x.el
@@ -130,10 +130,11 @@ folding to be used on case-insensitive filesystems only."
130 :group 'dired-x 130 :group 'dired-x
131 :version "26.1") 131 :version "26.1")
132 132
133(declare-function file-name-case-insensitive-p "fileio.c" (filename))
133(defun dired-omit-case-fold-p (dir) 134(defun dired-omit-case-fold-p (dir)
134 "Non-nil if `dired-omit-mode' should be case-insensitive in DIR." 135 "Non-nil if `dired-omit-mode' should be case-insensitive in DIR."
135 (if (eq dired-omit-case-fold 'filesystem) 136 (if (eq dired-omit-case-fold 'filesystem)
136 (file-name-case-sensitive-p dir) 137 (file-name-case-insensitive-p dir)
137 dired-omit-case-fold)) 138 dired-omit-case-fold))
138 139
139;; For backward compatibility 140;; For backward compatibility