From 1149ffdb07563832d2593320d79970c8266ae85c Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 16 Sep 2013 23:22:02 +0000 Subject: [PATCH] message.el (message-expand-group, message-completion-in-region): Correct the order of start and end of a region --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/message.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 9c11d17645c..fc8ff9fd695 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2013-09-16 Katsumi Yamaoka + + * message.el (message-expand-group, message-completion-in-region): + Correct the order of start and end of a region. + 2013-09-13 Glenn Morris * mml2015.el (gnus-create-image): Autoload it. diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index d6d6b3f8bed..ba4593fad45 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -7982,12 +7982,12 @@ those headers." group) collection)) gnus-active-hashtb)) - (message-completion-in-region e b collection))) + (message-completion-in-region b e collection))) (defalias 'message-completion-in-region (if (fboundp 'completion-in-region) 'completion-in-region - (lambda (e b hashtb) + (lambda (b e hashtb) (let* ((string (buffer-substring b e)) (completions (all-completions string hashtb)) comp) -- 2.39.2