From afebd489266effd456224449ef0cc937db7c40c5 Mon Sep 17 00:00:00 2001 From: ueno Date: Fri, 27 Aug 2004 08:31:20 +0000 Subject: [PATCH] * riece-commands.el (riece-command-complete-user): Move point to the end of the current word. --- lisp/ChangeLog | 5 +++++ lisp/riece-commands.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1e501ab..661e828 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-08-27 Daiki Ueno + + * riece-commands.el (riece-command-complete-user): Move point to + the end of the current word. + 2004-08-23 Daiki Ueno * riece-irc.el (riece-irc-open-server): Display error message if diff --git a/lisp/riece-commands.el b/lisp/riece-commands.el index c16b391..3a80f99 100644 --- a/lisp/riece-commands.el +++ b/lisp/riece-commands.el @@ -680,6 +680,7 @@ If prefix argument ARG is non-nil, toggle frozen status." (if (equal current completion) (with-output-to-temp-buffer "*Help*" (display-completion-list all)) + (re-search-forward "\\>" nil t) (delete-region (point) (- (point) (length current))) (insert completion)))))) -- 1.7.10.4