projects
/
elisp
/
gnus.git-
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
8b5fa82
)
* message.el (message-cite-prefix-regexp): Fix the regexp.
author
yamaoka
<yamaoka>
Tue, 29 Jan 2002 23:15:47 +0000
(23:15 +0000)
committer
yamaoka
<yamaoka>
Tue, 29 Jan 2002 23:15:47 +0000
(23:15 +0000)
ChangeLog
patch
|
blob
|
history
lisp/message.el
patch
|
blob
|
history
diff --git
a/ChangeLog
b/ChangeLog
index
073ea05
..
7dc0759
100644
(file)
--- a/
ChangeLog
+++ b/
ChangeLog
@@
-1,5
+1,7
@@
2002-01-29 Katsumi Yamaoka <yamaoka@jpl.org>
2002-01-29 Katsumi Yamaoka <yamaoka@jpl.org>
+ * lisp/message.el (message-cite-prefix-regexp): Fix the regexp.
+
* lisp/gnus-sum.el (gnus-mime-extract-message/rfc822): New
implementation.
* lisp/gnus-sum.el (gnus-mime-extract-message/rfc822): New
implementation.
diff --git
a/lisp/message.el
b/lisp/message.el
index
1bd98b8
..
1544879
100644
(file)
--- a/
lisp/message.el
+++ b/
lisp/message.el
@@
-474,9
+474,9
@@
The provided functions are:
(defcustom message-cite-prefix-regexp
(if (string-match "[[:digit:]]" "1") ;; support POSIX?
(defcustom message-cite-prefix-regexp
(if (string-match "[[:digit:]]" "1") ;; support POSIX?
- "\\([ \t]*[-_.[:word:]]+>+\\|[ \t]*[]>~|:}+]\\)+"
+ "\\([ \t]*[-_.[:word:]]+>+\\|[ \t]*[]>»|:}+]\\)+"
;; ?-, ?_ or ?. MUST NOT be in syntax entry w.
;; ?-, ?_ or ?. MUST NOT be in syntax entry w.
- "\\([ \t]*\\(\\w\\|[-_.]\\)+>+\\|[ \t]*[]>~|:}+]\\)+")
+ "\\([ \t]*\\(\\w\\|[-_.]\\)+>+\\|[ \t]*[]>»|:}+]\\)+")
"*Regexp matching the longest possible citation prefix on a line."
:group 'message-insertion
:type 'regexp)
"*Regexp matching the longest possible citation prefix on a line."
:group 'message-insertion
:type 'regexp)