mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 06:01:22 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/dired-x.el (dired-mark-sexp): Unbreak for systems where ls

Browse source 
returns "alternate access method" in mode (eg "-rw-r--r--.").

It's still pretty broken though, eg
http://debbugs.gnu.org/13575
This commit is contained in:
Glenn Morris 2013-09-09 21:28:01 -04:00
parent 81ca32e091
commit e5e916d856
2 changed files with 8 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2013-09-10 Glenn Morris <rgm@gnu.org>
* dired-x.el (dired-mark-sexp): Unbreak for systems where ls
returns "alternate access method" in mode (eg "-rw-r--r--.").
2013-09-08 Glenn Morris <rgm@gnu.org>
* saveplace.el (load-save-place-alist-from-file):

3
lisp/dired-x.el
View file

@ -1459,6 +1459,9 @@ to mark all zero length files."
s nil))
(setq mode (buffer-substring (point) (+ mode-len (point))))
(forward-char mode-len)
;; Skip any extended attributes marker ("." or "+").
(or (looking-at " ")
(forward-char 1))
(setq nlink (read (current-buffer)))
;; Karsten Wenger <kw@cis.uni-muenchen.de> fixed uid.
(setq uid (buffer-substring (1+ (point))