[freeside-commits] freeside/httemplate/edit part_pkg.cgi, 1.111.2.1, 1.111.2.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/httemplate/edit
In directory wavetail.420.am:/tmp/cvs-serv27361

Modified Files:
      Tag: FREESIDE_1_9_BRANCH
	part_pkg.cgi 
Log Message:
fix initial value of agent types when cloning

Index: part_pkg.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/part_pkg.cgi,v
retrieving revision 1.111.2.1
retrieving revision 1.111.2.2
diff -u -d -r1.111.2.1 -r1.111.2.2
--- part_pkg.cgi	25 Nov 2009 19:58:50 -0000	1.111.2.1
+++ part_pkg.cgi	6 Dec 2009 23:44:55 -0000	1.111.2.2
@@ -332,7 +332,8 @@
 
   $recur_disabled = $object->freq ? 0 : 1;
 
-  (@agent_type) = map {$_->typenum} qsearch('type_pkgs',{'pkgpart'=>$1});
+  (@agent_type) =
+    map {$_->typenum} qsearch('type_pkgs', { 'pkgpart' => $object->pkgpart } );
 
   my @report_option = ();
   foreach ($object->options) {
@@ -389,6 +390,11 @@
 
     $object->disabled('Y');
 
+  } else { #not when cloning...
+
+    (@agent_type) =
+      map {$_->typenum} qsearch('type_pkgs',{ 'pkgpart' => $object->pkgpart } );
+
   }
 
   %options = $object->options;