From: bg66 <bg66>
Date: Thu, 4 Dec 2003 11:43:32 +0000 (+0000)
Subject: * riece-server.el (riece-with-server-buffer): Store 'edebug-form-spec
X-Git-Tag: riece-0_1_7~21
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c13ff75958015c5033546b968998d69e9370261e;p=elisp%2Friece.git

* riece-server.el (riece-with-server-buffer): Store 'edebug-form-spec
property.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1536fd3..2c3ec83 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-12-04  OHASHI Akira  <bg66@koka-in.org>
+
+	* riece-server.el (riece-with-server-buffer): Store 'edebug-form-spec
+	property.
+
 2003-12-03  OHASHI Akira  <bg66@koka-in.org>
 
 	* riece-log.el (riece-log-requires): New function.
diff --git a/lisp/riece-server.el b/lisp/riece-server.el
index 4164488..c3ab69e 100644
--- a/lisp/riece-server.el
+++ b/lisp/riece-server.el
@@ -103,6 +103,7 @@ the `riece-server-keyword-map' variable."
        (error "Server closed"))))
 
 (put 'riece-with-server-buffer 'lisp-indent-function 1)
+(put 'riece-with-server-buffer 'edebug-form-spec '(form body))
 
 (defun riece-process-send-string (process string)
   (with-current-buffer (process-buffer process)