diff options
| author | Sam Steingold <sds@gnu.org> | 2015-04-14 15:14:20 -0400 |
|---|---|---|
| committer | Sam Steingold <sds@gnu.org> | 2015-04-14 15:14:20 -0400 |
| commit | e45dbdc386e08c0733cfc6d3cd7e574d8474b249 (patch) | |
| tree | 4a43ee97cfffd58b4099a796699b23de61fca1d5 /lisp/emacs-lisp | |
| parent | 95cee7f6a6c9332296e386ca6e6fcce3141e5d13 (diff) | |
| download | emacs-e45dbdc386e08c0733cfc6d3cd7e574d8474b249.tar.gz emacs-e45dbdc386e08c0733cfc6d3cd7e574d8474b249.tar.bz2 emacs-e45dbdc386e08c0733cfc6d3cd7e574d8474b249.zip | |
package--ensure-init-file: widen requires save-restriction
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index dd1c5dfc056..2fb54f0d944 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1782,9 +1782,10 @@ using `package-compute-transaction'." (if buffer (with-current-buffer buffer (save-excursion - (widen) - (goto-char (point-min)) - (search-forward "(package-initialize)" nil 'noerror))) + (save-restriction + (widen) + (goto-char (point-min)) + (search-forward "(package-initialize)" nil 'noerror)))) (with-temp-buffer (insert-file-contents user-init-file) (goto-char (point-min)) |