2010-09-12 TAKAHASHI Kaoru <kaoru@kaisei.org>
+ * riece-display.el (riece-display-connect-signals)
+ (riece-update-buffers): Suppress byte-compile
+ warnings; `save-excursion' defeated by `set-buffer'.
+
* riece-button.el (riece-identity-button-popup-menu)
(riece-identity-button-click): Suppress byte-compile warnings;
`save-excursion' defeated by `set-buffer'.
(riece-connect-signal
'channel-list-changed
(lambda (signal handback)
- (save-excursion
- (set-buffer riece-channel-list-buffer)
+ (with-current-buffer riece-channel-list-buffer
(run-hooks 'riece-update-buffer-functions))
(riece-update-channel-list-indicator)))
(riece-connect-signal
'user-list-changed
(lambda (signal handback)
- (save-excursion
- (set-buffer riece-user-list-buffer)
+ (with-current-buffer riece-user-list-buffer
(run-hooks 'riece-update-buffer-functions)))
(lambda (signal)
(and riece-current-channel
(setq buffers riece-buffer-list))
(while buffers
(if (buffer-live-p (car buffers))
- (save-excursion
- (set-buffer (car buffers))
+ (with-current-buffer (car buffers)
(run-hooks 'riece-update-buffer-functions)))
(setq buffers (cdr buffers)))
(run-hooks 'riece-update-indicator-functions)