procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Revision: miles@gnu.org--gnu-2003/emacs--cvs-trunk--0--patch-135

Browse source 
Make dired more robust for non-english locales.

lisp/dired.el (dired-between-files): Always use dired-move-to-filename,
which is more robust in non-english locales.
This commit is contained in:
Miles Bader 2003-12-24 23:18:55 +00:00
parent 3c85843f33
commit 8a372755cf
1 changed files with 4 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/dired.el
View file

@ -2380,12 +2380,10 @@ FILES is the list of marked files."
(dired-move-to-filename)))
(defun dired-between-files ()
;; Point must be at beginning of line
;; Should be equivalent to (save-excursion (not (dired-move-to-filename)))
;; but is about 1.5..2.0 times as fast. (Actually that's not worth it)
(or (looking-at "^$\\|^. *$\\|^. total\\|^. wildcard\\|^. used\\|^. find")
(and (looking-at dired-subdir-regexp)
(save-excursion (not (dired-move-to-filename))))))
;; This used to be a regexp match of the `total ...' line output by
;; ls, which is slightly faster, but that is not very robust; notably,
;; it fails for non-english locales.
(save-excursion (not (dired-move-to-filename))))
(defun dired-next-marked-file (arg &optional wrap opoint)
"Move to the next marked file, wrapping around the end of the buffer."