Mercurial > emacs
diff lisp/fringe.el @ 64192:258eefd93f5c
(fringe-mode): Add period in docstring.
(fringe-query-style): Build prompt depending on `all-frames' arg.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Sat, 09 Jul 2005 20:43:32 +0000 |
parents | 31e07400e56c |
children | e72e59c66778 fbb2bea03df9 |
line wrap: on
line diff
--- a/lisp/fringe.el Sat Jul 09 16:16:54 2005 +0000 +++ b/lisp/fringe.el Sat Jul 09 20:43:32 2005 +0000 @@ -150,7 +150,7 @@ 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 @@ 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))))