diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-03-12 00:23:12 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-03-12 00:23:12 +0000 |
| commit | 26add1bf463d21a7dc855798911eae45e96fa202 (patch) | |
| tree | f227ddc7a59807d3f0d596907f3bc2c87af5a2d4 /lisp/dired-aux.el | |
| parent | 96a410bce6167f4ba9be55693dee79075325893e (diff) | |
| download | emacs-26add1bf463d21a7dc855798911eae45e96fa202.tar.gz | |
Don't use triple-hyphen in a character class.
Diffstat (limited to 'lisp/dired-aux.el')
| -rw-r--r-- | lisp/dired-aux.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index 99e0063a94a..0959ee0f1d4 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -279,7 +279,7 @@ with a prefix argument." ;; Quote everything except POSIX filename characters. ;; This should be safe enough even for really weird shells. (let ((result "") (start 0) end) - (while (string-match "[^---0-9a-zA-Z_./]" filename start) + (while (string-match "[^-0-9a-zA-Z_./]" filename start) (setq end (match-beginning 0) result (concat result (substring filename start end) "\\" (substring filename end (1+ end))) |