remove extraneous debugging
authorivan <ivan>
Mon, 29 Jan 2007 11:55:38 +0000 (11:55 +0000)
committerivan <ivan>
Mon, 29 Jan 2007 11:55:38 +0000 (11:55 +0000)
FS/FS/option_Common.pm

index 5ef6d0f..9a44561 100644 (file)
@@ -222,12 +222,10 @@ sub replace {
     my $opt_pkey = $newopt->primary_key;
 
     $newopt->$opt_pkey($oldopt->$opt_pkey) if $oldopt;
-    warn $oldopt;
     warn "FS::option_Common::replace: ".
          ( $oldopt ? "$newopt -> replace($oldopt)" : "$newopt -> insert" )
       if $DEBUG > 2;
     my $error = $oldopt ? $newopt->replace($oldopt) : $newopt->insert;
-    warn $error;
     if ( $error ) {
       $dbh->rollback if $oldAutoCommit;
       return $error;