branch: externals/hiddenquote
commit 3005e4e9a9abb67448f703baf5c641cccbd5750d
Author: Mauro Aranda <maurooara...@gmail.com>
Commit: Mauro Aranda <maurooara...@gmail.com>
No need to set the character's value if it is a space
* hiddenquote.el (hiddenquote-character-notify): Set the value
conditionally.
---
hiddenquote.el | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/hiddenquote.el b/hiddenquote.el
index b6cd5537cd..6f02b34cd6 100644
--- a/hiddenquote.el
+++ b/hiddenquote.el
@@ -1024,10 +1024,11 @@ Calls `widget-default-notify' with WIDGET, CHILD and
EVENT as args."
(widget-get
parent
:hiddenquote-word-number)))))))
- (setq val (buffer-substring-no-properties start (1+ start)));end))
- (widget-value-set widget (if hiddenquote-upcase-chars
- (upcase val)
- val))
+ (setq val (buffer-substring-no-properties start (1+ start)))
+ (unless (string= val " ")
+ (widget-value-set widget (if hiddenquote-upcase-chars
+ (upcase val)
+ val)))
;; Hack! Restore the cursor-sensor-functions property here,
;; because `widget-value-set' drops it.
(add-text-properties (1- (widget-get parent :from))
