/[emacs]/emacs/src/indent.c
ViewVC logotype

Diff of /emacs/src/indent.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.175 by monnier, Sun Jan 23 22:18:26 2005 UTC revision 1.176 by rms, Sun Apr 24 21:35:43 2005 UTC
# Line 65  static double position_indentation P_ (( Line 65  static double position_indentation P_ ((
65    
66  int current_column_bol_cache;  int current_column_bol_cache;
67    
68    extern Lisp_Object Qfontification_functions;
69    
70  /* Get the display table to use for the current buffer.  */  /* Get the display table to use for the current buffer.  */
71    
72  struct Lisp_Char_Table *  struct Lisp_Char_Table *
# Line 2047  whether or not it is currently displayed Line 2049  whether or not it is currently displayed
2049    struct window *w;    struct window *w;
2050    Lisp_Object old_buffer;    Lisp_Object old_buffer;
2051    struct gcpro gcpro1;    struct gcpro gcpro1;
2052      int count = SPECPDL_INDEX ();
2053    
2054    CHECK_NUMBER (lines);    CHECK_NUMBER (lines);
2055    if (! NILP (window))    if (! NILP (window))
# Line 2064  whether or not it is currently displayed Line 2067  whether or not it is currently displayed
2067        XSETBUFFER (w->buffer, current_buffer);        XSETBUFFER (w->buffer, current_buffer);
2068      }      }
2069    
2070      /* Don't fontify text that we just move across.  */
2071      specbind (Qfontification_functions, Qnil);
2072    
2073    if (noninteractive)    if (noninteractive)
2074      {      {
2075        struct position pos;        struct position pos;
# Line 2109  whether or not it is currently displayed Line 2115  whether or not it is currently displayed
2115    if (BUFFERP (old_buffer))    if (BUFFERP (old_buffer))
2116      w->buffer = old_buffer;      w->buffer = old_buffer;
2117    
2118      unbind_to (count, Qnil);
2119    RETURN_UNGCPRO (make_number (it.vpos));    RETURN_UNGCPRO (make_number (it.vpos));
2120  }  }
2121    

Legend:
Removed from v.1.175  
changed lines
  Added in v.1.176

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26