Re: [Jed-users-l] key binding & arrow keys

[Mike Ma <zhtx10@xxxxxxxxx>]

Hi, Ulli

Ulli Horlacher wrote:
> next_buffer() is in buf.sl, but there is no previous_buffer()
>
> So I have modified next_buffer() to:
>
> %!%+
> %\function{previous_buffer}
> %\synopsis{Cycle back through the list of buffers}
> %\usage{Void previous_buffer ()}
> %\description
> %   Switches to the previous in the list of buffers.
> %\seealso{next_buffer, buffer_list, list_buffers}
> %!%-
> public define previous_buffer() {
>    variable n, buf, cbuf = whatbuf ();
>
>    n = buffer_list();		    %/* buffers on stack */
>    _stk_reverse(n);
>    buf = ();
>    n--;
>    loop (n) {
>      buf = ();
>      n--;
>      if (buf[0] == ' ') continue;    % hidden buffers like "<mini>"
>      sw2buf(buf);
>      _pop_n(n);
>      return;
>    }
> }
Looks good! Thank you! How about putting it into buf.sl?
There is a problem of navigate:  it can't switch to the first buffer if 
JED is in last buffer.
Hope can fix it soon. Thanks. :-)

Mike.
_______________________________________________
Jed-users-l mailing list
Jed-users-l@xxxxxxxx
http://mailman.jtan.com/mailman/listinfo/jed-users-l