diff options
| author | Richard M. Stallman | 1993-04-07 04:27:30 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-04-07 04:27:30 +0000 |
| commit | 5119b4121eb107253e848db189b0935525ee0824 (patch) | |
| tree | e53162e56b37e98e36727a0e0c8243b57fc13618 | |
| parent | 63ea14a5b218f071411b17b1ca98c0edeec185ec (diff) | |
| download | emacs-5119b4121eb107253e848db189b0935525ee0824.tar.gz emacs-5119b4121eb107253e848db189b0935525ee0824.zip | |
(untabify): Don't really change where restriction starts.
| -rw-r--r-- | lisp/tabify.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/tabify.el b/lisp/tabify.el index cccc99ea1a5..266dd3953b1 100644 --- a/lisp/tabify.el +++ b/lisp/tabify.el | |||
| @@ -36,7 +36,7 @@ The variable `tab-width' controls the spacing of tab stops." | |||
| 36 | (interactive "r") | 36 | (interactive "r") |
| 37 | (save-excursion | 37 | (save-excursion |
| 38 | (save-restriction | 38 | (save-restriction |
| 39 | (narrow-to-region start end) | 39 | (narrow-to-region (point-min) end) |
| 40 | (goto-char start) | 40 | (goto-char start) |
| 41 | (while (search-forward "\t" nil t) ; faster than re-search | 41 | (while (search-forward "\t" nil t) ; faster than re-search |
| 42 | (let ((start (point)) | 42 | (let ((start (point)) |