* riece-display.el (riece-channel-buffer): Return nil when

[riece] / lisp / riece-debug.el

diff --git a/lisp/riece-debug.el b/lisp/riece-debug.el
index def5997..f5e8bf9 100644 (file)
--- a/lisp/riece-debug.el
+++ b/lisp/riece-debug.el
@@ -27,10 +27,7 @@
 (require 'riece-globals)
 (require 'riece-options)
 
-(defun riece-debug (message &optional detail)
-  "Print a one-line debug MESSAGE at the bottom of the frame.
-If the optional 2nd argument DETAIL is specified, it is stored into
-`riece-debug-buffer'."
+(defun riece-debug-1 (message detail)
   (message "riece-debug: %s" message)
   (save-excursion
     (set-buffer riece-debug-buffer)
@@ -40,6 +37,12 @@ If the optional 2nd argument DETAIL is specified, it is stored into
          (insert message "\n" detail "\n")
        (insert message "\n")))))
 
+(defun riece-debug (message &optional detail)
+  "Print a one-line debug MESSAGE at the bottom of the frame.
+If the optional 2nd argument DETAIL is specified, it is stored into
+`riece-debug-buffer'."
+  (ignore (riece-debug-1 message detail)))
+
 (defun riece-debug-reset-standard-output ()
   "Reset `riece-temp-buffer' to be used as `standard-output'."
   (save-excursion