diff options
| author | jeff <jeff> | 2007-11-28 20:18:34 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2007-11-28 20:18:34 +0000 |
| commit | 7054cae12e246c80dbb239cc71bc28b89d58ef2c (patch) | |
| tree | e096524f4db7ff0dbecc8050f067cc72e74233af | |
| parent | 48c4363d1a57332c1b12e7cf54ff7e67b30d7a81 (diff) | |
better select multiple, discourage creation of packages no agent can sell
| -rwxr-xr-x | httemplate/edit/part_pkg.cgi | 4 | ||||
| -rwxr-xr-x | httemplate/edit/process/part_pkg.cgi | 5 |
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 { |