Re: bug? the position of scroll-bar

[storm@cua.dk (Kim F. Storm)]

Masatake YAMATO <jet@gyve.org> writes:

> (progn (set-window-scroll-bars (selected-window) 10 'hippopotamus)
>        (window-scroll-bars (selected-window)))
> => (10 2 hippopotamus nil)
> 
> hippopotamus is accepted. 

It shouldn't, so your fix is ok (read on)...

>     set-window-scroll-bars is a built-in function.
>     (set-window-scroll-bars WINDOW WIDTH &optional VERTICAL-TYPE HORIZONTAL-TYPE)
> 
>     Set width and type of scroll bars of window WINDOW.
>     If window is nil, set scroll bars of the currently selected window.
>     Second parameter WIDTH specifies the pixel width for the scroll bar;
>     this is automatically adjusted to a multiple of the frame column width.
>     Third parameter VERTICAL-TYPE specifies the type of the vertical scroll
>     bar: left, right, or nil.
>     ^^^^^^^^^^^^^^^^^^^^^^^^^
>     A width of nil and type of t means to use the frame's corresponding value.
                         ^^^^^^^^^

You need to allow Qt as well:

> I've tried to add following code 
> 
>   if (!(EQ (vertical_type, Qnil)

Add:
        || EQ (vertical_type, Qt)



-- 
Kim F. Storm <storm@cua.dk> http://www.cua.dk