$access{'edit'} || &error($text{'file_ecannot'});
if ($in{'new'}) {
&ui_print_header(undef, $text{'fcreate_title'}, "", "fcreate");
+ if ($in{'clone'}) {
+ $edit = &get_command($in{'id'}, $in{'idx'});
+ }
}
else {
&ui_print_header(undef, $text{'fedit_title'}, "", "fedit");
}
else {
print &ui_form_end([ [ undef, $text{'save'} ],
+ [ 'clone', $text{'edit_clone'} ],
[ 'delete', $text{'delete'} ] ]);
}
$access{'edit'} || &error($text{'edit_ecannot'});
if ($in{'new'}) {
&ui_print_header(undef, $text{'sql_title1'}, "");
+ if ($in{'clone'}) {
+ $cmd = &get_command($in{'id'}, $in{'idx'});
+ }
}
else {
&ui_print_header(undef, $text{'sql_title2'}, "");
}
else {
print &ui_form_end([ [ "save", $text{'save'} ],
+ [ 'clone', $text{'edit_clone'} ],
[ "delete", $text{'delete'} ] ]);
}
$edit = &get_command($in{'id'}, $in{'idx'});
&delete_command($edit);
&webmin_log("delete", "edit", $edit->{'id'}, $edit);
+ &redirect("");
+ }
+elsif ($in{'clone'}) {
+ &redirect("edit_file.cgi?id=$in{'id'}&idx=$in{'idx'}&clone=1&new=1");
}
else {
&error_setup($text{'file_err'});
$access{'cmds'} .= " ".$edit->{'id'};
&save_module_acl(\%access);
}
+ &redirect("");
}
-&redirect("");
$cmd = &get_command($in{'id'}, $in{'idx'});
&delete_command($cmd);
&webmin_log("delete", "command", $cmd->{'id'}, $cmd);
+ &redirect("");
+ }
+elsif ($in{'clone'}) {
+ &redirect("edit_sql.cgi?id=$in{'id'}&idx=$in{'idx'}&clone=1&new=1");
}
else {
&error_setup($text{'sql_err'});
$access{'cmds'} .= " ".$cmd->{'id'};
&save_module_acl(\%access);
}
+ &redirect("");
}
-&redirect("");