;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Keywords: mail, news, RFC 822, STD 11
-;; Version: $Id: std11.el,v 0.28 1996-09-08 18:01:01 morioka Exp $
+;; Version: $Id: std11.el,v 0.29 1996-09-08 18:03:51 morioka Exp $
;; This file is part of MU (Message Utilities).
;;; @ quoted-string
;;;
-(defconst rfc822/non-qtext-char-list '(?\" ?\\ ?\r ?\n))
+(defconst std11-non-qtext-char-list '(?\" ?\\ ?\r ?\n))
(defun rfc822/wrap-as-quoted-string (str)
"Wrap string STR as RFC 822 quoted-string. [tl-822.el]"
(concat "\""
(mapconcat (function
(lambda (chr)
- (if (memq chr rfc822/non-qtext-char-list)
+ (if (memq chr std11-non-qtext-char-list)
(concat "\\" (char-to-string chr))
(char-to-string chr)
)