From e7f2bcb4277846f6eb254085f3fa285ac22d5d4d Mon Sep 17 00:00:00 2001 From: bg66 Date: Tue, 19 Jun 2001 00:54:34 +0000 Subject: [PATCH] * liece-url.el (liece-url-regexp): Fix regexp. * liece-vars.el (liece-display-unread-mark): Set default to t. --- lisp/ChangeLog | 6 ++++++ lisp/liece-url.el | 2 +- lisp/liece-vars.el | 2 +- 3 files changed, 8 insertions(+), 2 deletions(-) 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 + + * liece-url.el (liece-url-regexp): Fix regexp. + + * liece-vars.el (liece-display-unread-mark): Set default to t. + 2001-06-14 OHASHI Akira * 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 -- 1.7.10.4