projects
/
riece
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* riece-300.el (riece-handle-317-message): Fix regexp for signon
[riece]
/
lisp
/
riece-globals.el
diff --git
a/lisp/riece-globals.el
b/lisp/riece-globals.el
index
73d60c0
..
852426a
100644
(file)
--- a/
lisp/riece-globals.el
+++ b/
lisp/riece-globals.el
@@
-24,11
+24,17
@@
;;; Code:
;;; Code:
+(require 'riece-compat) ;riece-make-interval-regexp
+
;;; Constants:
(defconst riece-channel-regexp
;;; Constants:
(defconst riece-channel-regexp
- "\\([+&#]\\|![A-Z0-9]\\{5\\}\\|!!\\)[^\0\7\r\n ,:]*\\(:[^\0\7\r\n ,:]*\\)?")
+ (concat "\\([+&#]\\|!"
+ (riece-make-interval-regexp "[A-Z0-9]" 5)
+ "\\|!!\\)[^\0\7\r\n ,:]*\\(:[^\0\7\r\n ,:]*\\)?"))
+
(defconst riece-user-regexp
(defconst riece-user-regexp
- "[][\\\\`_^{|}A-Za-z][][\\\\`_^{|}A-Za-z0-9-]\\{0,8\\}")
+ (concat "[][\\\\`_^{|}A-Za-z]"
+ (riece-make-interval-regexp "[][\\\\`_^{|}A-Za-z0-9-]" 0 8)))
;;; Global variables:
(defvar riece-server-process-alist nil
;;; Global variables:
(defvar riece-server-process-alist nil