From 07466c8e7b83841ddcd615cb991608052f698cbf Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 30 Aug 2010 06:28:53 +0000 Subject: [PATCH] smiley-regexp-alist: Don't delete the semicolon before the blinking smiley by Miles Bader ; Disallow ;;) from being treated as a blink smiley by Simon Josefsson . 2009-03-24 Miles Bader * smiley.el (smiley-regexp-alist): Don't delete the semicolon before the blinking smiley. 2009-03-24 Simon Josefsson * smiley.el (smiley-regexp-alist): Disallow ;;) from being treated as a blink smiley. --- lisp/gnus/ChangeLog | 10 ++++++++++ lisp/gnus/smiley.el | 3 ++- 2 files changed, 12 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 3b6e59a32f2..d55f89c28b6 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,13 @@ +2009-03-24 Miles Bader + + * smiley.el (smiley-regexp-alist): Don't delete the semicolon before + the blinking smiley. + +2009-03-24 Simon Josefsson + + * smiley.el (smiley-regexp-alist): Disallow ;;) from being treated as a + blink smiley. + 2010-08-29 Lars Magne Ingebrigtsen * gnus-start.el (gnus-dribble-read-file): Ensure that the directory diff --git a/lisp/gnus/smiley.el b/lisp/gnus/smiley.el index fbe71e7725f..ef0a6c7790b 100644 --- a/lisp/gnus/smiley.el +++ b/lisp/gnus/smiley.el @@ -102,7 +102,8 @@ is nil, use `smiley-style'." ;; The XEmacs version has a baroque, if not rococo, set of these. (defcustom smiley-regexp-alist - '(("\\(;-?)\\)\\W" 1 "blink") + '(("\\(;-)\\)\\W" 1 "blink") + ("[^;]\\(;)\\)\\W" 1 "blink") ("\\(:-]\\)\\W" 1 "forced") ("\\(8-)\\)\\W" 1 "braindamaged") ("\\(:-|\\)\\W" 1 "indifferent") -- 2.39.2