Mercurial > emacs
comparison src/frame.c @ 46015:3988483dc2b7
(frames_bury_buffer): Function deleted.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 26 Jun 2002 08:34:29 +0000 |
parents | 01b93e5e53a7 |
children | 3f111801efb4 |
comparison
equal
deleted
inserted
replaced
46014:e5675426ff4c | 46015:3988483dc2b7 |
---|---|
1813 | 1813 |
1814 FOR_EACH_FRAME (tail, frame) | 1814 FOR_EACH_FRAME (tail, frame) |
1815 { | 1815 { |
1816 XFRAME (frame)->buffer_list | 1816 XFRAME (frame)->buffer_list |
1817 = Fdelq (buffer, XFRAME (frame)->buffer_list); | 1817 = Fdelq (buffer, XFRAME (frame)->buffer_list); |
1818 } | |
1819 } | |
1820 | |
1821 /* Move BUFFER to the end of the buffer-list of each frame. */ | |
1822 | |
1823 void | |
1824 frames_bury_buffer (buffer) | |
1825 Lisp_Object buffer; | |
1826 { | |
1827 Lisp_Object frame, tail; | |
1828 | |
1829 FOR_EACH_FRAME (tail, frame) | |
1830 { | |
1831 struct frame *f = XFRAME (frame); | |
1832 Lisp_Object found; | |
1833 | |
1834 found = Fmemq (buffer, f->buffer_list); | |
1835 if (!NILP (found)) | |
1836 f->buffer_list = nconc2 (Fdelq (buffer, f->buffer_list), | |
1837 Fcons (buffer, Qnil)); | |
1838 } | 1818 } |
1839 } | 1819 } |
1840 | 1820 |
1841 /* Modify the alist in *ALISTPTR to associate PROP with VAL. | 1821 /* Modify the alist in *ALISTPTR to associate PROP with VAL. |
1842 If the alist already has an element for PROP, we change it. */ | 1822 If the alist already has an element for PROP, we change it. */ |