summaryrefslogtreecommitdiff
path: root/lisp/fringe.el
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2005-07-09 20:43:32 +0000
committerJuri Linkov <juri@jurta.org>2005-07-09 20:43:32 +0000
commitfeed81e98e2c5addbdb25f7d1a632f25240ef0be (patch)
treea6b30fac8250ee5e879ff139f607b9e886ad3773 /lisp/fringe.el
parent10bb671b10d9bf7652e40d03273cce9d66fb8ee9 (diff)
downloademacs-feed81e98e2c5addbdb25f7d1a632f25240ef0be.tar.gz
(fringe-mode): Add period in docstring.
(fringe-query-style): Build prompt depending on `all-frames' arg.
Diffstat (limited to 'lisp/fringe.el')
-rw-r--r--lisp/fringe.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/fringe.el b/lisp/fringe.el
index 0346341d536..1265e8308a0 100644
--- a/lisp/fringe.el
+++ b/lisp/fringe.el
@@ -150,7 +150,7 @@ To set this variable in a Lisp program, use `set-fringe-mode' to make
it take real effect.
Setting the variable with a customization buffer also takes effect.
If you only want to modify the appearance of the fringe in one frame,
-you can use the interactive function `set-fringe-style'"
+you can use the interactive function `set-fringe-style'."
:type '(choice (const :tag "Default width" nil)
(const :tag "No fringes" 0)
(const :tag "Only right" (0 . nil))
@@ -174,7 +174,10 @@ If ALL-FRAMES, the negation of the fringe values in
Otherwise the negation of the fringe value in the currently selected
frame parameter is used."
(let ((mode (intern (completing-read
- "Select fringe mode for all frames (type ? for list): "
+ (concat
+ "Select fringe mode for "
+ (if all-frames "all frames" "selected frame")
+ " (type ? for list): ")
'(("none") ("default") ("left-only")
("right-only") ("half") ("minimal"))
nil t))))