Mercurial > emacs
changeset 17235:5905b103d7ea
(frames_bury_buffer): New function.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 23 Mar 1997 20:49:24 +0000 |
parents | bda734eef575 |
children | c0fa9ba95c05 |
files | src/frame.c |
diffstat | 1 files changed, 16 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/frame.c Sun Mar 23 20:48:31 1997 +0000 +++ b/src/frame.c Sun Mar 23 20:49:24 1997 +0000 @@ -1716,6 +1716,22 @@ } } +/* Move BUFFER to the end of the buffer-list of each frame. */ + +void +frames_bury_buffer (buffer) + Lisp_Object buffer; +{ + Lisp_Object frame, tail; + + FOR_EACH_FRAME (tail, frame) + { + XFRAME (frame)->buffer_list + = nconc2 (Fdelq (buffer, XFRAME (frame)->buffer_list), + Fcons (buffer, Qnil)); + } +} + /* Modify the alist in *ALISTPTR to associate PROP with VAL. If the alist already has an element for PROP, we change it. */