--- /usr/lib/perl5/vendor_perl/5.10.0/rpmdrake.pm.orig	2008-03-19 16:25:42.000000000 +0100
+++ /usr/lib/perl5/vendor_perl/5.10.0/rpmdrake.pm	2008-03-20 17:17:14.000000000 +0100
@@ -207,6 +207,7 @@
     }
     my $banner = $options{banner} ? getbanner() : undef;
     my $text_w;
+    my $button_yes;
     gtkadd(
 	$d->{window},
 	gtkpack_(
@@ -226,23 +227,23 @@
 		    ref($options{yesno}) eq 'ARRAY' ? map {
 			my $label = $_;
 			gtksignal_connect(
-			    Gtk2::Button->new($label),
+			    $button_yes=Gtk2::Button->new($label),
 			    clicked => sub { $d->{retval} = $label; Gtk2->main_quit }
 			);
 		    } @{$options{yesno}}
 		    : (
 			$options{yesno} ? (
-			    gtksignal_connect(
-				Gtk2::Button->new($options{text}{no} || N("No")),
+			    gtksignal_connect( 
+				Gtk2::Button->new($options{text}{no} || N("No")), 
 				clicked => sub { $d->{retval} = 0; Gtk2->main_quit }
 			    ),
 			    gtksignal_connect(
-				Gtk2::Button->new($options{text}{yes} || N("Yes")),
+				$button_yes=Gtk2::Button->new($options{text}{yes} || N("Yes")),
 				clicked => sub { $d->{retval} = 1; Gtk2->main_quit }
 			    ),
 			)
 			: gtksignal_connect(
-			    Gtk2::Button->new(N("Ok")),
+			    $button_yes=Gtk2::Button->new(N("Ok")),
 			    clicked => sub { Gtk2->main_quit }
 			)
 		    )
@@ -250,6 +251,7 @@
 	    )
 	)
     );
+    $d->{window}->set_focus($button_yes); #not the better way when we have more that 2 buttons but with such code ...
     $text_w->set_size_request($typical_width*2, $options{scroll} ? 300 : -1);
     $d->main;
     return $d->{retval};
@@ -294,6 +296,7 @@
 	} \@radios, $list,
     ) : gtkpack__(Gtk2::VBox->new(0, 0), @radios);
     my $choice;
+    my $button_ok;
     gtkadd(
 	$d->{window},
 	gtkpack__(
@@ -307,7 +310,7 @@
 		    Gtk2::Button->new(N("Cancel")), clicked => sub { Gtk2->main_quit }),
           ),
           gtksignal_connect(
-		    Gtk2::Button->new(N("Ok")), clicked => sub {
+		    $button_ok=Gtk2::Button->new(N("Ok")), clicked => sub {
 			each_index { $_->get_active and $choice = $::i } @radios;
 			Gtk2->main_quit;
 		    }
@@ -315,6 +318,7 @@
 	    )
 	)
     );
+    $d->{window}->set_focus($button_ok);
     $d->main;
     $choice;
 }