bug#7049: 24.0.50; Feature request: tool-bar-position defcustom

[Stephen Berman]

On Fri, 17 Sep 2010 15:36:28 +0200 Jan Djärv <jan.h.d@swipnet.se> wrote:

> Stephen Berman skrev 2010-09-16 22.06:
>> It would be convenient to have the Gtk+ tool bar placement (top, bottom,
>> left, right) be managed by Custom.  Currently, changing the default
>> permanently in user-init-file requires modifying the frame parameters.
>>
>
> default-frame-alist is in custom, and you can select where to show tool bar in
> the menu and then save options.  Isn't that enough?
>
>       Jan D.

Well, it's not quite as comfortable for newbies, I think.  I was
thinking along the lines of scroll-bar-mode; in fact, how about this:

(defcustom tool-bar-position 'top
  "Specify whether to have a tool bar, and on which side.
Possible values are nil (no tool bar), `top' (tool bar on top),
`bottom' (tool bar at bottom), `left' (tool bar on left) and
`right' (tool bar on right)."
  :type '(choice (const :tag "none (nil)" nil)
                 (const top)
                 (const bottom)
                 (const left)
                 (const right))
  :group 'frames
  :initialize 'custom-initialize-default
  :set (lambda (sym val)
         (if val
             (modify-all-frames-parameters
              (list (cons 'tool-bar-position val) (cons 'tool-bar-lines 1)))
           (modify-all-frames-parameters (list (cons 'tool-bar-lines nil))))))

Steve Berman