Mercurial > emacs
diff lisp/arc-mode.el @ 64086:2aeabf7911c9
(archive-lzh-ogm): Reorder save excursion/restriction.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 04 Jul 2005 18:47:07 +0000 |
parents | d7d21c20c225 |
children | 6fb026ad601f |
line wrap: on
line diff
--- a/lisp/arc-mode.el Mon Jul 04 17:55:18 2005 +0000 +++ b/lisp/arc-mode.el Mon Jul 04 18:47:07 2005 +0000 @@ -679,8 +679,6 @@ ;; Archive mode is suitable only for specially formatted data. (put 'archive-mode 'mode-class 'special) -;; ------------------------------------------------------------------------- -;; Section: Key maps (let ((item1 '(archive-subfile-mode " Archive"))) (or (member item1 minor-mode-alist) @@ -1556,8 +1554,8 @@ (insert newhsize (archive-lzh-resum p newhsize)))))) (defun archive-lzh-ogm (newval files errtxt ofs) - (save-restriction - (save-excursion + (save-excursion + (save-restriction (widen) (set-buffer-multibyte nil) (dolist (fil files)