diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b577bacae64..5c44f82a2ff 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-02-28 Stephen Berman + + * dired-aux.el (dired-update-file-line): + Fix 2010-11-09 change. (Bug#8131) + 2011-02-28 Eli Zaretskii * international/mule-cmds.el (set-default-coding-systems): Use the diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index 986c9edfd2d..c533c81be0e 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -1025,9 +1025,9 @@ See Info node `(emacs)Subdir switches' for more details." ;; Keeps any marks that may be present in column one (doing this ;; here is faster than with dired-add-entry's optional arg). ;; Does not update other dired buffers. Use dired-relist-entry for that. - (let ((char (following-char)) - (opoint (line-beginning-position)) - (buffer-read-only)) + (let* ((opoint (line-beginning-position)) + (char (char-after opoint)) + (buffer-read-only)) (delete-region opoint (progn (forward-line 1) (point))) (if file (progn