byte-compile warnings; `save-excursion' defeated by `set-buffer'.
2010-09-04 TAKAHASHI Kaoru <kaoru@kaisei.org>
+ * riece-mcat.el (riece-mcat-update): Suppress byte-compile
+ warnings; `save-excursion' defeated by `set-buffer'.
+
* riece-shrink-buffer.el (riece-shrink-buffer): Suppress
byte-compile warnings; `save-excursion' defeated by `set-buffer'.
"Update MCAT-FILE."
(let ((pp-escape-newlines t)
alist)
- (save-excursion
- (set-buffer (find-file-noselect mcat-file))
+ (with-current-buffer (find-file-noselect mcat-file)
(goto-char (point-min))
(if (re-search-forward (concat "^\\s-*(\\(defvar\\|defconst\\)\\s-+"
(regexp-quote (symbol-name