From: bg66 <bg66>
Date: Tue, 19 Jun 2001 00:54:34 +0000 (+0000)
Subject: * liece-url.el (liece-url-regexp): Fix regexp.
X-Git-Tag: liece-2_0_0-pre1~12
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e7f2bcb4277846f6eb254085f3fa285ac22d5d4d;p=elisp%2Fliece.git

* liece-url.el (liece-url-regexp): Fix regexp.

* liece-vars.el (liece-display-unread-mark): Set default to t.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 241969b..a284b62 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2001-06-19  OHASHI Akira  <bg66@koka-in.org>
+
+        * liece-url.el (liece-url-regexp): Fix regexp.
+
+        * liece-vars.el (liece-display-unread-mark): Set default to t.
+
 2001-06-14  OHASHI Akira  <bg66@koka-in.org>
 
         * liece-channel.el (liece-channel-add-buttons): Fix regexp.
diff --git a/lisp/liece-url.el b/lisp/liece-url.el
index d7d3abe..664614e 100644
--- a/lisp/liece-url.el
+++ b/lisp/liece-url.el
@@ -40,7 +40,7 @@
   "URL Browsing in IRC buffer."
   :group 'liece-vars)
 
-(defcustom liece-url-regexp  "\\b\\(s?https?\\|ftp\\|file\\|gopher\\|news\\|telnet\\|wais\\|mailto\\):\\(//[-a-zA-Z0-9_.]+:[0-9]*\\)?[-a-zA-Z0-9_=?#$@~`%&*+|\\/.,]*[-a-zA-Z0-9_=#$@~`%&*+|\\/]"
+(defcustom liece-url-regexp  "\\b\\(s?https?\\|ftp\\|file\\|gopher\\|news\\|telnet\\|wais\\|mailto\\):\\(//[-a-zA-Z0-9_.]+:[0-9]*\\)?[-a-zA-Z0-9_=?#$@~`%&*+|\\/.,:;]*[-a-zA-Z0-9_=#$@~`%&*+|\\/]"
   "Regular expression that matches URLs."
   :group 'liece-url
   :type 'regexp)
diff --git a/lisp/liece-vars.el b/lisp/liece-vars.el
index 839d048..9d5876a 100644
--- a/lisp/liece-vars.el
+++ b/lisp/liece-vars.el
@@ -80,7 +80,7 @@
   :type 'boolean
   :group 'liece-look)
 
-(defcustom liece-display-unread-mark nil
+(defcustom liece-display-unread-mark t
   "If non-nil, display unread mark as XEmacs glyphs or character to channel
 list buffer."
   :type 'boolean