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 /httemplate/edit/process/part_pkg.cgi | |
| parent | 48c4363d1a57332c1b12e7cf54ff7e67b30d7a81 (diff) | |
better select multiple, discourage creation of packages no agent can sell
Diffstat (limited to 'httemplate/edit/process/part_pkg.cgi')
| -rwxr-xr-x | httemplate/edit/process/part_pkg.cgi | 5 |
1 files changed, 5 insertions, 0 deletions
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 { |