From: ueno <ueno>
Date: Wed, 2 Feb 2005 09:41:15 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: riece-1_0_7~63
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ad670a2d01dd429a4895163217b8d9e3bb8dd90d;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/riece-debug.el b/lisp/riece-debug.el
index 9209bd9..6c1b051 100644
--- a/lisp/riece-debug.el
+++ b/lisp/riece-debug.el
@@ -51,6 +51,7 @@
       (if riece-debug
 	  (save-excursion
 	    (set-buffer riece-temp-buffer)
+	    (goto-char (point-min))
 	    (if (re-search-forward "^  signal(" nil t)
 		(delete-region (point-min) (match-beginning 0)))
 	    (message "Error in `%s': %S\n%s" ,location error (buffer-string))))