From: Daiki Ueno Date: Tue, 18 May 2004 04:09:11 +0000 (+0000) Subject: * riece-ignore.el (riece-ignore-user): Renamed from X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=commitdiff_plain;h=f87287068fefe6dc73981cceddf8749e8fc1d232;ds=sidebyside * riece-ignore.el (riece-ignore-user): Renamed from riece-ignore-by-user. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d86b58a..84315a9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-05-18 Daiki Ueno + + * riece-ignore.el (riece-ignore-user): Renamed from + riece-ignore-by-user. + 2004-05-18 Daiki Ueno * riece-signal.el (riece-connect-signal): Fixed doc. diff --git a/lisp/riece-ignore.el b/lisp/riece-ignore.el index 32c36bb..f8c277f 100644 --- a/lisp/riece-ignore.el +++ b/lisp/riece-ignore.el @@ -51,7 +51,7 @@ Otherwise, they are left there but not visible." (if pointer (setcar pointer (nth 1 (riece-signal-args signal)))))) -(defun riece-ignore-by-user (user toggle) +(defun riece-ignore-user (user toggle) (interactive (let ((completion-ignore-case t)) (list (if current-prefix-arg @@ -93,7 +93,7 @@ Otherwise, they are left there but not visible." (defun riece-ignore-insinuate () (add-hook 'riece-message-filter-functions 'riece-ignore-message-filter) (define-key riece-command-mode-map - "\C-ck" 'riece-ignore-by-user)) + "\C-ck" 'riece-ignore-user)) (provide 'riece-ignore)