===================================================================
RCS file: /cvs/pta/pta_import.pl,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -p -r1.28 -r1.29
--- pta/pta_import.pl	2020/12/11 19:28:12	1.28
+++ pta/pta_import.pl	2021/05/19 17:10:53	1.29
@@ -21,17 +21,6 @@ use Getopt::Std qw(getopts);
 
 our ($opt_I);
 
-my %banks = (
-    "bbva_usa"              => \&import_bbva_usa,
-    "capital_one_360"       => \&import_capital_one_360,
-    "capital_one_credit"    => \&import_capital_one_credit,
-    "chase_credit"          => \&import_chase_credit,
-    "etrade_ira"            => \&import_etrade_ira,		
-    "optum_hsa"             => \&import_optum_hsa,
-    "sparkasse_camt"        => \&import_sparkasse_camt,
-    "wellsfargo"            => \&import_wellsfargo,
-);
-
 my %date_formats = (
     'MM/DD/YYYY' => 's#(\d+)/(\d+)/(\d+)#$3$1$2#',
     'MM/DD/YY'   => 's#(\d+)/(\d+)/(\d+)#20$3$1$2#',
@@ -54,7 +43,6 @@ unless ($opt_I) {
 	usage;
 }
 my $account_name = $opt_I;
-$banks{$account_name} or die "unknown accountname: $account_name";
 
 # Parse the configuration file.
 my $fn = "import/" . $account_name . ".txt";