do NOT delete the existing data

diff --git a/bin/import-optigold.pl b/bin/import-optigold.pl
index 1284d85..03efe51 100755 (executable)
--- a/bin/import-optigold.pl
+++ b/bin/import-optigold.pl
@@ -663,7 +663,7 @@ while ( @tables ) {
   my ($id)      = $href->{'id'};
   my ($skey)    = $href->{'skey'};
 
-  $d_dbh->do("delete from $table");   #XXX FIXME!
+  #$d_dbh->do("delete from $table");
 
   my $s_sth = $s_dbh->prepare("select count(*) from $stable");
   $s_sth->execute or die $s_sth->errstr;