From 469fd8388095ccbdaf40277cab7877603756bbe9 Mon Sep 17 00:00:00 2001 From: Daiki Ueno Date: Mon, 29 Aug 2005 06:35:43 +0000 Subject: [PATCH] * test/test-riece-log.el (test-riece-log-display-message-function): Enable riece-log addon. --- lisp/ChangeLog | 3 +++ lisp/test/test-riece-log.el | 4 +++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1a12b64..7de0b55 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -8,6 +8,9 @@ * test/test-riece-ruby.el (lunit-test-case-teardown): Rest riece-ruby-output-handler-alist and riece-ruby-output-queue-alist. + * test/test-riece-log.el + (test-riece-log-display-message-function): Enable riece-log addon. + * riece-server.el (riece-server-keyword-map): Abolished :coding-system-alist keyword. (riece-send-string): Take the target identity as the 2nd argument. diff --git a/lisp/test/test-riece-log.el b/lisp/test/test-riece-log.el index 8f92dc9..fc14774 100644 --- a/lisp/test/test-riece-log.el +++ b/lisp/test/test-riece-log.el @@ -132,6 +132,7 @@ riece-log-directory-map (riece-server-process-alist (list (cons "" (start-process "" (current-buffer) "true"))))) + (put 'riece-log 'riece-addon-enabled t) (riece-log-display-message-function (riece-make-message (riece-make-identity "ueno" "") @@ -140,7 +141,8 @@ (make-char 'japanese-jisx0208 33 60) (make-char 'japanese-jisx0208 36 57)) "") - "a b c\n" nil t))) + "a b c\n" nil t)) + (put 'riece-log 'riece-addon-enabled nil)) (let (file-name-coding-system default-file-name-coding-system) (lunit-assert-2 -- 2.34.1