X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/3cbc223a454e07b780f986ec92e6038cddc848b9..b65a230d60e86d2c18a3ab7222379905aea5ecd7:/sql/Pg-upgrade2/cp_greeting_migration.pl diff --git a/sql/Pg-upgrade2/cp_greeting_migration.pl b/sql/Pg-upgrade2/cp_greeting_migration.pl index 93f62134b..43d83e1ad 100644 --- a/sql/Pg-upgrade2/cp_greeting_migration.pl +++ b/sql/Pg-upgrade2/cp_greeting_migration.pl @@ -38,11 +38,11 @@ sub query_result { while (my $row = $sth2->fetchrow_hashref()) { if ($main::form->{"gender_$i"} eq "f" ) { - $mchecked = ""; - $fchecked = "checked"; + $mchecked = ""; + $fchecked = "checked"; } else { - $mchecked = "checked"; - $fchecked = ""; + $mchecked = "checked"; + $fchecked = ""; }; $gender_table .= "