From 5e63ae96cf7d3e618c569c3fe12f6a6dae40038e Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 18 Jun 2008 19:09:28 +0000
Subject: [PATCH] fix setup/recur fees on cloning (customizing) package
 definitions w/new editor

---
 httemplate/edit/part_pkg.cgi | 2 ++
 1 file changed, 2 insertions(+)

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')
-- 
2.11.0