From: ueno Date: Wed, 22 Oct 2003 02:56:06 +0000 (+0000) Subject: * riece-button.el (riece-user-button-finger): Pass an identity X-Git-Tag: riece-0_1_5~20 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b846150f43ae9faeaa00d2c55be93e3c1b248092;p=elisp%2Friece.git * riece-button.el (riece-user-button-finger): Pass an identity object instead of the prefix. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f766267..126440d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2003-10-22 Daiki Ueno + * riece-button.el (riece-user-button-finger): Pass an identity + object instead of the prefix. + * riece-ctcp.el: Require 'riece-highlight. (riece-ctcp-action-face): New face. (riece-ctcp-action-face): New variable. diff --git a/lisp/riece-button.el b/lisp/riece-button.el index 2582772..f75ac2f 100644 --- a/lisp/riece-button.el +++ b/lisp/riece-button.el @@ -182,8 +182,7 @@ This function is used as a callback for a channel button." (defun riece-user-button-finger () (interactive) - (riece-command-finger - (riece-identity-prefix (get-text-property (point) 'riece-identity)))) + (riece-command-finger (get-text-property (point) 'riece-identity))) (defun riece-make-identity-button-map () (let ((map (make-sparse-keymap)))