emacs-devel
[Top][All Lists]
Advanced

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

Re: Function: window-fringes


From: Nick Roberts
Subject: Re: Function: window-fringes
Date: Tue, 15 Aug 2006 22:05:01 +1200

 > > On a text-only terminal, I think window-fringes should always return
 > > (0 0 nil).
 > 
 > Ok.  Pls. fix it.

Well it's a bit of a shot in the dark.  In future with multi-tty, where
some windows might be graphic and others text-only, it might be better to
condition on the selected window:

  if (WINDOW_FRAME_COLUMN_WIDTH (w) == 1)

But maybe that's not orthodox at the moment.

-- 
Nick                                           http://www.inet.net.nz/~nickrob

*** window.c    19 Jul 2006 01:29:55 +1200      1.553
--- window.c    15 Aug 2006 21:59:53 +1200      
***************
*** 6687,6696 ****
       Lisp_Object window;
  {
    struct window *w = decode_window (window);
!   return Fcons (make_number (WINDOW_LEFT_FRINGE_WIDTH (w)),
!               Fcons (make_number (WINDOW_RIGHT_FRINGE_WIDTH (w)),
!                      Fcons ((WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w) ?
!                              Qt : Qnil), Qnil)));
  }
  
  
--- 6687,6700 ----
       Lisp_Object window;
  {
    struct window *w = decode_window (window);
!   if (EQ (Vwindow_system, Qnil))
!     return Fcons (make_number (0), (Fcons (make_number (0),
!                                          (Fcons (Qnil, Qnil)))));
!   else    
!     return Fcons (make_number (WINDOW_LEFT_FRINGE_WIDTH (w)),
!                 Fcons (make_number (WINDOW_RIGHT_FRINGE_WIDTH (w)),
!                        Fcons ((WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w) ?
!                                Qt : Qnil), Qnil)));
  }
  
  




reply via email to

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