X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-display.el;fp=lisp%2Friece-display.el;h=f5f3f7682852013e3a7df2a5ae2b1232951e885b;hp=c9f5b3c0c18a22e7123a0b8c120bfe011efa66b8;hb=7f8ef19e817a830587c4790ee06991b1cc9912cd;hpb=9d8b21a08b7febc9f1d5e7df7c1f2f1f4a253ad7;ds=sidebyside

diff --git a/lisp/riece-display.el b/lisp/riece-display.el
index c9f5b3c..f5f3f76 100644
--- a/lisp/riece-display.el
+++ b/lisp/riece-display.el
@@ -383,9 +383,10 @@ Local to the buffer in `riece-buffer-list'.")
   (unless buffers
     (setq buffers riece-buffer-list))
   (while buffers
-    (save-excursion
-      (set-buffer (car buffers))
-      (run-hooks 'riece-update-buffer-functions))
+    (if (buffer-live-p (car buffers))
+	(save-excursion
+	  (set-buffer (car buffers))
+	  (run-hooks 'riece-update-buffer-functions)))
     (setq buffers (cdr buffers)))
   (run-hooks 'riece-update-indicator-functions)
   (force-mode-line-update t)