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