--- svn/index.cgi	2008/10/27 19:38:41	44
+++ svn/index.cgi	2008/10/27 20:09:47	46
@@ -49,7 +49,9 @@
 	return (
 		$q->start_form( -name => 'current_repository', -id => 'current_repository', -method => 'post' ),
 		"From repository ",
-		$q->popup_menu( -name => 'repository', -values => [ @repositories ], -onChange => $onChange ),
+		$q->param('did_submit') ?
+			$q->popup_menu( -name => 'repository', -values => [ @repositories ], -onChange => $onChange ) :
+			$q->radio_group( -name => 'repository', -values => [ @repositories ], -onChange => $onChange ), # , -linebreak => 'true' ),
 		" show ",
 		$q->popup_menu( -name => 'limit', -values => [ qw/100 500 1000 5000 10000/ ], -onChange => $onChange ),
 		" revisions and ",