Parent Directory | Revision Log | Patch
revision 1.445.2.7 by miles, Tue Aug 3 00:03:00 2004 UTC | revision 1.445.2.8 by miles, Tue Aug 10 07:46:40 2004 UTC | |
---|---|---|
# | Line 1828 window_list_1 (window, minibuf, all_fram | Line 1828 window_list_1 (window, minibuf, all_fram |
1828 | rest = Fmemq (window, list); | rest = Fmemq (window, list); |
1829 | if (!NILP (rest) && !EQ (rest, list)) | if (!NILP (rest) && !EQ (rest, list)) |
1830 | { | { |
1831 | for (tail = list; XCDR (tail) != rest; tail = XCDR (tail)) | for (tail = list; !EQ (XCDR (tail), rest); tail = XCDR (tail)) |
1832 | ; | ; |
1833 | XSETCDR (tail, Qnil); | XSETCDR (tail, Qnil); |
1834 | list = nconc2 (rest, list); | list = nconc2 (rest, list); |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |