Gnus development mailing list
 help / color / mirror / Atom feed
From: dsg@mitre.org (David S. Goldberg)
Subject: Re: [PB] window configs / new frames
Date: 24 Feb 1998 13:35:21 -0500	[thread overview]
Message-ID: <m1bbtvwrguu.fsf@blackbird.mitre.org> (raw)
In-Reply-To: Didier Verna's message of "24 Feb 1998 19:10:29 +0100"

[-- Attachment #1: Type: text/plain, Size: 899 bytes --]

>>>>> Didier Verna writes:
> [Question about editing mails/posts in another frame]

A long time ago (back in September days, I think) I provided some
feedback to the windows-config info page.  I don't know if anything's
changed enough to invalidate it, but I still take my own advice :-)
and it works Ok for me.  Here's my configuration.  Note that I don't
delete the frame after use -- I leave it there so things start up more
quickly the next time I need to do an edit (includes message,
group-edit etc).

On another note, does anyone else have trouble with Didier's messages
having two x-face headers.  They caused emacs to core dump on me.
Next time I'm going to run without a coredump size limit and submit a
bug report, but I'm curious if I'm the only one.

Hth,

Dave Goldberg
Post: The Mitre Corporation\MS B305\202 Burlington Rd.\Bedford, MA 01730
Phone: 781-271-3887
Email: dsg@mitre.org


[-- Attachment #2: Type: text/plain, Size: 5117 bytes --]

(gnus-add-configuration
 '(group
   (if gnus-carpal
       '(horizontal 1.0
		    (vertical 1.0 (group 1.0 point))
		    (vertical 0.24 (group-carpal 1.0)))
     '(vertical 1.0 (group 1.0 point)))))

(gnus-add-configuration
 '(summary
   (horizontal 1.0
	       (vertical 1.0
			 (summary 1.0 point))
	       (if gnus-carpal
		   '(vertical 0.24
			      (horizontal 15
					  (vertical 0.5
						    (summary-carpal 1.0))
					  (vertical 1.0
						    (group-carpal 1.0)))
			      (group 1.0))
		 '(vertical 0.24 (group 1.0))))))
      
(gnus-add-configuration
 '(article
   (horizontal 1.0
	       (vertical 1.0 
			 (summary 0.25 point) 
			 (article 1.0))
	       (if gnus-carpal
		   '(vertical 0.24
			      (horizontal 15
					  (vertical 0.5
						    (summary-carpal 1.0))
					  (vertical 1.0
						    (group-carpal 1.0)))
			      (group 1.0))
		 '(vertical 0.24 (group 1.0))))))
      
(gnus-add-configuration
 '(server
   (if gnus-carpal
       '(horizontal 1.0
		    (vertical 1.0 (group 1.0 point))
		    (vertical 0.24 (server-carpal 1.0)))
     '(vertical 1.0 (server 1.0 point)))))

(gnus-add-configuration
 '(browse
   (if gnus-carpal
       '(horizontal 1.0
		    (vertical 1.0 (browse 1.0 point))
		    (vertical 0.24 (browse-carpal 1.0)))
     '(vertical 1.0 (server 1.0 point)))))

(gnus-add-configuration
 '(score-trace
   (horizontal 1.0
	       (vertical 1.0 
			 (summary 0.25 point) 
			 (article 1.0)
			 ("*Score Trace*" 0.15))
	       (if gnus-carpal
		   '(vertical 0.24
			      (horizontal 15
					  (vertical 0.5
						    (summary-carpal 1.0))
					  (vertical 1.0
						    (group-carpal 1.0)))
			      (group 1.0))
		 '(vertical 0.24 (group 1.0))))))

(gnus-add-configuration
 '(score-words
   (horizontal 1.0
	       (vertical 1.0 
			 (summary 0.25 point) 
			 (article 1.0)
			 ("*Score Words*" 0.15))
	       (if gnus-carpal
		   '(vertical 0.24
			      (horizontal 15
					  (vertical 0.5
						    (summary-carpal 1.0))
					  (vertical 1.0
						    (group-carpal 1.0)))
			      (group 1.0))
		 '(vertical 0.24 (group 1.0))))))

(gnus-add-configuration
 '(message
   (frame 1.0
	  (if (not (buffer-live-p gnus-summary-buffer))
	      (car (cdr (assoc 'group gnus-buffer-configuration)))
	    (car (cdr (assoc 'summary gnus-buffer-configuration))))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (message 1.0 point)))))

(gnus-add-configuration
 '(edit-form
   (frame 1.0
	  (car (cdr (assoc 'group gnus-buffer-configuration)))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (edit-form 1.0 point)))))

(gnus-add-configuration
 '(edit-score
   (frame 1.0
	  (if (not (buffer-live-p gnus-summary-buffer))
	      (car (cdr (assoc 'group gnus-buffer-configuration)))
	    (car (cdr (assoc 'summary gnus-buffer-configuration))))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (edit-score 1.0 point)))))

(gnus-add-configuration
 '(post
   (frame 1.0
	  (if (not (buffer-live-p gnus-summary-buffer))
	      (car (cdr (assoc 'group gnus-buffer-configuration)))
	    (car (cdr (assoc 'summary gnus-buffer-configuration))))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (post 1.0 point)))))

(gnus-add-configuration
 '(reply
   (frame 1.0
	  (car (cdr (assoc 'article gnus-buffer-configuration)))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (message 1.0 point)))))
      
(gnus-add-configuration
 '(forward
   (frame 1.0
	  (car (cdr (assoc 'article gnus-buffer-configuration)))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (message 1.0 point)))))


(gnus-add-configuration
 '(reply-yank
   (frame 1.0
	  (car (cdr (assoc 'article gnus-buffer-configuration)))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (message 1.0 point)))))


(gnus-add-configuration
 '(mail-bounce
   (frame 1.0
	  (car (cdr (assoc 'article gnus-buffer-configuration)))
	  (vertical
	   ((user-position . t) (top . 1) (left . 1)
	    (name . "Gnus Edit"))
	   (message 1.0 point)))))

(gnus-add-configuration
 '(draft
   (frame 1.0
	  (car (cdr (assoc 'summary gnus-buffer-configuration)))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    (draft 1.0 point)))))
      
(gnus-add-configuration
 '(pipe
   (car (cdr (assoc 'article gnus-buffer-configuration)))))

(gnus-add-configuration
 '(bug
   (frame 1.0
	  (if (not (buffer-live-p gnus-summary-buffer))
	      (car (cdr (assoc 'group gnus-buffer-configuration)))
	    (car (cdr (assoc 'summary gnus-buffer-configuration))))
	  (vertical ((user-position . t) (top . 1) (left . 1)
		     (name . "Gnus Edit"))
		    ("*Gnus Help Bug*" 0.3)
		    ("*Gnus Bug*" 1.0 point)))))

(gnus-add-configuration
 '(compose-bounce
   (frame 1.0
	  (car (cdr (assoc 'article gnus-buffer-configuration)))
	  (vertical
	   ((user-position . t) (top . 1) (left . 1)
	    (name . "Gnus Edit"))
	   (message 1.0 point)))))

  reply	other threads:[~1998-02-24 18:35 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1998-02-24 18:10 Didier Verna
1998-02-24 18:35 ` David S. Goldberg [this message]
1998-02-25 15:39 ` Wes Hardaker
1998-02-25 16:11   ` Didier Verna
1998-02-25 20:24   ` Dave Love

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

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=m1bbtvwrguu.fsf@blackbird.mitre.org \
    --to=dsg@mitre.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.
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 NNTP newsgroup(s).