From e24a9f842f0295d01144db3ba4a597f309341241 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@samfundet.no>
Date: Thu, 17 Feb 2005 19:36:51 +0000
Subject: [PATCH 1/1] Automatically zoom to the new player when adding a new
 one.

---
 html/registration.pl             | 4 +++-
 html/templates/registration.tmpl | 6 +++++-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/html/registration.pl b/html/registration.pl
index ae6d534..a2da719 100755
--- a/html/registration.pl
+++ b/html/registration.pl
@@ -6,6 +6,7 @@ use warnings;
 
 my $cgi = new CGI;
 my $id = $cgi->param('id');
+my $selected_player = $cgi->param('player');
 
 my $dbh = ccbs::db_connect();
 
@@ -17,6 +18,7 @@ ccbs::print_header();
 ccbs::process_template('registration.tmpl', $tournament->{'tournamentname'}, {
 	tournament => $tournament,
 	registered => $registered,
-	available => $available
+	available => $available,
+	selected_player => $selected_player
 });
 $dbh->disconnect;
diff --git a/html/templates/registration.tmpl b/html/templates/registration.tmpl
index 73cdcdd..a51778f 100644
--- a/html/templates/registration.tmpl
+++ b/html/templates/registration.tmpl
@@ -9,7 +9,11 @@
       <td>
         <select name="player">
 [% FOR a = available %]
-          <option value="[% a.player %]">[% a.nick %]</option>
+[% IF a.player == selected_player %]
+           <option value="[% a.player %]" selected="selected">[% a.nick %]</option>
+[% ELSE %]
+           <option value="[% a.player %]">[% a.nick %]</option>
+[% END %]
 [% END %]
         </select>
       </td>
-- 
2.39.2