fix freesidestatus setting in IVR import, RT#29055

diff --git a/FS/FS/cdr/Import.pm b/FS/FS/cdr/Import.pm
index e13c682..7a37758 100644 (file)
--- a/FS/FS/cdr/Import.pm
+++ b/FS/FS/cdr/Import.pm
@@ -120,7 +120,7 @@ sub dbi_import {
       my $updated = $dbi->do(
         "UPDATE $table SET freesidestatus = 'done' WHERE $pkey = ?",
         undef,
-        $row->{'$pkey'}
+        $row->{$pkey}
       );
       #$updates += $updated;
       die "failed to set status: ".$dbi->errstr."\n" unless $updated;