X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=torrus%2Fperllib%2FTorrus%2FDevDiscover%2FArbor_E.pm;h=b80da4fc83c50eb7624bb98b4061de83daba1a8e;hp=076d79867b607a5c35ac1f1a0749599bf7b5e42c;hb=bd7c3e3b555f13ca3e2a119496c376c7c1b64c98;hpb=9cdee88c5fbadc5c9ab61b8b04c20589a40e7277

diff --git a/torrus/perllib/Torrus/DevDiscover/Arbor_E.pm b/torrus/perllib/Torrus/DevDiscover/Arbor_E.pm
index 076d79867..b80da4fc8 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.1.1.1.2.1 2011-12-16 22:43:56 ivan Exp $
 # Jon Nistor <nistor at snickers.org>
 #
 # 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};