Simplified.
authorDaiki Ueno <ueno@unixuser.org>
Sun, 13 Mar 2005 00:10:42 +0000 (00:10 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Sun, 13 Mar 2005 00:10:42 +0000 (00:10 +0000)
lisp/riece-debug.el

index eaa1b9e..def5997 100644 (file)
@@ -38,12 +38,7 @@ If the optional 2nd argument DETAIL is specified, it is stored into
     (let ((point (point)))
       (if detail
          (insert message "\n" detail "\n")
-       (insert message "\n"))
-      (goto-char point)
-      (beginning-of-line)
-      (while (not (eobp))
-       (insert "riece-debug: ")
-       (forward-line)))))
+       (insert message "\n")))))
 
 (defun riece-debug-reset-standard-output ()
   "Reset `riece-temp-buffer' to be used as `standard-output'."