1327 |
} |
} |
1328 |
} |
} |
1329 |
|
|
1330 |
|
/* If there's no other frame on the same kboard, get out of |
1331 |
|
single-kboard state if we're in it for this kboard. */ |
1332 |
|
{ |
1333 |
|
Lisp_Object frames; |
1334 |
|
/* Some frame we found on the same kboard, or nil if there are none. */ |
1335 |
|
Lisp_Object frame_on_same_kboard; |
1336 |
|
|
1337 |
|
frame_on_same_kboard = Qnil; |
1338 |
|
|
1339 |
|
for (frames = Vframe_list; |
1340 |
|
CONSP (frames); |
1341 |
|
frames = XCDR (frames)) |
1342 |
|
{ |
1343 |
|
Lisp_Object this; |
1344 |
|
struct frame *f1; |
1345 |
|
|
1346 |
|
this = XCAR (frames); |
1347 |
|
if (!FRAMEP (this)) |
1348 |
|
abort (); |
1349 |
|
f1 = XFRAME (this); |
1350 |
|
|
1351 |
|
if (FRAME_KBOARD (f) == FRAME_KBOARD (f1)) |
1352 |
|
frame_on_same_kboard = this; |
1353 |
|
} |
1354 |
|
|
1355 |
|
if (NILP (frame_on_same_kboard)) |
1356 |
|
not_single_kboard_state (FRAME_KBOARD (f)); |
1357 |
|
} |
1358 |
|
|
1359 |
|
|
1360 |
/* If we've deleted this keyboard's default_minibuffer_frame, try to |
/* If we've deleted this keyboard's default_minibuffer_frame, try to |
1361 |
find another one. Prefer minibuffer-only frames, but also notice |
find another one. Prefer minibuffer-only frames, but also notice |
1362 |
frames with other windows. */ |
frames with other windows. */ |