Unlocalised string fixes

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@391 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 2 insertions, 4 deletions

diff --git a/bin/admin.pl b/bin/admin.pl
index 2c7c2da7..2e208ca7 100755
--- a/bin/admin.pl
+++ b/bin/admin.pl
@@ -113,8 +113,8 @@ sub setup_initial_password {
 		<a href="http://www.ledgersmb.org/"><img src="ledger-smb.png" width="200" height="100" border="0" alt="LedgerSMB Logo" /></a>
 		<h1 class="login">|.$locale->text('Version').qq| $form->{version} <br />|.$locale->text('Administration').qq|</h1>
 		
-		<fieldset><legend>Change password</legend>
-		<p>This is your first time logging into LedgerSMB.  Please set your administrative password</p>
+		<fieldset><legend>|.$locale->text('Change password').qq|</legend>
+		<p>|.$locale->text('This is your first time logging into LedgerSMB.  Please set your administrative password').qq|</p>
 		
 		<form method="post" action="$form->{script}" name="admin">
 						<table>
@@ -402,8 +402,6 @@ sub form_header {
 															: qq|<option value="$key">$countrycodes{$key}</option>|;
 	}
 
-	$countrycodes = qq|<option value="">English</option>\n$countrycodes|;
-
 	# is there a templates basedir
 	if (! -d "${LedgerSMB::Sysconfig::templates}") {
 		$form->error($locale->text('Directory').": ${LedgerSMB::Sysconfig::templates} ".$locale->text('does not exist'));