From: ivan <ivan>
Date: Sun, 15 Mar 2009 23:12:24 +0000 (+0000)
Subject: fix old self-service for new-style cust_main->order_pkgs
X-Git-Tag: freeside_1_7_4rc1~96
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=195eacc970db1e562d7a1dd9103bc167ad795ccf;p=freeside.git

fix old self-service for new-style cust_main->order_pkgs
---

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index c953c62f6..7d9dec15d 100644
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -868,7 +868,7 @@ sub order_pkg {
   tie my %hash, 'Tie::RefHash';
   %hash = ( $cust_pkg => \@svc );
   #msgcat
-  $error = $cust_main->order_pkgs( \%hash, '', 'noexport' => 1 );
+  $error = $cust_main->order_pkgs( \%hash, 'noexport' => 1 );
   return { 'error' => $error } if $error;
 
   my $conf = new FS::Conf;