Re: Function: window-fringes

[Nick Roberts <nickrob@snap.net.nz>]

 > > 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)));
  }