- experimental opensessions

[mir.git] / templates / admin / comment.template

diff --git a/templates/admin/comment.template b/templates/admin/comment.template
index 517f6fe..d96f46a 100755 (executable)
--- a/templates/admin/comment.template
+++ b/templates/admin/comment.template
@@ -31,52 +31,21 @@
             ${utility.encodeHTML(utility.encodeHTML(comment.webdb_create))}
           </td>
         </tr>
-      
-       
-               <tr>
-          <td align="right" class="table_left">
-            ${lang("comment.status")}
-          </td>
-          <td class="listrow2">
-            <select name="to_comment_status">
-              <list commentstatuses as a>
-                <option value="${a.id}" <if (a.id == comment.to_comment_status)>selected</if>>${lang("commentstatus."+a.name)}</option>
-              </list>
-            </select>
-          </td>
-        </tr>
-       
-        
-               <call TextInputTableRow (lang("comment.title"), 40, 255, "title", utility.encodeHTML(comment.title))>
-               <call TextInputTableRow (lang("comment.creator"), 40, 80, "creator", utility.encodeHTML(comment.creator))>
-               <call TextInputTableRow (lang("comment.url"), 40, 255, "main_url", utility.encodeHTML(comment.main_url))>
-               <call TextInputTableRow (lang("comment.email"), 40, 80, "email", utility.encodeHTML(comment.email))>
-               <call TextInputTableRow (lang("comment.phone"), 40, 80, "phone", utility.encodeHTML(comment.phone))>
-               <call TextInputTableRow (lang("comment.address"), 40, 80, "address", utility.encodeHTML(comment.address))>
+
+
+    <call PulldownTableRow (lang("comment.status"), "to_comment_status", commentstatuses, "id", "name", comment.to_comment_status, "commentstatus.")>
+
+               <call TextInputTableRow (lang("comment.title"), 40, 255, "title", comment.title)>
+               <call TextInputTableRow (lang("comment.creator"), 40, 80, "creator", comment.creator)>
+               <call TextInputTableRow (lang("comment.url"), 40, 255, "main_url", comment.main_url)>
+               <call TextInputTableRow (lang("comment.email"), 40, 80, "email", comment.email)>
+               <call TextInputTableRow (lang("comment.phone"), 40, 80, "phone", comment.phone)>
+               <call TextInputTableRow (lang("comment.address"), 40, 80, "address", comment.address)>
                
-       
-        <tr>
-          <td align="right" class="table_left">
-           ${lang("comment.language")}
-         </td>
-          <td class="listrow2">
-            <select name="to_language">
-              <list languages as l>
-                <option value="${l.id}" <if (l.id == comment.to_language)>selected</if>>${l.name}</option>
-              </list>
-            </select>
-          </td>
-        </tr>
-      
-        <tr>
-          <td align="right" class="table_left" valign="top">
-            ${lang("comment.text")}<br>
-            ${lang("comment.html")}<input type="checkbox" name="is_html" value="1"<if comment.is_html=="1"> checked</if>>
-          </td>
-          <td class="listrow2">
-            <textarea cols="60" rows="10" name="description" wrap="virtual">${utility.encodeHTML(comment.description)}</textarea>
-          </td>
-        </tr>
+    <call PulldownTableRow (lang("comment.language"), "to_language", languages, "id", "name", comment.to_language, "")>
+    <call CheckboxTableRow       (lang("comment.html"), "is_html", comment.is_html )>
+    <call TextAreaTableRow       (lang("comment.text"), "", 70, 15, "description", comment.description)>
+
         <tr>
           <td colspan="2" align="right" class="table_foot" > 
             <span class="text">