diff options
| author | Stephen Berman | 2019-07-16 11:04:56 +0200 |
|---|---|---|
| committer | Stephen Berman | 2019-07-16 11:04:56 +0200 |
| commit | 288e83ae00fcf6da8064ecb5a8ffaec202c5e9ec (patch) | |
| tree | 2207d0cfc0836751d06014ecab5ab5192af570a5 | |
| parent | cdec5a17fd148098e535b4168de0169082176bbd (diff) | |
| download | emacs-288e83ae00fcf6da8064ecb5a8ffaec202c5e9ec.tar.gz emacs-288e83ae00fcf6da8064ecb5a8ffaec202c5e9ec.zip | |
Prevent infinite loop on entering wdired-mode
* lisp/wdired.el (wdired-preprocess-symlinks): Remove unneeded use
of beginning-of-line, which also triggers an infinite loop in a
find-dired buffer that doesn't end with a newline (see discussion
in bug#35609).
| -rw-r--r-- | lisp/wdired.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/wdired.el b/lisp/wdired.el index 0ccaaaca74b..44f083bb7fb 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el | |||
| @@ -677,8 +677,7 @@ says how many lines to move; default is one line." | |||
| 677 | 'rear-nonsticky '(read-only)) | 677 | 'rear-nonsticky '(read-only)) |
| 678 | (put-text-property (match-beginning 1) | 678 | (put-text-property (match-beginning 1) |
| 679 | (match-end 1) 'read-only nil))) | 679 | (match-end 1) 'read-only nil))) |
| 680 | (forward-line) | 680 | (forward-line))))) |
| 681 | (beginning-of-line))))) | ||
| 682 | 681 | ||
| 683 | 682 | ||
| 684 | (defun wdired-get-previous-link (&optional old move) | 683 | (defun wdired-get-previous-link (&optional old move) |