2010-09-12 TAKAHASHI Kaoru <kaoru@kaisei.org>
+ * riece-rdcc.el (riece-rdcc-filter, riece-rdcc-sentinel): Suppress
+ byte-compile warnings; `save-excursion' defeated by `set-buffer'.
+
* riece-misc.el (riece-insert): Suppress byte-compile warnings;
`save-excursion' defeated by `set-buffer'.
(riece-ruby-set-exit-handler name #'riece-rdcc-exit-handler)))
(defun riece-rdcc-filter (process input)
- (save-excursion
- (set-buffer (process-buffer process))
+ (with-current-buffer (process-buffer process)
(erase-buffer)
(insert input)
(let ((coding-system-for-write 'binary)
(set-process-filter process nil))))
(defun riece-rdcc-sentinel (process status)
- (save-excursion
- (set-buffer (process-buffer process))
+ (with-current-buffer (process-buffer process)
(unless (= riece-rdcc-received-size riece-rdcc-request-size)
(error "Premature end of file"))
(message (riece-mcat "Receiving %s from %s...done")