diff options
| author | Karoly Lorentey | 2004-07-18 21:49:24 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2004-07-18 21:49:24 +0000 |
| commit | 31d7e9bc5a474c2da8c40f4812ea3e09cd5fb82c (patch) | |
| tree | 729a3c238e43ed5625290e994d9ef0d09c18241a /src/frame.c | |
| parent | 4cb2afc64f004ba91ff0bd37cf8ca6669b228988 (diff) | |
| parent | cdfa3eccb179fe579a5e38949d0a2ad3d2757524 (diff) | |
| download | emacs-31d7e9bc5a474c2da8c40f4812ea3e09cd5fb82c.tar.gz emacs-31d7e9bc5a474c2da8c40f4812ea3e09cd5fb82c.zip | |
Merged in changes from CVS trunk.
Patches applied:
* lorentey@elte.hu--2004/emacs--hacks--0--patch-2
Prevent special events from appending dashes to the echo string.
* lorentey@elte.hu--2004/emacs--hacks--0--patch-4
Added ChangeLog entry.
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-454
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-455
Bash the dashes
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-456
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-457
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-458
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-459
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-460
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-219
Diffstat (limited to 'src/frame.c')
| -rw-r--r-- | src/frame.c | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/src/frame.c b/src/frame.c index 41ee5a64bd5..9a0563c6f76 100644 --- a/src/frame.c +++ b/src/frame.c | |||
| @@ -1553,6 +1553,36 @@ The functions are run with one arg, the frame to be deleted. */) | |||
| 1553 | } | 1553 | } |
| 1554 | } | 1554 | } |
| 1555 | 1555 | ||
| 1556 | /* If there's no other frame on the same kboard, get out of | ||
| 1557 | single-kboard state if we're in it for this kboard. */ | ||
| 1558 | { | ||
| 1559 | Lisp_Object frames; | ||
| 1560 | /* Some frame we found on the same kboard, or nil if there are none. */ | ||
| 1561 | Lisp_Object frame_on_same_kboard; | ||
| 1562 | |||
| 1563 | frame_on_same_kboard = Qnil; | ||
| 1564 | |||
| 1565 | for (frames = Vframe_list; | ||
| 1566 | CONSP (frames); | ||
| 1567 | frames = XCDR (frames)) | ||
| 1568 | { | ||
| 1569 | Lisp_Object this; | ||
| 1570 | struct frame *f1; | ||
| 1571 | |||
| 1572 | this = XCAR (frames); | ||
| 1573 | if (!FRAMEP (this)) | ||
| 1574 | abort (); | ||
| 1575 | f1 = XFRAME (this); | ||
| 1576 | |||
| 1577 | if (FRAME_KBOARD (f) == FRAME_KBOARD (f1)) | ||
| 1578 | frame_on_same_kboard = this; | ||
| 1579 | } | ||
| 1580 | |||
| 1581 | if (NILP (frame_on_same_kboard)) | ||
| 1582 | not_single_kboard_state (FRAME_KBOARD (f)); | ||
| 1583 | } | ||
| 1584 | |||
| 1585 | |||
| 1556 | /* If we've deleted this keyboard's default_minibuffer_frame, try to | 1586 | /* If we've deleted this keyboard's default_minibuffer_frame, try to |
| 1557 | find another one. Prefer minibuffer-only frames, but also notice | 1587 | find another one. Prefer minibuffer-only frames, but also notice |
| 1558 | frames with other windows. */ | 1588 | frames with other windows. */ |