Gnus development mailing list
 help / color / mirror / Atom feed
* customization: window configurations
@ 1999-11-18 17:44 Bill White
  1999-11-18 17:57 ` Karl Kleinpaste
                   ` (2 more replies)
  0 siblings, 3 replies; 4+ messages in thread
From: Bill White @ 1999-11-18 17:44 UTC (permalink / raw)


Aftger Randal and Karl's customizations for gnus-group-line-format,
I'm wondering what other nifty things folks have come up with.

For starters, a screenshot of my gnus window configuration can be
found at <url:http://members.wri.com/billw/pgnus.jpg>,[1] and here's the
.gnus code that does it (inspired by code found in Bryan Johnson's
gnus-filterhist.el[2])

Footnotes: 
[1] Sorry about the crappy quality - I scaled it down to 75% to fit
better on more monitors.

[2] <url:http://www.comsecmilnavpac.net/elisp/>

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; Gnus window layout with filter history

; Date: 16 Nov 1999 17:17:22 -0500
; Sender: beej@honky.eng.mindspring.net
; Message-ID: <m3puxat72l.fsf@honky.eng.mindspring.net>

(setq load-path (cons (expand-file-name "~/emacs-lisp/bryan-johnson") load-path))
(require 'gnus-filterhist)
(add-hook 'gnus-group-mode-hook 'gnus-filter-history)
(add-hook 'gnus-after-getting-new-news-hook 'gnus-filter-history)

(gnus-add-configuration
 '(group
   (horizontal 0.4
   (vertical 0.25
                  (group 0.85 point)
                  ("*Filter History*" 1.0)
                  )
   ("*scratch*" 1.0)
   )))

(gnus-add-configuration
 '(summary
   (horizontal 1.0
   (vertical 0.25
                  (group 0.85 point)
                  ("*Filter History*" 1.0)
                  )
   (summary 1.0 point)
   )))

(gnus-add-configuration
 '(article
   (horizontal 1.0
   (vertical 0.25
                  (group 0.85 point)
                  ("*Filter History*" 1.0)
                  )
   (vertical 1.0
             (summary 0.25 point)
             (article 1.0))
   )))

(gnus-add-configuration
 '(message
   (horizontal 1.0
   (vertical 0.25
                  (group 0.85)
                  ("*Filter History*" 1.0)
                  )
   (vertical 1.0
             (message 1.0 point))
   )))

bw
-- 
Bill White . billw@wolfram.com . http://members.wri.com/billw
"No ma'am, we're musicians."



^ permalink raw reply	[flat|nested] 4+ messages in thread

* Re: customization: window configurations
  1999-11-18 17:44 customization: window configurations Bill White
@ 1999-11-18 17:57 ` Karl Kleinpaste
  1999-11-18 18:40 ` Fwd: " BrYan P. Johnson
  1999-12-01 16:54 ` Lars Magne Ingebrigtsen
  2 siblings, 0 replies; 4+ messages in thread
From: Karl Kleinpaste @ 1999-11-18 17:57 UTC (permalink / raw)


Bill White <billw@wolfram.com> writes:
> For starters, a screenshot of my gnus window configuration can be
> found at <url:http://members.wri.com/billw/pgnus.jpg>,[1] and here's the
> .gnus code that does it

My preferred window layout is on an XEmacs that's 207x89:

+-----------------------+
|         |             |
| *Group* |   *Tree*    |
|         |             |
+-----------------------+
|         |             |
|*Summary*|  *Article*  |
|         |             |
|         |             |
|         |             |
|         |             |
+-----------------------+

;; Gnus display configuration bits.
(defun gnus-karl-wide-config ()
  "*Definitions of window usage: Wide screens."
  (interactive)
  (gnus-add-configuration
   '(summary
     (horizontal 1.0
		 (vertical 1.0
			   (group 0.25) (summary 1.0 point)))))
  (gnus-add-configuration
   '(article
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (summary 1.0 point))
		 (vertical 1.0 (tree  0.25) (article 1.0)))))
  (gnus-add-configuration
   '(message
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (message 1.0 point))
		 (vertical 1.0 (tree  0.25) (article 1.0)))))
  (gnus-add-configuration
   '(reply
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (message 1.0 point))
		 (vertical 1.0 (tree  0.25) (article 1.0)))))
  (gnus-add-configuration
   '(reply-yank
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (message 1.0 point))
		 (vertical 1.0 (tree  0.25) (article 1.0)))))
  (gnus-add-configuration
   '(post
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (post 1.0 point))
		 (vertical 1.0 (tree  0.25) (article 1.0)))))
  (gnus-add-configuration
   '(forward
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (message 1.0 point))
		 (vertical 1.0 (tree  0.25) (article 1.0)))))
  (gnus-add-configuration
   '(edit-score
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (summary 1.0))
		 (vertical 1.0 (tree  0.25) (edit-score 1.0 point)))))
  (gnus-add-configuration
   '(score-trace
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (summary 1.0 point))
		 (vertical 1.0 ("*Score Trace*" 0.25) (article 1.0)))))
  (gnus-add-configuration
   '(mail-forward
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (summary 1.0))
		 (vertical 1.0 (tree  0.25) (mail 1.0 point)))))
  (gnus-add-configuration
   '(pipe
     (horizontal 1.0
		 (vertical 0.4 (group 0.25) (summary 1.0 point))
		 (vertical 1.0 ("*Shell Command Output*" 0.25) (article 1.0))))))
(defun gnus-karl-narrow-config ()
  "*Definitions of window usage: Narrow screens."
  (interactive)
  (gnus-add-configuration
   '(summary
     (vertical 1.0 (group 0.25) (summary 1.0 point))))
  (gnus-add-configuration
   '(article
     (vertical 1.0 (group 0.25) (summary 0.2 point) (article 1.0))))
  (gnus-add-configuration
   '(message
     (vertical 1.0 (group 0.25) (message 0.2 point) (article 1.0))))
  (gnus-add-configuration
   '(reply
     (vertical 1.0 (group 0.25) (message 0.2 point) (article 1.0))))
  (gnus-add-configuration
   '(reply-yank
     (vertical 1.0 (group 0.25) (message 0.2 point) (article 1.0))))
  (gnus-add-configuration
   '(post
     (vertical 1.0 (group 0.25) (post    0.2 point) (article 1.0))))
  (gnus-add-configuration
   '(forward
     (vertical 1.0 (group 0.25) (message 0.2 point) (article 1.0))))
  (gnus-add-configuration
   '(edit-score
     (vertical 1.0 (group 0.25) (summary 0.2) (edit-score 1.0 point))))
  (gnus-add-configuration
   '(score-trace
     (vertical 1.0 (group 0.25) (summary 0.2 point) ("*Score Trace*" 1.0))))
  (gnus-add-configuration
   '(mail-forward
     (vertical 1.0 (group 0.25) (summary 0.2) (mail 1.0 point))))
  (gnus-add-configuration
   '(pipe
     (vertical 1.0 ("*Shell Command Output*" 0.25) (summary 1.0 point)))))
;;
(if (> (frame-width) 200)
    (gnus-karl-wide-config) (gnus-karl-narrow-config))


^ permalink raw reply	[flat|nested] 4+ messages in thread

* Fwd: customization: window configurations
  1999-11-18 17:44 customization: window configurations Bill White
  1999-11-18 17:57 ` Karl Kleinpaste
@ 1999-11-18 18:40 ` BrYan P. Johnson
  1999-12-01 16:54 ` Lars Magne Ingebrigtsen
  2 siblings, 0 replies; 4+ messages in thread
From: BrYan P. Johnson @ 1999-11-18 18:40 UTC (permalink / raw)


>>>>> On 18 Nov 1999 11:44:43 -0600, Bill White <billw@wolfram.com> said:

    > Aftger Randal and Karl's customizations for
    > gnus-group-line-format, I'm wondering what other nifty things
    > folks have come up with.

    > For starters, a screenshot of my gnus window configuration can
    > be found at <url:http://members.wri.com/billw/pgnus.jpg>,[1] and
    > here's the .gnus code that does it (inspired by code found in
    > Bryan Johnson's gnus-filterhist.el[2])

I've put a screenshot of mine at
<URL:http://www.comsecmilnavpac.net/elisp/gnus-window-cfg.jpg>. It's
pretty large, as I haven't scaled it any.

I prefer the summary at the bottom (since my eyes focus on the article
at the top). When I send a message, though, I leave the Group and
Filter History buffers at the left, and have just the outgoing message
at the right. In fact, I try to always leave the Group buffer at the
left so that I can easily switch to other Groups if I need to. The
code is below.

BrYan
-- 
Triangle man hates Particle man.


-------
 (gnus-add-configuration
  '(group
    (horizontal 1.0
    (vertical 0.25
		     (group 0.85 point)
		     ("*Filter History*" 1.0)
		     )
    ("*scratch*" 1.0)
    )))

;;Why change things for the big ugly summary?
 (gnus-add-configuration
  '(summary
       (horizontal 1.0
		   (vertical 0.25
			     (group 0.85 point)
			     ("*Filter History*" 1.0)
			     )

 	      (vertical 1.0
	      ("*scratch*" 1.0)
	      (horizontal 0.25
			  (summary 0.66 point)
			  (vertical 1.0
			  ("*BBDB*" 0.5)
			  (tree 1.0)
	     )
	      )))))

 ;Make the Article Buffer show up nice and pretty. 
 (gnus-add-configuration
  '(article
       (horizontal 1.0
		   (vertical 0.25
			     (group 0.85 point)
			     ("*Filter History*" 1.0)
			     )

 	      (vertical 1.0
	      (article 1.0)
	      (horizontal 0.25
			  (summary 0.66 point)
			  (vertical 1.0
			  ("*BBDB*" 0.5)
			  (tree 1.0)
	     )
	      )))))
 
(gnus-add-configuration
  '(message
    (horizontal 1.0
    (vertical 0.25
		     (group 0.85)
		     ("*Filter History*" 1.0)
		     )
    (message 1.0 point)
    )))


 (gnus-add-configuration
  '  (post
    (horizontal 1.0
    (vertical 0.25
		     (group 0.85)
		     ("*Filter History*" 1.0)
		     )
    (post 1.0 point)
    )))
    
 (gnus-add-configuration
  '  (reply
    (horizontal 1.0
    (vertical 0.25
		     (group 0.85)
		     ("*Filter History*" 1.0)
		     )
    (message 1.0 point)
    )))


 (gnus-add-configuration
  '  (forward
    (horizontal 1.0
    (vertical 0.25
		     (group 0.85)
		     ("*Filter History*" 1.0)
		     )
    (message 1.0 point)
    )))
 

(gnus-add-configuration
  '  (reply-yank
      (horizontal 1.0
		  (vertical 0.25
			    (group 0.85)
			    ("*Filter History*" 1.0)
			    )
		  (message 1.0 point)
		  )))



^ permalink raw reply	[flat|nested] 4+ messages in thread

* Re: customization: window configurations
  1999-11-18 17:44 customization: window configurations Bill White
  1999-11-18 17:57 ` Karl Kleinpaste
  1999-11-18 18:40 ` Fwd: " BrYan P. Johnson
@ 1999-12-01 16:54 ` Lars Magne Ingebrigtsen
  2 siblings, 0 replies; 4+ messages in thread
From: Lars Magne Ingebrigtsen @ 1999-12-01 16:54 UTC (permalink / raw)


Bill White <billw@wolfram.com> writes:

> For starters, a screenshot of my gnus window configuration can be
> found at <url:http://members.wri.com/billw/pgnus.jpg>,[1] and here's the
> .gnus code that does it (inspired by code found in Bryan Johnson's
> gnus-filterhist.el[2])

[...]

Karl Kleinpaste <karl@justresearch.com> writes:

> My preferred window layout is on an XEmacs that's 207x89:

[...]

"BrYan P. Johnson" <bilko@onebabyzebra.com> writes:

> I've put a screenshot of mine at
> <URL:http://www.comsecmilnavpac.net/elisp/gnus-window-cfg.jpg>. It's
> pretty large, as I haven't scaled it any.

Does anybody want to maintain a page of links to gnus window config
screenshots with the corresponding gnus-buffer-configuration values?

-- 
(domestic pets only, the antidote for overdose, milk.)
   larsi@gnus.org * Lars Magne Ingebrigtsen


^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~1999-12-01 16:54 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1999-11-18 17:44 customization: window configurations Bill White
1999-11-18 17:57 ` Karl Kleinpaste
1999-11-18 18:40 ` Fwd: " BrYan P. Johnson
1999-12-01 16:54 ` Lars Magne Ingebrigtsen

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).