X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Foption_Common.pm;h=f258fa1d6ac46f1c0f7309f4af9696cce2674365;hb=ebbcc911db8bd989b8af34d0239ba32887f59c13;hp=c57e55b6168a3af5159d666f1681b77fdba1d5db;hpb=c3d44e9d01d88fde47d817df4c7d77c16f074e65;p=freeside.git

diff --git a/FS/FS/option_Common.pm b/FS/FS/option_Common.pm
index c57e55b61..f258fa1d6 100644
--- a/FS/FS/option_Common.pm
+++ b/FS/FS/option_Common.pm
@@ -81,7 +81,7 @@ sub insert {
     #  $dbh->rollback if $oldAutoCommit;
     #  return $@;
     #}
-    my $option_record = $option_table->new($href);
+    my $option_record = "FS::$option_table"->new($href);
 
     $error = $option_record->insert;
     if ( $error ) {
@@ -124,7 +124,7 @@ sub delete {
   }
   
   my $pkey = $self->pkey;
-  my $option_table = $self->option_table;
+  #my $option_table = $self->option_table;
 
   foreach my $obj ( $self->option_objects ) {
     my $error = $obj->delete;
@@ -198,7 +198,7 @@ sub replace {
     #  $dbh->rollback if $oldAutoCommit;
     #  return $@;
     #}
-    my $new = $option_table->new($href);
+    my $new = "FS::$option_table"->new($href);
 
     $new->optionnum($old->optionnum) if $old;
     my $error = $old ? $new->replace($old) : $new->insert;