summaryrefslogtreecommitdiff
path: root/httemplate
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate')
-rwxr-xr-xhttemplate/edit/part_pkg.cgi4
-rwxr-xr-xhttemplate/edit/process/part_pkg.cgi5
2 files changed, 7 insertions, 2 deletions
diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi
index 1e73329ef..76472334a 100755
--- a/httemplate/edit/part_pkg.cgi
+++ b/httemplate/edit/part_pkg.cgi
@@ -119,8 +119,8 @@ Line-item revenue recognition
'table' => 'agent_type',
'name_col' => 'atype',
'value' => \@agent_type,
- 'empty_label' => 'select agent types',
- 'element_etc' => 'multiple size="10"',
+ 'multiple' => '1',
+ 'element_etc' => 'size="10"',
)
%>
</TD>
diff --git a/httemplate/edit/process/part_pkg.cgi b/httemplate/edit/process/part_pkg.cgi
index 5d9c2355b..e4cf45984 100755
--- a/httemplate/edit/process/part_pkg.cgi
+++ b/httemplate/edit/process/part_pkg.cgi
@@ -36,6 +36,11 @@
% /^(\d+)$/;
% push @agents, $1 if $1;
%}
+%$error = "At least one agent type must be specified."
+% unless( scalar(@agents) ||
+% $cgi->param('clone') && $cgi->param('clone') ~= /^\d+$/ ||
+% !pkgpart && $conf->exists('agent-defaultpkg')
+% );
%
%my $new = new FS::part_pkg ( {
% map {