From: Juanma Barranquero <lekktu@gmail.com>
To: Eli Zaretskii <eliz@gnu.org>
Cc: 14970-done@debbugs.gnu.org
Subject: bug#14970: crash deleting frames
Date: Sun, 28 Jul 2013 19:34:23 +0200 [thread overview]
Message-ID: <CAAeL0SQC5HWOJ6e87rXVQY-wmSye_T_yeStHuG56mzmsC3Gy+g@mail.gmail.com> (raw)
In-Reply-To: <83y58qy4p6.fsf@gnu.org>
On Sun, Jul 28, 2013 at 7:28 PM, Eli Zaretskii <eliz@gnu.org> wrote:
> Did you create the frames manually, or do you have some Lisp to
> sweeten the pill?
I was using this. Dimensions are harcoded to make frames be totally or
partially offscren in my 1920x1040 workarea.
If you create the frames and then save the frame config with desktop
and restore with the current default, those frames that are totally
offscreen should be moved onscreen. Once that has finished, you can
start clicking Close buttons happily.
(defvar test-frame-alist-list ;; 1920 x 1040
'(
((name . "top full (400 -3000)") (left . 400) (top + -3000))
((name . "top part (500 -200)") (left . 500) (top + -200)) ;ok
((name . "bot full (400 4000)") (left . 400) (top . 4000))
((name . "bot part (500 900)") (left . 500) (top . 900)) ;ok
((name . "left full (-3000 300)") (left + -3000) (top . 300))
((name . "left part (-400 300)") (left + -400) (top . 300)) ;ok
((name . "right full (4000 200)") (left . 4000) (top . 200))
((name . "right part (1800 300)") (left . 1800) (top . 300)) ;ok
((name . "upleft full (-2000 -2000)") (left + -2000) (top + -2000))
((name . "upleft part (-100 -100)") (left + -100) (top + -100)) ;ok
((name . "dnleft full (-2000 3000)") (left + -2000) (top . 3000))
((name . "dnleft part (-300 800)") (left + -300) (top . 800)) ;ok
((name . "upright full (3000 -2000)") (left . 3000) (top + -2000))
((name . "upright part (1700 -200)") (left . 1700) (top + -200)) ;ok
((name . "dnright full (3000 3000)") (left . 3000) (top . 3000))
((name . "dnright part (1600 900)") (left . 1600) (top . 900)) ;ok
((name . "top full width") (left . 100) (top + -1000) (width . 400))
((name . "top full height") (left . 100) (top + -6000)
(height . 300))
((name . "top full full") (left . 100) (top + -6000) (width .
400) (height . 300))
((name . "top part width") (left . 100) (top + -300) (width . 400))
((name . "top part height") (left . 200) (top + -3900)
(height . 300))
((name . "top part full") (left . 300) (top + -4200) (width .
400) (height . 300))
((name . "left full width") (left + -4000) (top . 200) (width . 400))
((name . "left full height") (left + -4000) (top . 300)
(height . 300))
((name . "left full full") (left + -4000) (top . 400) (width .
400) (height . 300))
((name . "left part width") (left + -3000) (top . 200) (width . 400))
((name . "left part height") (left + -300) (top . 300)
(height . 300))
((name . "left part full") (left + -3200) (top . 400) (width .
400) (height . 300))
((name . "bot full width") (left . 100) (top . 2000) (width . 400))
((name . "bot full height") (left . 200) (top . 3000)
(height . 300))
((name . "bot full full") (left . 300) (top . 4000) (width .
400) (height . 300))
((name . "bot part width") (left . 100) (top . 700) (width . 400))
((name . "bot part height") (left . 200) (top . 800)
(height . 300))
((name . "bot part full") (left . 300) (top . 900) (width . 400)
(height . 300))
((name . "right full width") (left . 3000) (top . 200) (width . 400))
((name . "right full height") (left . 3000) (top . 300)
(height . 300))
((name . "right full full") (left . 3000) (top . 400) (width .
400) (height . 300))
((name . "right part width") (left . 1600) (top . 200) (width . 400))
((name . "right part height") (left . 1700) (top . 300)
(height . 300))
((name . "right part full") (left . 1800) (top . 400) (width .
400) (height . 300))
((name . "upleft full width") (left + -3000) (top + -1000) (width . 400))
((name . "upleft full height") (left + -3000) (top + -6000)
(height . 300))
((name . "upleft full full") (left + -3000) (top + -6000) (width
. 400) (height . 300))
((name . "upleft part width") (left + -3000) (top + -300) (width . 400))
((name . "upleft part height") (left + -500) (top + -3900)
(height . 300))
((name . "upleft part full") (left + -3200) (top + -4200) (width
. 400) (height . 300))
))
(defun make-all ()
(interactive)
(dolist (frame-cfg test-frame-alist-list)
(modify-frame-parameters (make-frame) frame-cfg)))
next prev parent reply other threads:[~2013-07-28 17:34 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-07-28 0:22 bug#14970: crash deleting frames Juanma Barranquero
2013-07-28 1:08 ` Juanma Barranquero
2013-07-28 8:39 ` martin rudalics
2013-07-28 15:28 ` Eli Zaretskii
2013-07-29 7:54 ` martin rudalics
2013-07-29 15:29 ` Eli Zaretskii
2013-07-29 17:03 ` martin rudalics
2013-07-28 15:25 ` Eli Zaretskii
2013-07-28 17:04 ` Juanma Barranquero
2013-07-28 17:28 ` Eli Zaretskii
2013-07-28 17:34 ` Juanma Barranquero [this message]
2013-07-28 17:37 ` Juanma Barranquero
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAAeL0SQC5HWOJ6e87rXVQY-wmSye_T_yeStHuG56mzmsC3Gy+g@mail.gmail.com \
--to=lekktu@gmail.com \
--cc=14970-done@debbugs.gnu.org \
--cc=eliz@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).