smiley.el

smiley.el

[Dr. Pete Gieser]

This needs 

(require 'annotations)

Pete
-- 

Peter Gieser, Ph.D.                    Phone:  (352) 392-5198 ext. 443
POG Statistical Office                 FAX:    (352) 392-8162
104 North Main Street  #600            Email:  pete@pog.ufl.edu
Gainesville, FL 32601                  

                 * Send me email to receive my PGP public key *

Smiley.el

[Greg Stark]

Ever wish you smiley.el worked on a terminal? Well it can't, but it there are
two smiley faces in the standard pc console font that it could use. I don't
know what console escape sequence to use to access them except on linux. On
linux the escape sequence to switch fonts is: ^[[11m and the characters are 1
and 2.

So:
(aset standard-display-table 25 (vector (create-glyph "\^[[11m\^A\^[[10m")))
(aset standard-display-table 26 (vector (create-glyph "\^[[11m\^B\^[[10m")))

make ^X and ^Z display as smiley faces on a terminal on linux i386 
(and probably on an alpha with a vga card).

One caveat, W3 already plays with the display-table for for ^A-^O in the
standard-display-table. I want to make it use a private display-table but as
it stands it would be nice if Gnus used either higher control characters,
control characters with the high bit set, or a private display-table.

greg

Re: Smiley.el

[Lars Magne Ingebrigtsen]

Greg Stark <gsstark@MIT.EDU> writes:

> (aset standard-display-table 25 (vector (create-glyph "\^[[11m\^A\^[[10m")))
> (aset standard-display-table 26 (vector (create-glyph "\^[[11m\^B\^[[10m")))
> 
> make ^X and ^Z display as smiley faces on a terminal on linux i386 
> (and probably on an alpha with a vga card).

I think this might make a fun addition to smiley.el if anybody wants
to implement it.

It should definitely use a display table local to the article buffer,
though.  

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

Re: Smiley.el

[Hrvoje Niksic]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Greg Stark <gsstark@MIT.EDU> writes:
> 
> > (aset standard-display-table 25 (vector (create-glyph "\^[[11m\^A\^[[10m")))
> > (aset standard-display-table 26 (vector (create-glyph "\^[[11m\^B\^[[10m")))
> > 
> > make ^X and ^Z display as smiley faces on a terminal on linux i386 
> > (and probably on an alpha with a vga card).
> 
> I think this might make a fun addition to smiley.el if anybody wants
> to implement it.
> 
> It should definitely use a display table local to the article buffer,
> though.

It should also be conditionalized to not work on XEmacs, because
XEmacs display-table model cannot handle stuff like "\e[11m\C-a\e[10m"
in its disp-table entries.

-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
Then...  his face does a complete change of expression.  It goes from
a "Vengeance is mine" expression, to a "What the fuck" blank look.