From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 16 Oct 2020 15:36:20 +0000 (+0200)
Subject: Make erc expand the final abbrev
X-Git-Tag: emacs-28.0.90~5593
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d5cb3cb9a45dd9028789e10088a6ca491c370d10;p=emacs.git

Make erc expand the final abbrev

* lisp/erc/erc.el (erc-send-current-line): Expand abbrevs at the
end of lines (bug#42854).
---

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 1d5506e2816..6481446ba5e 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -5472,6 +5472,10 @@ submitted line to be intentional."
             (time-less-p erc-accidental-paste-threshold-seconds
 			 (time-subtract now erc-last-input-time)))
         (save-restriction
+          ;; If there's an abbrev at the end of the line, expand it.
+          (when (and abbrev-mode
+                     (eolp))
+            (expand-abbrev))
           (widen)
           (if (< (point) (erc-beg-of-input-line))
               (erc-error "Point is not in the input area")