mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00
Code Issues Releases Activity

(Fnewline): If we don't do the first SET_PT,

Browse Source 
clear flag, so we don't do the second SET_PT.
This commit is contained in:
Richard M. Stallman 1993-08-11 19:09:15 +00:00
parent 8bfce8a770
commit dbf8da3952
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/cmds.c
View File

@ -253,14 +253,17 @@ In Auto Fill mode, if no numeric arg, break the preceding line if it's long.")
features all do nothing in that case. */
flag = point > BEGV && FETCH_CHAR (point - 1) == '\n';
if (flag)
/* We cannot use this optimization if properties change
in the vicinity.
??? We need to check for change hook properties, etc. */
#ifdef USE_TEXT_PROPERTIES
if (point - 1 > BEGV && ! property_change_between_p (point - 2, point))
/* We cannot use this optimization if properties change
in the vicinity.
??? We need to check for change hook properties, etc. */
if (flag)
if (! (point - 1 > BEGV && ! property_change_between_p (point - 2, point)))
flag = 0;
#endif
SET_PT (point - 1);
if (flag)
SET_PT (point - 1);
while (XINT (arg) > 0)
{