* What will they think of next: [fwd]
@ 1996-06-11 20:33 Eric Hendrickson
1996-06-11 20:49 ` William Perry
0 siblings, 1 reply; 9+ messages in thread
From: Eric Hendrickson @ 1996-06-11 20:33 UTC (permalink / raw)
------- start of forwarded message (RFC 934 encapsulation) -------
From: Keith Bostic <bostic@bsdi.com>
To: /dev/null@mongoose.bostic.com
Subject: What will they think of next:
Date: Tue, 11 Jun 1996 12:05:01 -0400 (EDT)
Message-Id: <199606111605.MAA10593@mongoose.bostic.com>
From: Margo Seltzer <margo@eecs.harvard.edu>
Microsoft Word (which is used by Microsoft Exchange) now has a
feature which changes emoticons into actual smiley-faced icons.
------- end -------
^ permalink raw reply [flat|nested] 9+ messages in thread
* What will they think of next: [fwd]
1996-06-11 20:33 What will they think of next: [fwd] Eric Hendrickson
@ 1996-06-11 20:49 ` William Perry
1996-06-11 21:58 ` Colin Rafferty
1996-06-11 23:25 ` Kevin Cheek
0 siblings, 2 replies; 9+ messages in thread
From: William Perry @ 1996-06-11 20:49 UTC (permalink / raw)
Cc: ding
Eric Hendrickson writes:
>------- start of forwarded message (RFC 934 encapsulation) -------
>From: Keith Bostic <bostic@bsdi.com>
>To: /dev/null@mongoose.bostic.com
>Subject: What will they think of next:
>Date: Tue, 11 Jun 1996 12:05:01 -0400 (EDT)
>Message-Id: <199606111605.MAA10593@mongoose.bostic.com>
>
>From: Margo Seltzer <margo@eecs.harvard.edu>
>
>Microsoft Word (which is used by Microsoft Exchange) now has a
>feature which changes emoticons into actual smiley-faced icons.
we simply _HAVE_ to implement this. Anyone know of a good smiley icon
repository? :)
-Bill P.
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-11 20:49 ` William Perry
@ 1996-06-11 21:58 ` Colin Rafferty
1996-06-12 2:37 ` Lars Magne Ingebrigtsen
1996-06-11 23:25 ` Kevin Cheek
1 sibling, 1 reply; 9+ messages in thread
From: Colin Rafferty @ 1996-06-11 21:58 UTC (permalink / raw)
William Perry writes:
> Eric Hendrickson forwards:
>> Microsoft Word (which is used by Microsoft Exchange) now has a
>> feature which changes emoticons into actual smiley-faced icons.
> we simply _HAVE_ to implement this. Anyone know of a good smiley icon
> repository? :)
How about a function gnus-article-hide-emoticon (W W e) that I can add
to gnus-article-prepare-hook so that I never have to see them ever again
in my life?
Seriously, all that we need is a good regexp, and we can be rid of them
forever:
(while (re-search-forward "\\s-*[[<(#]?[:;|%][-=*^]?[()|P!?/\\][]>)]?"
nil t)
(replace-match "" nil nil))
--
Colin
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-11 20:49 ` William Perry
1996-06-11 21:58 ` Colin Rafferty
@ 1996-06-11 23:25 ` Kevin Cheek
1996-06-12 2:39 ` Lars Magne Ingebrigtsen
` (2 more replies)
1 sibling, 3 replies; 9+ messages in thread
From: Kevin Cheek @ 1996-06-11 23:25 UTC (permalink / raw)
Cc: ding
William Perry <wmperry@monolith.spry.com> writes:
> we simply _HAVE_ to implement this. Anyone know of a good smiley icon
> repository? :)
In case anyone actually wants some smiley icons, I got 15 small tiffs
from the next-icon mail list. They're available via HTTP at
<http://mmg2.im.med.umich.edu/~kcheek/smileys/>.
--
Kevin Cheek <kcheek@umich.edu>
"Always remember that you are unique - just like everybody else."
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-11 21:58 ` Colin Rafferty
@ 1996-06-12 2:37 ` Lars Magne Ingebrigtsen
0 siblings, 0 replies; 9+ messages in thread
From: Lars Magne Ingebrigtsen @ 1996-06-12 2:37 UTC (permalink / raw)
Colin Rafferty <craffert@spspme.ml.com> writes:
> How about a function gnus-article-hide-emoticon (W W e) that I can add
> to gnus-article-prepare-hook so that I never have to see them ever again
> in my life?
>
> Seriously, all that we need is a good regexp, and we can be rid of them
> forever:
>
> (while (re-search-forward "\\s-*[[<(#]?[:;|%][-=*^]?[()|P!?/\\][]>)]?"
> nil t)
> (replace-match "" nil nil))
It's a bit more complicated (as most things are :-).
Which has now been demonstrated. :-) So there'll have to be some
additional logic, but it's definitely doable.
--
"Yes. The journey through the human heart
would have to wait until some other time."
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-11 23:25 ` Kevin Cheek
@ 1996-06-12 2:39 ` Lars Magne Ingebrigtsen
1996-06-13 18:21 ` Wes Hardaker
1996-06-13 18:23 ` Wes Hardaker
2 siblings, 0 replies; 9+ messages in thread
From: Lars Magne Ingebrigtsen @ 1996-06-12 2:39 UTC (permalink / raw)
Kevin Cheek <kcheek@cerebus.im.med.umich.edu> writes:
> In case anyone actually wants some smiley icons, I got 15 small tiffs
> from the next-icon mail list. They're available via HTTP at
> <http://mmg2.im.med.umich.edu/~kcheek/smileys/>.
Are they free? (As in GPL or public domain?)
I want to write a smiley.el which not only does the smiley faces, but
(in general) can make bits of text invisible and "replace" the text
with neat-o-keano glyphs. Killing and yanking the text will then give
you the original text. Like.
--
"Yes. The journey through the human heart
would have to wait until some other time."
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-11 23:25 ` Kevin Cheek
1996-06-12 2:39 ` Lars Magne Ingebrigtsen
@ 1996-06-13 18:21 ` Wes Hardaker
1996-06-13 20:41 ` Wes Hardaker
1996-06-13 18:23 ` Wes Hardaker
2 siblings, 1 reply; 9+ messages in thread
From: Wes Hardaker @ 1996-06-13 18:21 UTC (permalink / raw)
Cc: wmperry, ding
Kevin Cheek <kcheek@cerebus.im.med.umich.edu> writes:
> > we simply _HAVE_ to implement this. Anyone know of a good smiley icon
> > repository?
>
> In case anyone actually wants some smiley icons, I got 15 small tiffs
> from the next-icon mail list. They're available via HTTP at
> <http/mmg2.im.med.umich.edu/~kcheek/smileys/>.
Well, so like I had my wisdom teeth pulled on Monday... That didn't
leave much motivation for me to do anything productive today.
Therefore, I submit the very beginnings of the above mentioned project
(something, I've been wanting to see for a long time too).
You'll need ftp://ftp.ece.ucdavis.edu/pub/hardaker/smilies.tar.gz, as
well as the following lisp code. Note that the default regular
expressions I threw together in roughly 5 minutes and haven't even
included all the faces in the face database (from Kevin) yet. I'll
leave it to someone else (ie, a reg-exp and smiley expert) to clean
this up. The good news is that it works (XEmacs required of course).
:-) :-\ :-] :-> :-/ :-| :-< :-(
Install the above lisp and smiley faces and re-read this message!
The faces should be colored in yellow, and the background should be
set to transparent (outside the circle), but again, I defer...
;;
;; comments go here.
;;
;; (add-hook 'gnus-article-display-hook 'gnus-smiley-display t)
(defvar gnus-smiley-db-dir "/home/hardaker/tmp/smilies/smilies")
(defvar gnus-smiley-regexp-alist '((":-*\\]" "FaceGrinning.xpm")
(":-*)" "FaceHappy.xpm")
(";-*[>)]" "FaceWinking.xpm")
(":-*[/\\]" "FaceIronic.xpm")
(":-*|" "FaceGoofy.xpm")
(":-*<" "FaceAngry.xpm")
(":-*(" "FaceAngry.xpm")))
(defun gnus-smiley-display ()
(interactive)
(if (and (featurep 'xpm)
(or (not (fboundp 'device-type)) (equal (device-type) 'x)))
(save-excursion
(set-buffer gnus-article-buffer)
;; search and replace
(let ((buffer-read-only nil)
(alist gnus-smiley-regexp-alist)
bug entry regexp)
(goto-char (point-min))
;; We skip the headers.
(unless (search-forward "\n\n" nil t)
(goto-char (point-max)))
(setq beg (point))
;; loop through alist
(while (setq entry (pop alist))
(setq regexp (car entry))
(goto-char beg)
(while (re-search-forward regexp nil t)
(let ((start (match-beginning 0))
(end (match-end 0))
(gl (make-glyph
(concat (file-name-as-directory gnus-smiley-db-dir)
(nth 1 entry)))))
(if gl
(progn
(set-glyph-face gl 'default)
(delete-region start end)
(make-annotation gl start 'text))
(message "face doesn't exist")))))))))
--
_____
Wes Hardaker / ___ \
Department of Electrical and Computer Engineering / / \//\
University of California at Davis __________________ \--/ /--\
Davis CA 95616 / Recycle! \ \//\___/ /
(hardaker@ece.ucdavis.edu) / It's not too late! \ \_____/
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-11 23:25 ` Kevin Cheek
1996-06-12 2:39 ` Lars Magne Ingebrigtsen
1996-06-13 18:21 ` Wes Hardaker
@ 1996-06-13 18:23 ` Wes Hardaker
2 siblings, 0 replies; 9+ messages in thread
From: Wes Hardaker @ 1996-06-13 18:23 UTC (permalink / raw)
Cc: wmperry, ding
Kevin Cheek <kcheek@cerebus.im.med.umich.edu> writes:
> > we simply _HAVE_ to implement this. Anyone know of a good smiley icon
> > repository?
Oh... I forgot to mention, the reg-exp stuff really should watch out
for URLs' which by default get partly changed into smilies:
http://www.foo.bar/
^^
parsed as a smily.
--
_____
Wes Hardaker / ___ \
Department of Electrical and Computer Engineering / / \//\
University of California at Davis __________________ \--/ /--\
Davis CA 95616 / Recycle! \ \//\___/ /
(hardaker@ece.ucdavis.edu) / It's not too late! \ \_____/
^ permalink raw reply [flat|nested] 9+ messages in thread
* Re: What will they think of next: [fwd]
1996-06-13 18:21 ` Wes Hardaker
@ 1996-06-13 20:41 ` Wes Hardaker
0 siblings, 0 replies; 9+ messages in thread
From: Wes Hardaker @ 1996-06-13 20:41 UTC (permalink / raw)
Cc: Kevin Cheek, wmperry, ding
Wes Hardaker <hardaker> writes:
> Well, so like I had my wisdom teeth pulled on Monday... That didn't
> leave much motivation for me to do anything productive today.
> Therefore, I submit the very beginnings of the above mentioned project
> (something, I've been wanting to see for a long time too).
Well... Having ran out of stuff to do (ie, procrastinated everything
else sucessfully), I played a bit more with the reg-exp list. This
following includes more maps to faces and a few better reg-exps.
(defvar gnus-smiley-regexp-alist '((":-*\\]" "FaceGrinning.xpm")
(":-*[oO]" "FaceStartled.xpm")
(":-*[)>]" "FaceHappy.xpm")
(":-*)" "FaceHappy.xpm")
(";-*[>)]" "FaceWinking.xpm")
(":-[/\\]" "FaceIronic.xpm")
(":-*|" "FaceStraight.xpm")
(":-*<" "FaceAngry.xpm")
(":-*d" "FaceTasty.xpm")
(":-*[pP]" "FaceYukky.xpm")
("8-*|" "FaceKOed.xpm")
(":-*(" "FaceAngry.xpm")))
Now, I've simply GOT to go get some work done.... Errr, its been a
long time since I've played XPilot. I wonder if I remember how?
Wes
^ permalink raw reply [flat|nested] 9+ messages in thread
end of thread, other threads:[~1996-06-13 20:41 UTC | newest]
Thread overview: 9+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1996-06-11 20:33 What will they think of next: [fwd] Eric Hendrickson
1996-06-11 20:49 ` William Perry
1996-06-11 21:58 ` Colin Rafferty
1996-06-12 2:37 ` Lars Magne Ingebrigtsen
1996-06-11 23:25 ` Kevin Cheek
1996-06-12 2:39 ` Lars Magne Ingebrigtsen
1996-06-13 18:21 ` Wes Hardaker
1996-06-13 20:41 ` Wes Hardaker
1996-06-13 18:23 ` Wes Hardaker
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).