summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
cdd8350)
byte-compile warnings; `save-excursion' defeated by `set-buffer'.
2010-09-04 TAKAHASHI Kaoru <kaoru@kaisei.org>
2010-09-04 TAKAHASHI Kaoru <kaoru@kaisei.org>
+ * riece-shrink-buffer.el (riece-shrink-buffer): Suppress
+ byte-compile warnings; `save-excursion' defeated by `set-buffer'.
+
* riece-ruby.el (riece-ruby-reset-process-buffer)
(riece-ruby-execute, riece-ruby-filter)
(riece-ruby-inspect): Suppress byte-compile warnings;
* riece-ruby.el (riece-ruby-reset-process-buffer)
(riece-ruby-execute, riece-ruby-filter)
(riece-ruby-inspect): Suppress byte-compile warnings;
(setq buffers (cdr buffers)))))
(defun riece-shrink-buffer (buffer)
(setq buffers (cdr buffers)))))
(defun riece-shrink-buffer (buffer)
- (save-excursion
- (set-buffer buffer)
+ (with-current-buffer buffer
(goto-char (point-min))
(while (> (buffer-size) riece-max-buffer-size)
(let* ((inhibit-read-only t)
(goto-char (point-min))
(while (> (buffer-size) riece-max-buffer-size)
(let* ((inhibit-read-only t)