X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8f64093b4d58bd4bd72cd7465b7e402ad949eaf1..b68c23bf6e98cf678081dcaa84a8593b10aaff29:/sql/Pg-upgrade2/cp_greeting_migration.pl?ds=inline diff --git a/sql/Pg-upgrade2/cp_greeting_migration.pl b/sql/Pg-upgrade2/cp_greeting_migration.pl index 46fa43885..176516572 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 .= "