[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/sotlisp d28cdf7 07/11: Only expand abbrev when (sotlisp
From: |
Stefan Monnier |
Subject: |
[elpa] externals/sotlisp d28cdf7 07/11: Only expand abbrev when (sotlisp--whitespace-char-p last-command-event) |
Date: |
Fri, 26 Mar 2021 22:43:54 -0400 (EDT) |
branch: externals/sotlisp
commit d28cdf766e398465d958db729f1694a298969cca
Author: Artur Malabarba <artur@endlessparentheses.com>
Commit: Artur Malabarba <artur@endlessparentheses.com>
Only expand abbrev when (sotlisp--whitespace-char-p last-command-event)
---
sotlisp.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/sotlisp.el b/sotlisp.el
index 44a7089..1aa8b31 100644
--- a/sotlisp.el
+++ b/sotlisp.el
@@ -135,10 +135,12 @@ Returns non-nil if, after moving backwards by a sexp,
either
non-nil."
(save-excursion
(ignore-errors
- (skip-chars-backward (rx alnum))
- (and (sotlisp--code-p)
- (or (sotlisp--function-form-p)
- (sotlisp--function-quote-p))))))
+ (and (sotlisp--whitespace-char-p last-command-event)
+ (sotlisp--code-p)
+ (progn
+ (skip-chars-backward (rx alnum))
+ (or (sotlisp--function-form-p)
+ (sotlisp--function-quote-p)))))))
(defun sotlisp--whitespace-p ()
"Non-nil if current `self-insert'ed char is whitespace."
- [elpa] externals/sotlisp c2936c5 01/11: Fix some typos., (continued)
- [elpa] externals/sotlisp c2936c5 01/11: Fix some typos., Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp cc5730c 08/11: Only expand abbrev when last-command-event is not a symbol char, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp cf14e18 09/11: Recognize argument lists in "let*" forms, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp ae38976 06/11: Merge pull request #10 from Wilfred/fix-typo, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp cc04912 05/11: Fix typo, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp 773b680 03/11: add lispy-mode., Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp 3ecc917 02/11: fix some typos, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp 89dfed2 04/11: Merge pull request #9 from jkitchin/master, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp f7add76 10/11: Recognize argument lists in more def- forms, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp ed2356a 11/11: Merge pull request #12 from yuhan0/patch-1, Stefan Monnier, 2021/03/26
- [elpa] externals/sotlisp d28cdf7 07/11: Only expand abbrev when (sotlisp--whitespace-char-p last-command-event),
Stefan Monnier <=