Mercurial > emacs
changeset 3295:4d405f172c79
(reset_buffer): Clear mark_active field here.
(reset_buffer_local_variables): Not here.
(Fswitch_to_buffer, Fpop_to_buffer): Return the buffer.
(Fmove_overlay): Fix data types in last change.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 30 May 1993 04:51:33 +0000 |
| parents | 4a10e4c34b11 |
| children | 9425c2065167 |
| files | src/buffer.c |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/buffer.c Sun May 30 04:49:24 1993 +0000 +++ b/src/buffer.c Sun May 30 04:51:33 1993 +0000 @@ -338,7 +338,7 @@ until an unused name is found, and then return that name.\n\ Optional second argument ignore specifies a name that is okay to use\n\ \(if it is in the sequence to be tried)\n\ -even if a buffer with that name exists. +even if a buffer with that name exists.") (name, ignore) register Lisp_Object name, ignore; { @@ -831,7 +831,7 @@ : selected_window, buf); - return Qnil; + return buf; } DEFUN ("pop-to-buffer", Fpop_to_buffer, Spop_to_buffer, 1, 2, 0, @@ -851,7 +851,7 @@ Fset_buffer (buf); record_buffer (buf); Fselect_window (Fdisplay_buffer (buf, other)); - return Qnil; + return buf; } DEFUN ("current-buffer", Fcurrent_buffer, Scurrent_buffer, 0, 0, 0, @@ -1573,7 +1573,7 @@ b = XBUFFER (buffer); /* If the overlay has changed buffers, do a thorough redisplay. */ - if (! EQ (buffer, XMARKER (OVERLAY_START (overlay))->buffer)) + if (b != XMARKER (OVERLAY_START (overlay))->buffer) windows_or_buffers_changed = 1; else /* Redisplay the area the overlay has just left, or just enclosed. */