bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Stephen Berman
Subject: bug#7049: 24.0.50; Feature request: tool-bar-position defcustom
Date: Fri, 17 Sep 2010 17:03:19 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux)

On Fri, 17 Sep 2010 15:36:28 +0200 Jan Djärv <address@hidden> 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





reply via email to

[Prev in Thread] Current Thread [Next in Thread]