/[emacs]/emacs/src/frame.c
ViewVC logotype

Diff of /emacs/src/frame.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.284.2.3 by miles, Fri Nov 21 00:36:18 2003 UTC revision 1.284.2.4 by miles, Fri Jul 23 04:42:22 2004 UTC
# Line 1327  The functions are run with one arg, the Line 1327  The functions are run with one arg, the
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.  */

Legend:
Removed from v.1.284.2.3  
changed lines
  Added in v.1.284.2.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26