* riece-ctcp.el (riece-handle-ctcp-version-request): Format target
authorueno <ueno>
Thu, 29 Jan 2004 03:42:10 +0000 (03:42 +0000)
committerueno <ueno>
Thu, 29 Jan 2004 03:42:10 +0000 (03:42 +0000)
identity before display.
(riece-handle-ctcp-ping-request): Ditto.
(riece-handle-ctcp-clientinfo-request): Ditto.

lisp/ChangeLog
lisp/riece-ctcp.el

index 1e4c66a..759e3e9 100644 (file)
@@ -1,3 +1,10 @@
+2004-01-29  Daiki Ueno  <ueno@unixuser.org>
+
+       * riece-ctcp.el (riece-handle-ctcp-version-request): Format target
+       identity before display.
+       (riece-handle-ctcp-ping-request): Ditto.
+       (riece-handle-ctcp-clientinfo-request): Ditto.
+
 2004-01-28  Daiki Ueno  <ueno@unixuser.org>
 
        * Riece: Version 0.1.8 released.
index 8c8ba1c..8baad1d 100644 (file)
        (format "CTCP VERSION from %s (%s) to %s"
               user
               (riece-strip-user-at-host (riece-prefix-user-at-host prefix))
-              target))
+              (riece-format-identity target t)))
       "\n"))))
 
 (defun riece-handle-ctcp-ping-request (prefix target string)
        (format "CTCP PING from %s (%s) to %s"
               user
               (riece-strip-user-at-host (riece-prefix-user-at-host prefix))
-              target))
+              (riece-format-identity target t)))
       "\n"))))
 
 (defun riece-handle-ctcp-clientinfo-request (prefix target string)
        (format "CTCP CLIENTINFO from %s (%s) to %s"
               user
               (riece-strip-user-at-host (riece-prefix-user-at-host prefix))
-              target))
+              (riece-format-identity target t)))
       "\n"))))
 
 (defun riece-handle-ctcp-action-request (prefix target string)