[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-27 c5e5839: Fix customization of 'display-fill-column-indicator-ch
From: |
Eli Zaretskii |
Subject: |
emacs-27 c5e5839: Fix customization of 'display-fill-column-indicator-character' |
Date: |
Sat, 9 May 2020 05:36:06 -0400 (EDT) |
branch: emacs-27
commit c5e583977629f55ad438ef0b0c210a9eeb94ae6d
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>
Fix customization of 'display-fill-column-indicator-character'
* lisp/cus-start.el (display-fill-column-indicator-character): Fix
the customization form. (Bug#41145)
---
lisp/cus-start.el | 11 +++++++++--
1 file changed, 9 insertions(+), 2 deletions(-)
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index dff4d9a..bd32c7c 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -771,9 +771,16 @@ since it could result in memory overflow and make Emacs
crash."
:safe (lambda (value) (or (booleanp value) (integerp value))))
(display-fill-column-indicator-character
display-fill-column-indicator
- character
+ (choice
+ (character :tag "Use U+2502 to indicate fill column"
+ :value ?│)
+ (character :tag "Use | to indicate fill column"
+ :value ?|)
+ (const :tag "If possible, use U+2502 to indicate fill column,
otherwise use |"
+ :value nil)
+ character)
"27.1"
- :safe characterp)
+ :safe (lambda (value) (or (characterp value) (booleanp value))))
;; xfaces.c
(scalable-fonts-allowed display boolean "22.1")
;; xfns.c
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-27 c5e5839: Fix customization of 'display-fill-column-indicator-character',
Eli Zaretskii <=