Mercurial > emacs
changeset 1254:c7e7e3438711
* editfns.c (save_excursion_save, save_excursion_restore):
Formatting tweaked for readability.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Tue, 29 Sep 1992 06:19:35 +0000 |
| parents | 7afcf7be0d30 |
| children | ff06503c93b4 |
| files | src/editfns.c |
| diffstat | 1 files changed, 6 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/editfns.c Tue Sep 29 04:54:28 1992 +0000 +++ b/src/editfns.c Tue Sep 29 06:19:35 1992 +0000 @@ -275,10 +275,12 @@ Lisp_Object save_excursion_save () { - register int visible = XBUFFER (XWINDOW (selected_window)->buffer) == current_buffer; + register int visible = (XBUFFER (XWINDOW (selected_window)->buffer) + == current_buffer); return Fcons (Fpoint_marker (), - Fcons (Fcopy_marker (current_buffer->mark), visible ? Qt : Qnil)); + Fcons (Fcopy_marker (current_buffer->mark), + visible ? Qt : Qnil)); } Lisp_Object @@ -302,7 +304,8 @@ Fset_marker (current_buffer->mark, tem, Fcurrent_buffer ()); unchain_marker (tem); tem = Fcdr (Fcdr (info)); - if (!NILP (tem) && current_buffer != XBUFFER (XWINDOW (selected_window)->buffer)) + if (!NILP (tem) + && current_buffer != XBUFFER (XWINDOW (selected_window)->buffer)) Fswitch_to_buffer (Fcurrent_buffer (), Qnil); return Qnil; }