!if $cmd=new or $cmd=resume
!form reply
<fieldset class="property_fields halfwidth blockcenter">
<legend>$wims_name_properties $wims_name_Glossary $d</legend>
<div class="field box">
<div class="field box">
<label for="title">$wims_name_title</label>
<input size="50" name="title" value="$ti" id="title" />
</div>
<div class="field box">
!set n_
=!recordcnt wimshome
/log/classes
/$wims_class/tool
/.glossary
$gl $table_header
$table_tr
<th>$wims_name_title</th><th>$wims_name_action</th><th></th>
</tr>
!for j=1 to $n_
!set c_
=!record
$j of wimshome
/log/classes
/$wims_class/tool
/.glossary
$gl !distribute line $c_ into di_,ti_,
$table_tr
<td><input size="20" name="title$j" value="$ti_" id="title" /></td>
<td>
!formcheckbox delete
$j list 1 prompt
$wims_name_erase </td>
<td>$di_</td>
</tr>
</table>
<div class="wimscenter wimsform"><input type="submit" value="$wims_name_send" /></div>
</div>
<input type="hidden" name="job" value="mod" />
</fieldset>
!formend
!endif
!if $cmd=reply
$name_endmod.
!set wims_menu_items=!append line "glossarycheck",1,module=adm/tool/glossary&gl=$gl\
to $wims_menu_items
!endif