From a47caf361da113107053575bf537258b276d4d2b Mon Sep 17 00:00:00 2001 From: jeff Date: Thu, 6 Dec 2007 20:49:52 +0000 Subject: agent setting during package edit cleanup --- httemplate/edit/part_pkg.cgi | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) (limited to 'httemplate/edit') diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi index 76472334a..559ade14c 100755 --- a/httemplate/edit/part_pkg.cgi +++ b/httemplate/edit/part_pkg.cgi @@ -66,7 +66,6 @@ Tax information -% my $conf = new FS::Conf; % if ( $conf->exists('enable_taxclasses') ) { @@ -103,10 +102,14 @@ Line-item revenue recognition -% if ( $cgi->param('clone') || $conf->exists('agent_defaultpkg') ) { +% if ( $cgi->param('clone') ) { +% } elsif ( scalar(@all_agent_types) == 1) { + + + % } else { Reseller information @@ -366,8 +369,10 @@ if ( $cgi->param('pkgnum') && $cgi->param('pkgnum') =~ /^(\d+)$/ ) { my ($query) = $cgi->keywords; +my $conf = new FS::Conf; my $part_pkg = ''; my @agent_type = (); +my @all_agent_types = map {$_->typenum} qsearch('agent_type',{}); if ( $cgi->param('error') ) { $part_pkg = new FS::part_pkg ( { map { $_, scalar($cgi->param($_)) } fields('part_pkg') @@ -394,6 +399,8 @@ if ( $cgi->param('clone') ) { unless ( $part_pkg ) { $part_pkg = new FS::part_pkg {}; $part_pkg->plan('flat'); + @agent_type = @all_agent_types if $conf->exists('agent_defaultpkg'); + } } unless ( $part_pkg->plan ) { #backwards-compat -- cgit v1.2.1