* implement ITERATE:THISROOM:GNET

[citadel.git] / webcit / subst.c

diff --git a/webcit/subst.c b/webcit/subst.c
index 4f43197cb046c07ee7f78dab91d8ae0c23a8a5a2..6f02936d1f8cdf124dfa1e5992b7ddd723a1454e 100644 (file)
--- a/webcit/subst.c
+++ b/webcit/subst.c
@@ -2442,6 +2442,22 @@ void RegisterTokenParamDefine(const char *Name, long len,
        Put(Defines, Name, len, PVal, NULL);
 }
 
+long GetTokenDefine(const char *Name, long len, 
+                   long DefValue)
+{
+       void *vPVal;
+
+       if (GetHash(Defines, Name, len, &vPVal) &&
+            (vPVal != NULL))
+        {
+                return *(long*) vPVal;
+        }
+        else
+        {
+                return DefValue;
+        }
+ }
+
 HashList *Defines;
 
 /*-----------------------------------------------------------------------------
@@ -2599,6 +2615,8 @@ void tmpl_do_tabbed(StrBuf *Target, WCTemplputParams *TP)
                DoTemplate(TKEY(i * 2 + 1), Target, TP);
                StrEndTab(Target, i, nTabs);
        }
+       for (i = 0; i < ntabs; i++) 
+               FreeStrBuf(&TabNames[i]);
 }