Mercurial > hg > xemacs-beta
diff src/window.c @ 321:19dcec799385 r21-0-58
Import from CVS: tag r21-0-58
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:46:44 +0200 |
parents | afd57c14dfc8 |
children | 8bec6624d99b |
line wrap: on
line diff
--- a/src/window.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/window.c Mon Aug 13 10:46:44 2007 +0200 @@ -1635,7 +1635,8 @@ /* this is not right, but much easier than doing what is right. */ /* w->start_at_line_beg = 0; */ /* WTF is the above supposed to mean? GE */ - w->start_at_line_beg = beginning_of_line_p (XBUFFER (w->buffer), XINT (pos)); + w->start_at_line_beg = beginning_of_line_p (XBUFFER (w->buffer), + marker_position (w->start[CURRENT_DISP])); if (NILP (noforce)) w->force_start = 1; w->redo_modeline = 1; @@ -3167,7 +3168,7 @@ Fset_marker (w->sb_point, w->start[CURRENT_DISP], buffer); /* set start_at_line_beg correctly. GE */ w->start_at_line_beg = beginning_of_line_p (XBUFFER (buffer), - XBUFFER (buffer)->last_window_start); + marker_position (w->start[CURRENT_DISP])); w->force_start = 0; /* Lucid fix */ SET_LAST_MODIFIED (w, 1); SET_LAST_FACECHANGE (w); @@ -5670,7 +5671,7 @@ { Lisp_Object fb = Qnil; #ifdef HAVE_TTY - fb = Fcons (Fcons (list1 (Qtty), Qzero), fb); + fb = Fcons (Fcons (list1 (Qtty), make_int (1)), fb); #endif #ifdef HAVE_X_WINDOWS fb = Fcons (Fcons (list1 (Qx), make_int (3)), fb);