From c515863f0887d9b8d83667c997291b13795fb373 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Mon, 19 Jul 1999 01:07:20 -0700
Subject: [PATCH] more convenience..

Rev: tutorial/Sgml.pmod:1.16
---
 tutorial/Sgml.pmod | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/tutorial/Sgml.pmod b/tutorial/Sgml.pmod
index bbc02aa99f..82898746ad 100644
--- a/tutorial/Sgml.pmod
+++ b/tutorial/Sgml.pmod
@@ -45,11 +45,13 @@ class Tag
   void create(string t,
 	      void|mapping p,
 	      void|int po, 
-	      void|array(object|string) d, void|string f)
+	      void|array(object|string)|object(Tag) d,
+	      void|string f)
   {
     tag=t;
     pos=po;
     params=p||([]);
+    if(objectp(d)) d=({d});
     data=d;
     file=f;
   }
-- 
GitLab