X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=torrus%2Fperllib%2FTorrus%2FDevDiscover%2FArbor_E.pm;h=f3f7c8c6354731a92b21295c5f5769c531c1adeb;hp=076d79867b607a5c35ac1f1a0749599bf7b5e42c;hb=d8121864c259721b1bd000d61b99efb348eee170;hpb=97883f4e483e4e879311079707d090c6974fdaea diff --git a/torrus/perllib/Torrus/DevDiscover/Arbor_E.pm b/torrus/perllib/Torrus/DevDiscover/Arbor_E.pm index 076d79867..f3f7c8c63 100644 --- a/torrus/perllib/Torrus/DevDiscover/Arbor_E.pm +++ b/torrus/perllib/Torrus/DevDiscover/Arbor_E.pm @@ -18,7 +18,7 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. # -# $Id: Arbor_E.pm,v 1.1 2010-12-27 00:03:52 ivan Exp $ +# $Id: Arbor_E.pm,v 1.2 2011-12-16 22:43:52 ivan Exp $ # Jon Nistor # # NOTE: This module has been tested against v7.5.x, v7.6.x, v9.0.x, v9.1.x @@ -1049,7 +1049,7 @@ sub buildConfig Debug(" Offer: $offerName"); - foreach my $bundleID ( @{%{$offerBundle}->{$offerNameID}} ) + foreach my $bundleID ( @{$offerBundle->{$offerNameID}} ) { my @btemplates; my $bundleName = $data->{'arbor_e'}{'bundleName'}{$bundleID};