From bd96ee15d52618089a84b70f8edc1170314bb950 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 25 Feb 2005 20:52:11 +0000
Subject: [PATCH] small bugfix for options option

---
 FS/FS/part_pkg.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FS/FS/part_pkg.pm b/FS/FS/part_pkg.pm
index 63cf00f57..a0683c822 100644
--- a/FS/FS/part_pkg.pm
+++ b/FS/FS/part_pkg.pm
@@ -190,7 +190,7 @@ sub insert {
   } elsif ( $options{'options'} ) {
 
     warn "  inserting part_pkg_option records for options hashref" if $DEBUG;
-    foreach my $optionname ( %{$options{'options'}} ) {
+    foreach my $optionname ( keys %{$options{'options'}} ) {
 
       my $part_pkg_option =
         new FS::part_pkg_option {
-- 
2.11.0