Parent Directory | Revision Log | Patch
revision 1.417.2.17 by miles, Sat Sep 4 09:19:28 2004 UTC | revision 1.417.2.18 by miles, Sat Sep 4 09:21:46 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 |