From 3b60a809c08e694bcc3515c6b00da46daf66631c Mon Sep 17 00:00:00 2001 From: morioka Date: Thu, 13 Jun 1996 17:10:24 +0000 Subject: [PATCH] Function `rfc822/analyze-quoted-pair' was abolished. --- tl-822.el | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/tl-822.el b/tl-822.el index 8071645..b173000 100644 --- a/tl-822.el +++ b/tl-822.el @@ -30,7 +30,7 @@ (defconst rfc822/RCS-ID - "$Id: tl-822.el,v 7.28 1996-06-13 17:09:18 morioka Exp $") + "$Id: tl-822.el,v 7.29 1996-06-13 17:10:24 morioka Exp $") (defconst rfc822/version (get-version-string rfc822/RCS-ID)) @@ -266,14 +266,14 @@ )) )) -(defun rfc822/analyze-quoted-pair (str) - (if (and (>= (length str) 2) - (eq (elt str 0) ?\\) - ) - (cons (cons 'quoted-pair (substring str 0 2)) - (substring str 2) - )) - ) +;; (defun rfc822/analyze-quoted-pair (str) +;; (if (and (>= (length str) 2) +;; (eq (elt str 0) ?\\) +;; ) +;; (cons (cons 'quoted-pair (substring str 0 2)) +;; (substring str 2) +;; )) +;; ) (defun rfc822/analyze-quoted-string (str) (let ((len (length str))) -- 1.7.10.4