MIME in Red Gnus, and picons, yes, its two in one =)

MIME in Red Gnus, and picons, yes, its two in one =)

[Brian Oneill]

First off, I heard that there is MIME support in Red Gnus, is this correct? 
Or was edh just pulling my leg? The man page that i can pull up doesn't
seem to help much, other then let me know that i know i'm not looking for a
mime =) (i did try what was in the man, now my gnus just beeps at me everytime
i open up a document =)

Secondly, is it possible in a .gnus to run a function _only_ if you are running
in an X environment? I have no need for picons when i'm at home on my vt100 =)

thanks in advance,
Brian

-- 
----------------------+-----------------+------------------------------------
Brian T. O'Neill      | Member		|  "I'm sorry for the length of this 
btoneill@member.com   | Services	|  letter. I didn't have time to make
Systems Programmer    | International	|  it shorter" - Pascal 
----------------------+-----------------+------------------------------------

Re: MIME in Red Gnus, and picons, yes, its two in one =)

[Steven L Baur]

>>>>> "Brian" == Brian Oneill <btoneill@member.com> writes:

Brian> First off, I heard that there is MIME support in Red Gnus, is
Brian> this correct?

MIME support is available separately in the form of the tm (Tools for
MIME package).  Directions for obtaining tm are in the Gnus FAQ.

Tools for MIME will be distributed standard with XEmacs 19.15.

Brian> Secondly, is it possible in a .gnus to run a function _only_ if
Brian> you are running in an X environment?

See the sample.emacs included with XEmacs for lots and lots of
examples.

(when (and (string-match "XEmacs\\|Lucid" emacs-version)
           (equal (console-type) 'x))
  ; Picons initialization
)

-- 
steve@miranova.com baur
Unsolicited commercial e-mail will be billed at $250/message.
What are the last two letters of "doesn't" and "can't"?
Coincidence?  I think not.

Re: MIME in Red Gnus, and picons, yes, its two in one =)

[Steinar Bang]

>>>>> Steven L Baur <steve@miranova.com>:

>>>>> "Brian" == Brian Oneill <btoneill@member.com> writes:
Brian> First off, I heard that there is MIME support in Red Gnus, is
Brian> this correct?

> MIME support is available separately in the form of the tm (Tools for
> MIME package).  Directions for obtaining tm are in the Gnus FAQ.

> Tools for MIME will be distributed standard with XEmacs 19.15.

Some more information on MIME and Emacs, can be found at
	<URL:http://bmrc.berkeley.edu/~trey/emacs/mime.html>

Re: MIME in Red Gnus, and picons, yes, its two in one =)

[Eric Hendrickson]

Steven L Baur <steve@miranova.com> writes:

> (when (and (string-match "XEmacs\\|Lucid" emacs-version)
>            (equal (console-type) 'x))
>   ; Picons initialization
> )

Would checking the console-type work for Gnus' gnus-add-configuration?
I played with that a bit without success...  I start up Gnus in a tty
XEmacs within screen, and then start up X frames from that.  This
allows me to read my mail on my X display at work or recover my screen
and access my running XEmacs/gnus from anywhere else.  Except that the
tty Gnus gets the gnus-add-configuration that is designed for a big X
display, like so:

(gnus-add-configuration
 '(article
   (horizontal 1.0
	       (vertical 0.5
			 (group 0.25)
			 (summary 1.0 point))
	       (vertical 1.0
			 (picons 5)
			 (article 1.0)))))

which is....  undesirable on the tty Emacs.  Is there a way to have
different gnus-add-configurations in force depending on the console
type?  The answer (and gnus-add-configuration itself) is not clear to
me from reading that section of the manual...  :(

Thanks for any suggestions!
		Eric
-- 
The best definition of a gentleman is a man who can play the accordion --
but doesn't.
		-- Tom Crichton

Re: MIME in Red Gnus, and picons, yes, its two in one =)

[Wesley.Hardaker]

Eric Hendrickson <edh@lenti.med.umn.edu> writes:

> Would checking the console-type work for Gnus' gnus-add-configuration?

FYI, here's my current setup based on window-system types:

;; general setup -- X specific
(cond ((eq window-system 'x)
       (gnus-add-configuration
	'(article 
	  (frame 1.0
		 (vertical 1.0 
			   (summary .35 point)
			   (article 1.0))
			   )))
       (gnus-add-configuration
	'(summary
		 (vertical 1.0 
			   (summary 1.0 point)
			   (group 7)
			   )
			   ))
       (setq gnus-tree-minimize-window nil)
       ;; picons hacks
       (add-hook 'gnus-article-display-hook 'gnus-group-display-picons t)
       (add-hook 'gnus-article-display-hook 'gnus-article-display-picons t)
       (setq gnus-picons-refresh-before-display t)
       (setq gnus-use-picons t)
       (setq gnus-picons-database "/home/whardake/faces")
       (setq gnus-picons-display-where 'article)

       )
;; tty specific
      (t
       (gnus-add-configuration
	'(article (vertical 1.0 
			    (group 7)
			    (summary .25 point)
			    (article 1.0))))

       (gnus-add-configuration
	'(summary (vertical 1.0 
			    (group 7)
			    (summary 1.0 point))))))