{* the form must be name=&quot;editpageform&quot; *}
{literal}
 &lt;script type=&quot;text/javascript&quot;&gt;&lt;!--
	function moveSelected(from, to) {
		var i = eval(from).selectedIndex;
		if( !eval(from).disabled &amp;&amp; (i &gt;= 0)) {
			var temptxt = eval(from).options[i].text;
			var tempval = eval(from).options[i].value;
			var length = eval(to).length;
			eval(to).options[length] = new Option(temptxt, tempval, true);
			eval(from).options[i] = null;
			if(eval(from).length != 0)
				if( i==0 )
					eval(from).selectedIndex = 0;
				else
					eval(from).selectedIndex = i-1;
			}
	}	
	// --&gt;
	&lt;/script&gt;
{/literal}


{if $feature_categories eq &#039;y&#039; and (count($categories) gt 0 or $tiki_p_admin_categories eq &#039;y&#039;)}
&lt;tr&gt;
 &lt;td align=&quot;right&quot; class=&quot;formcolor&quot;&gt;{tr}Categorize{/tr}:&lt;/td&gt;
 &lt;td class=&quot;formcolor&quot;&gt;
	 &lt;div id=&quot;categorizator&quot; &gt;
	{if count($categories) gt 0}
		 &lt;!--	two-boxes copied from ActionApps.org --&gt;	
	&lt;table border=&quot;0&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot;&gt;
	&lt;tr&gt;

	&lt;td valign=&#039;top&#039;&gt;
	&lt;select name=&quot;cat_categories_1&quot; size=&quot;6&quot;&gt;
		{section name=ix loop=$categories}
		{if $categories[ix].incat eq &#039;n&#039;}
			&lt;option value=&quot;{$categories[ix].categId|escape}&quot;&gt;{$categories[ix].categpath}&lt;/option&gt;
		{/if}
		{/section}
	&lt;/select&gt;
	&lt;/td&gt;

	&lt;td&gt;
	&lt;input type=&quot;button&quot; value=&quot;	&gt;&gt;	&quot; onClick =&quot;moveSelected(document.editpageform.cat_categories_1,document.editpageform[&#039;cat_categories[]&#039;])&quot;&gt;
	&lt;br /&gt;&lt;br /&gt;
	&lt;input type=&quot;button&quot; value=&quot;	&lt;&lt;	&quot; onClick =&quot;moveSelected(document.editpageform[&#039;cat_categories[]&#039;],document.editpageform.cat_categories_1)&quot;&gt;
	&lt;/td&gt;

	&lt;td valign=&quot;top&quot;&gt;
	Selected
	&lt;br /&gt;
	&lt;select name=&quot;cat_categories[]&quot;	multiple=&quot;multiple&quot; size=&quot;4&quot;&gt;
		{section name=ix loop=$categories}
		{if $categories[ix].incat eq &#039;y&#039;}
			&lt;option value=&quot;{$categories[ix].categId|escape}&quot;&gt;{$categories[ix].categpath}&lt;/option&gt;
		{/if}
		{/section}
	&lt;/select&gt;

	&lt;input name=&quot;cat_categorize&quot; id=&quot;cat-check&quot; value=&quot;on&quot; type=&quot;hidden&quot;&gt;
			
	&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;
			
		 &lt;!-- test two-boxes copy from AA END --&gt;
{else} {tr}No categories defined{/tr} &lt;br /&gt;
	{/if}	&lt;/div&gt;
	&lt;/td&gt;
&lt;/tr&gt;
{/if}{* $feature_categories eq &#039;y&#039; *}
&lt;!-- categorize.tpl end --&gt;