Re: mail-yank-original problem

Re: mail-yank-original problem

[Emanuel Berg]

Robert Thorpe <rt@robertthorpeconsulting.com> writes:

> VM is another Emacs mail program "Visual Mail".  It's
> a separate package not distributed with Emacs.  These
> days Emacs is configured to use "Message mode" for
> composing emails and newsgroup replies.  In the past
> "Sendmail mode" was used, that's where
> mail-yank-original comes from.

OK! So perhaps I was right even though I didn't know
that. But - I quick Googling and that should probably
be "View Mail", right? "Visual Mail" is much more fun,
so actually that was a disappointment.

Here are some screenshots from View Mail:

http://www.nongnu.org/viewmail/screenshots.html

I think my Gnus looks much better:

http://user.it.uu.se/~embe8573/gnus/dumps/new/

By the way, is "RMAIL" (caps only) the correct
designation for the Emacs module? Most often I think
the normal way of writing names - like Michael - should
be applied to software as well. UNIX, USENET, RMAIL, it
doesn't look good. There is a shell tool called rmail
(an "MTA->UUCP remote mail handle") but that's all
lowercase so it shouldn't be a source of confusion
(besides, I think rmail isn't on everyone's lips
either). In the sendmail.el documentation they used
Rmail.

-- 
underground experts united

Re: Colourful display? [was Re: mail-yank-original problem]

[Emanuel Berg]

Sharon Kimble <boudiccas@skimble.plus.com> writes:

> How do you get your display so colourful please? What
> theme are you using in the screenshot please?

Ho-ho-ho, "theme"! :) :) No, those colors and
everything are setup face-by-face,
variable-by-variable. Make it work, by outworking the
opposition...

Look below. I might forget something but this should be
almost all of it. The custom stuff is not really custom
- just edit it by hand! The cool thing is that you can
use eval-defun (bind it to a keystroke) to immediately
see whatever change you do, on-screen - so it is very
interactive, very nice for testing. The lame thing is
that now and then custom will screw it up the
indentation so don't bother making it neat with this
solution.

If you need to see it in context, everything should be
here exactly as I use it:

http://user.it.uu.se/~embe8573/gnus/index.html

If you are into colors I happen to have a page on that
as well:

http://user.it.uu.se/~embe8573/cols/www/index.html

- but note: the method of setting the colors (with sed)
isn't going to work for you if you use X (very
likely). However, the colors in the Elisp below ("red"
etc.) might still work and you may like them. If not,
just start working setting them one-by-one to what you
like...

OK, ready?

;; faces to be used in format lines
(setq gnus-face-0 'bold)
(setq gnus-face-1 'italic)
(setq gnus-face-2 'bold-italic)
(setq gnus-face-3 'gnus-cite-4)

;; group buffer
(setq gnus-group-line-format "%0{%L%}%3=%2{%2~(ignore \"0\")T%}%6=%G%30=%1{%6~(ignore \"0\")y%}\n") ; group line
(setq gnus-group-mode-line-format "%M%: %S") ; mode line

;; summary buffer
(setq gnus-summary-line-format "%U %2{%R%} %I%0{%a%} %1{%s%}\n") ; message line
(setq gnus-summary-mode-line-format "%G") ; mode line

(custom-set-faces
 '(bold ((t (:bold t :foreground "blue"))))
 '(bold-italic ((t (:bold t :foreground "magenta"))))
 '(gnus-button ((t (:foreground "green" :bold nil))))
 '(gnus-cite-1 ((t (:foreground "yellow" :bold nil))))
 '(gnus-cite-2 ((t (:foreground "magenta" :bold t))))
 '(gnus-cite-3 ((t (:foreground "green" :bold nil))))
 '(gnus-cite-4 ((t (:foreground "red" :bold t))))
 '(gnus-cite-attribution ((t (:foreground "yellow" :bold nil))))
 '(gnus-group-mail-1 ((t (:foreground "yellow" :bold t))))
 '(gnus-group-mail-1-empty ((t (:foreground "yellow" :bold nil))))
 '(gnus-group-mail-2 ((t (:foreground "cyan" :bold t))))
 '(gnus-group-mail-2-empty ((t (:foreground "cyan" :bold nil))))
 '(gnus-group-mail-3 ((t (:foreground "white" :bold t))))
 '(gnus-group-mail-3-empty ((t (:foreground "white" :bold nil))))
 '(gnus-group-mail-low ((t (:foreground "black" :bold t))))
 '(gnus-group-mail-low-empty ((t (:foreground "black" :bold t))))
 '(gnus-group-news-1 ((t (:foreground "cyan" :bold t))))
 '(gnus-group-news-1-empty ((t (:foreground "cyan" :bold nil))))
 '(gnus-group-news-2 ((t (:foreground "cyan" :bold t))))
 '(gnus-group-news-2-empty ((t (:foreground "cyan" :bold nil))))
 '(gnus-group-news-3 ((t (:foreground "blue" :bold t))))
 '(gnus-group-news-3-empty ((t (:foreground "blue" :bold nil))))
 '(gnus-group-news-4 ((t (:foreground "blue" :bold t))))
 '(gnus-group-news-4-empty ((t (:foreground "blue" :bold nil))))
 '(gnus-group-news-5 ((t (:foreground "green" :bold t))))
 '(gnus-group-news-5-empty ((t (:foreground "green" :bold nil))))
 '(gnus-group-news-6 ((t (:foreground "blue" :bold t))))
 '(gnus-group-news-6-empty ((t (:foreground "blue" :bold nil))))
 '(gnus-summary-normal-ancient ((t (:foreground "blue" :background "black" :bold nil))))
 '(gnus-summary-normal-read ((t (:foreground "yellow" :background "black" :bold nil))))
 '(gnus-summary-normal-ticked ((t (:foreground "red" :background "black" :bold t))))
 '(gnus-summary-selected ((t (:foreground "white" :background "blue" :bold nil))))
 '(gnus-summary-selected ((t (:foreground "white" :background "blue" :bold nil))))
 '(italic ((t (:bold nil :foreground "green"))))
 '(message-cited-text ((t (:foreground "green" :bold nil))))
 '(message-header-cc ((t (:foreground "blue" :bold t))))
 '(message-header-name ((t (:foreground "black" :bold t))))
 '(message-header-newsgroups ((t (:foreground "yellow" :bold nil))))
 '(message-header-other ((t (:foreground "white" :bold nil))))
 '(message-header-subject ((t (:foreground "magenta" :bold t))))
 '(message-header-to ((t (:foreground "green" :bold t))))
 '(mm-uu-extract ((t (:background "black"))))
 '(widget-button ((t (:foreground "green" :bold nil))))
 '(widget-field ((t (:foreground "black" :background "yellow")))) )

-- 
underground experts united

Re: Colourful display? [was Re: mail-yank-original problem]

[Emanuel Berg]

Emanuel Berg <embe8573@student.uu.se> writes:

> Sharon Kimble <boudiccas@skimble.plus.com> writes:
>
>> How do you get your display so colourful please?
>> What theme are you using in the screenshot please?
>
> Ho-ho-ho, "theme"! :) :) No, those colors and
> everything are setup face-by-face,
> variable-by-variable. Make it work, by outworking the
> opposition...

When I first read that ("theme"), I thought it was
bizarre because it was so far from how it was, just
installing or picking a theme. Come to think of it, my
configuration could just as well be put in a `progn'
and executed once, I suppose. That would make it a
theme. Are there Gnus (and/or Emacs) themes around?
Mine should be called the CRT theme. Either that, or
"Mindfullness", like the tattoo of the Assassins, the
Persian order that was put down in the 13th century by
the Mongols. It has been the theme of my work in this
project...

By the way, it is no coincidence that a girl was the
first ever to be interested in this. I once read a book
with material on Pac-Man (the Japanese game, not
Filipino fighter). When they made that game they did
the monsters in different colors, just so it would
possibly attract some female fighters! I don't know if
it worked, though (?).

I actually don't know why Emacs is so conservative
color-wise. Colors are helpful (productive), but they
also make you feel good, so you get even more
productive. It is not coincidence that children are
afraid of the dark, that people wear black at funerals,
and that girls put red on their lips and blue over
their eyes. The emotional response to black is
negative, and to the lack of colors -
indifference... Just do it as the kids and girls like
it, it'll be the right way.

Example - the buffer menu:

http://user.it.uu.se/~embe8573/buffer_menu.png

Compare that to:

(dired "~")

Why do dired look so dull? A more colorful Emacs would
be great PR. Colors should be just like font-lock in a
programming mode. But... sometimes you have to stretch
your imagination. Whenever there is a spare color, and
nothing sensible (that can be formulated), it is better
to just put it to use. Colors are a help to the
intellect but they are very emotional at the same
time. Best if they make sense but still good just to
have.

Oh, and yes. In the previous message on this, I forgot
to include the mode line with the faces. Literally
makes it or breaks it.

'(mode-line          ((t (:foreground "white" :background "blue" :bold t))))
'(mode-line-inactive ((t (:foreground "white" :background "red"  :bold t))))

-- 
underground experts united