diff --git a/helper/compare_dbs.pl b/helper/compare_dbs.pl
index 6ad1932..6686eb9 100755
--- a/helper/compare_dbs.pl
+++ b/helper/compare_dbs.pl
@@ -199,25 +199,13 @@ else {
 
 exit $exit;
 
-# XXX: Remove after mr10.5.
-sub old_option {
-    my ($name, $value) = @_;
-    my $newname = $name =~ tr/_/-/r;
-    $argv->{$name} = $value;
-    warn "$0: option --$name is deprecated; use --$newname instead\n";
-}
-
 sub get_options {
     GetOptions(
         'formatter=s'           => \$argv->{'formatter'},
         'schemes=s'             => \$argv->{'schemes'},
-        'user_db1=s'            => \&old_option,
         'user-db1=s'            => \$argv->{'user_db1'},
-        'pass_db1=s'            => \&old_option,
         'pass-db1=s'            => \$argv->{'pass_db1'},
-        'user_db2=s'            => \&old_option,
         'user-db2=s'            => \$argv->{'user_db2'},
-        'pass_db2=s'            => \&old_option,
         'pass-db2=s'            => \$argv->{'pass_db2'},
         'help|h'                => sub{ print_usage(); exit(0); },
     );