From: ivan <ivan>
Date: Wed, 18 Jun 2008 19:09:28 +0000 (+0000)
Subject: fix setup/recur fees on cloning (customizing) package definitions w/new editor
X-Git-Tag: root_of_webpay_support~553
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=5e63ae96cf7d3e618c569c3fe12f6a6dae40038e;p=freeside.git

fix setup/recur fees on cloning (customizing) package definitions w/new editor
---

diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi
index d9dcaa87f..3e0a35466 100755
--- a/httemplate/edit/part_pkg.cgi
+++ b/httemplate/edit/part_pkg.cgi
@@ -210,6 +210,8 @@ my $new_object_callback = sub {
     $part_pkg = $clone_part_pkg->clone;
     $part_pkg->disabled('Y');
     %options = $clone_part_pkg->options;
+    $part_pkg->set($_ => $option{$_})
+      foreach (qw( setup_fee recur_fee ));
   } else {
     $part_pkg = FS::part_pkg->new( $hashref );
     $part_pkg->set($_ => '0')