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
commitcbdc2fc0f9a13550b5386013d9a93b62be3ca70c (patch)
treee2d26c512ffb4980c7450a91302eb6c504b9d398 /lisp/fringe.el
parent114d2409ed9bc8e3fde74fc436d164e3f76561e0 (diff)
downloademacs-cbdc2fc0f9a13550b5386013d9a93b62be3ca70c.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))))