From 69fb33cabf020ff289f22b5964ac04ebc62a11b7 Mon Sep 17 00:00:00 2001 From: morioka Date: Wed, 28 Aug 1996 17:35:10 +0000 Subject: [PATCH] (std11-analyze-domain-literal): New function. --- std11-parse.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/std11-parse.el b/std11-parse.el index 45fe23b..34d22d3 100644 --- a/std11-parse.el +++ b/std11-parse.el @@ -4,7 +4,7 @@ ;; Author: MORIOKA Tomohiko ;; Keywords: mail, news, RFC 822, STD 11 -;; Version: $Id: std11-parse.el,v 0.5 1996-08-28 17:33:26 morioka Exp $ +;; Version: $Id: std11-parse.el,v 0.6 1996-08-28 17:35:10 morioka Exp $ ;; This file is part of tl (Tiny Library). @@ -89,6 +89,10 @@ (std11-analyze-enclosure str 'quoted-string ?\" ?\") ) +(defun std11-analyze-domain-literal (str) + (std11-analyze-enclosure str 'domain-literal ?\[ ?\]) + ) + ;;; @ end ;;; -- 1.7.10.4