* test/test-riece-ruby.el (lunit-test-case-teardown): Rest

[riece] / lisp / riece-ruby.el

diff --git a/lisp/riece-ruby.el b/lisp/riece-ruby.el
index 97f4e5b..a58b4f7 100644 (file)
--- a/lisp/riece-ruby.el
+++ b/lisp/riece-ruby.el
@@ -243,7 +243,7 @@ Use `riece-ruby-set-property' to set this variable.")
                                       (format "%s-output-handler" name))
                                     (cdr handler-entry) name output time)
       (if entry
-         (setcdr entry (cons output (cdr entry)))
+         (setcdr entry (cons (cons output time) (cdr entry)))
        (setq riece-ruby-output-queue-alist
              (cons (list name (cons output time))
                    riece-ruby-output-queue-alist))))))