From e96a2a6fd3a8885b0fb035ecc55bdf50dbe5a4aa Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Sat, 8 Jun 2013 01:30:52 -0700
Subject: multi-currency, RT#21565

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

(limited to 'httemplate/edit/process/part_pkg.cgi')

diff --git a/httemplate/edit/process/part_pkg.cgi b/httemplate/edit/process/part_pkg.cgi
index 932e33b1d..3b6562f13 100755
--- a/httemplate/edit/process/part_pkg.cgi
+++ b/httemplate/edit/process/part_pkg.cgi
@@ -114,6 +114,19 @@ my $args_callback = sub {
   
   push @args, 'options' => \%options;
 
+  ###
+  #part_pkg_currency
+  ###
+
+  my %part_pkg_currency = (
+    map { $_ => scalar($cgi->param($_)) }
+      #grep /._[A-Z]{3}$/, #support other options
+      grep /^(setup|recur)_fee_[A-Z]{3}$/,
+        $cgi->param
+  );
+
+  push @args, 'part_pkg_currency' => \%part_pkg_currency;
+
   ###
   #pkg_svc
   ###
-- 
cgit v1.2.1