projects
/
elisp
/
semi.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
e845c8d
)
(regexp-*): New inline-function; copied from tl-str.el.
author
tmorioka
<tmorioka>
Thu, 27 Feb 1997 13:36:22 +0000
(13:36 +0000)
committer
tmorioka
<tmorioka>
Thu, 27 Feb 1997 13:36:22 +0000
(13:36 +0000)
mime-parse.el
patch
|
blob
|
history
diff --git
a/mime-parse.el
b/mime-parse.el
index
bbd1d8f
..
45447cc
100644
(file)
--- a/
mime-parse.el
+++ b/
mime-parse.el
@@
-3,8
+3,8
@@
;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc.
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc.
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: mime-parse.el,v 0.3 1997-02-24 09:12:12 tmorioka Exp $
-;; Keywords: MIME, multimedia, mail, news
+;; Version: $Id: mime-parse.el,v 0.4 1997-02-27 13:36:22 tmorioka Exp $
+;; Keywords: parse, MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@
-62,6
+62,9
@@
;;; @ field parser
;;;
;;; @ field parser
;;;
+(defsubst regexp-* (regexp)
+ (concat regexp "*"))
+
(defconst rfc822/quoted-pair-regexp "\\\\.")
(defconst rfc822/qtext-regexp
(concat "[^" (char-list-to-string std11-non-qtext-char-list) "]"))
(defconst rfc822/quoted-pair-regexp "\\\\.")
(defconst rfc822/qtext-regexp
(concat "[^" (char-list-to-string std11-non-qtext-char-list) "]"))