diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-09-29 06:19:35 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-09-29 06:19:35 +0000 |
| commit | 0e2c9c702ce48cb20ee4afbf2796035cc7effda5 (patch) | |
| tree | d3bb60ff0184a390e8e1f014beabdd96c3754728 /src/editfns.c | |
| parent | a080486e57ba53ae98ea061603219d97b6cc75c7 (diff) | |
| download | emacs-0e2c9c702ce48cb20ee4afbf2796035cc7effda5.tar.gz | |
* editfns.c (save_excursion_save, save_excursion_restore):
Formatting tweaked for readability.
Diffstat (limited to 'src/editfns.c')
| -rw-r--r-- | src/editfns.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/editfns.c b/src/editfns.c index 846de70d67c..cf7efd5a953 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -275,10 +275,12 @@ store it in a Lisp variable. Example:\n\ 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 @@ save_excursion_restore (info) 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; } |