From 96f4339afd68ceb8d09f3bf3d2686ed8c793b22e Mon Sep 17 00:00:00 2001 From: morioka Date: Sun, 8 Sep 1996 18:03:51 +0000 Subject: [PATCH] (std11-non-qtext-char-list): Renamed from `rfc822/non-qtext-char-list'. --- std11.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/std11.el b/std11.el index 713fe13..220b8d3 100644 --- a/std11.el +++ b/std11.el @@ -4,7 +4,7 @@ ;; Author: MORIOKA Tomohiko ;; 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). @@ -197,14 +197,14 @@ If BOUNDARY is not nil, it is used as message header separator. ;;; @ 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) ) -- 1.7.10.4