# HG changeset patch
# User Katsumi Yamaoka <yamaoka@jpl.org>
# Date 1283149733 0
# Node ID 2547676f6961b879b0a04287223307b6ffc815ce
# Parent  9604de1a8d285b7a7da18bb148c9a8e345294c3e
smiley-regexp-alist: Don't delete the semicolon before the blinking smiley by Miles Bader <miles@gnu.org>; Disallow ;;) from being treated as a blink smiley by Simon Josefsson <simon@josefsson.org>.

2009-03-24  Miles Bader  <miles@gnu.org>
 * smiley.el (smiley-regexp-alist): Don't delete the semicolon before
 the blinking smiley.
2009-03-24  Simon Josefsson  <simon@josefsson.org>
 * smiley.el (smiley-regexp-alist): Disallow ;;) from being treated as a
 blink smiley.

diff -r 9604de1a8d28 -r 2547676f6961 lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Mon Aug 30 06:25:05 2010 +0000
+++ b/lisp/gnus/ChangeLog	Mon Aug 30 06:28:53 2010 +0000
@@ -1,3 +1,13 @@
+2009-03-24  Miles Bader  <miles@gnu.org>
+
+	* smiley.el (smiley-regexp-alist): Don't delete the semicolon before
+	the blinking smiley.
+
+2009-03-24  Simon Josefsson  <simon@josefsson.org>
+
+	* smiley.el (smiley-regexp-alist): Disallow ;;) from being treated as a
+	blink smiley.
+
 2010-08-29  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 	* gnus-start.el (gnus-dribble-read-file): Ensure that the directory
diff -r 9604de1a8d28 -r 2547676f6961 lisp/gnus/smiley.el
--- a/lisp/gnus/smiley.el	Mon Aug 30 06:25:05 2010 +0000
+++ b/lisp/gnus/smiley.el	Mon Aug 30 06:28:53 2010 +0000
@@ -102,7 +102,8 @@
 
 ;; 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")