Commit info for scoop/lib/Scoop/Admin:

Modified Files:
	Ops.pm 
Log Message:

Patch so that the OP's tool uses a block


Index: Ops.pm
===================================================================
RCS file: /cvs/scoop/scoop/lib/Scoop/Admin/Ops.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -r1.5 -r1.6
46,108c46,60
< 	my $page = qq|
< 		<form action="%%rootdir%%/admin/ops" method="POST">
< 		<table width="100%" border="0" cellpadding="2" cellspacing="0">
< 			<tr bgcolor="%%title_bgcolor%%">
< 				<td colspan="2">%%title_font%%Edit Ops%%title_font_end%%</td>
< 			</tr>
< 			<tr>
< 				<td colspan="2">%%title_font%%<font color="#ff0000">$msg</font>%%title_font_end%%</td>
< 			</tr>
< 			<tr>
< 				<td align="right">
< 					<input type="submit" name="get" value="Get Op" />
< 				</td>
< 				<td>$op_list</td>
< 			</tr>
< 			<tr>
< 				<td>%%norm_font%%<b>Op:</b>%%norm_font_end%%</td>
< 				<td><input type="text" name="opcode" value="$op_info->{op}" /></td>
< 			</tr>
< 			<tr>
< 				<td>%%norm_font%%<b>Template:</b>%%norm_font_end%%</td>
< 				<td>$tmpl_list</td>
< 			</tr>
< 			<tr>
< 				<td>%%norm_font%%<b>Function:</b>%%norm_font_end%%</td>
< 				<td><input type="text" name="func" value="$op_info->{func}" />$edit_box</td>
< 			</tr>
< 			<tr>
< 				<td>&nbsp;</td>
< 				<td>%%norm_font%%
< 					<input type="checkbox" name="is_box" value="1"$is_box_checked /> Function is a box%%norm_font_end%%
< 				</td>
< 			</tr>
< 			<tr>
< 				<td>%%norm_font%%<b>Permission:</b>%%norm_font_end%%</td>
< 				<td>$perm_list</td>
< 			</tr>
< 			<tr>
< 				<td>%%norm_font%%<b>Enabled:</b>%%norm_font_end%%</td>
< 				<td><input type="checkbox" name="enabled" value="1"$enabled_checked /></td>
< 			</tr>
< 			<tr>
< 				<td>%%norm_font%%<b>OP Aliases:</b>%%norm_font_end%%</td>
< 				<td><input type="text" name="aliases" value="$op_info->{aliases}" size="40" /></td>
< 			</tr>
< 			<tr>
< 				<td valign="top">%%norm_font%%<b>URL Templates:</b>%%norm_font_end%%</td>
< 				<td><textarea cols="40" rows="10" name="urltemplates" wrap="no">$op_info->{urltemplates}</textarea></td>
< 			</tr>
< 			<tr>
< 				<td valign="top">%%norm_font%%<b>Description:</b>%%norm_font_end%%</td>
< 				<td><textarea cols="40" rows="3" name="desc" wrap="soft">$op_info->{description}</textarea></td>
< 			</tr>
< 			$delete_check
< 			<tr>
< 				<td>&nbsp;</td>
< 				<td>
< 					<input type="submit" name="save" value="Write Op" /> 
< 					<input type="reset" value="Reset" />
< 				</td>
< 			</tr>
< 		</table>
< 		</form>|;
---
> 	my $page = $S->{UI}->{BLOCKS}->{edit_ops};
> 	
> 	$page =~ s/%%msg%%/$msg/g;
> 	$page =~ s/%%op_list%%/$op_list/g;
> 	$page =~ s/%%opcode%%/$op_info->{op}/g;
> 	$page =~ s/%%tmpl_list%%/$tmpl_list/g;
> 	$page =~ s/%%func%%/$op_info->{func}/g;
> 	$page =~ s/%%is_box_checked%%/$is_box_checked/g;
> 	$page =~ s/%%perm_list%%/$perm_list/g;
> 	$page =~ s/%%aliases%%/$op_info->{aliases}/g;
> 	$page =~ s/%%urltemplates%%/$op_info->{urltemplates}/g;
> 	$page =~ s/%%enabled_checked%%/$enabled_checked/g;
> 	$page =~ s/%%desc%%/$op_info->{description}/g;
> 	$page =~ s/%%delete_check%%/$delete_check/g;
> 	$page =~ s/%%edit_box%%/$edit_box/g;