X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-debug.el;h=5473d1fa2aadc95d705bea4a3d57890e8a304fad;hp=fb422a523cbfe26e79a07cb295fb0f52a560aedb;hb=deee2c444fb26a3e2ea4a4ccb913ea695f1d7087;hpb=f260bf0dccaa036b169b63a1475a7b8ef312f2da

diff --git a/lisp/riece-debug.el b/lisp/riece-debug.el
index fb422a5..5473d1f 100644
--- a/lisp/riece-debug.el
+++ b/lisp/riece-debug.el
@@ -24,12 +24,17 @@
 
 ;;; Code:
 
+(require 'riece-globals)
+
 (defvar riece-debug-standard-output-buffer nil)
 
 (defun riece-debug-reset-standard-output ()
   (unless riece-debug-standard-output-buffer
     (setq riece-debug-standard-output-buffer
-	  (generate-new-buffer " *riece-debug-standard-output*")))
+	  (generate-new-buffer " *riece-debug-standard-output*")
+	  riece-buffer-list
+	  (cons riece-debug-standard-output-buffer
+		riece-buffer-list)))
   (save-excursion
     (set-buffer riece-debug-standard-output-buffer)
     (buffer-disable-undo)