[interchange-cvs] interchange - ton modified dist/lib/UI/pages/admin/wizard/do_launch.html

[interchange-core@interchange.redhat.com]

User:      ton
Date:      2001-09-18 14:02:13 GMT
Modified:  dist/lib/UI/pages/admin/wizard Tag: STABLE_4_8-branch
Modified:           do_launch.html
Log:
	Prepared for translation.

Revision  Changes    Path
No                   revision



No                   revision



2.1.2.1   +7 -7      interchange/dist/lib/UI/pages/admin/wizard/do_launch.html


rev 2.1.2.1, prev_rev 2.1
Index: do_launch.html
===================================================================
RCS file: /var/cvs/interchange/dist/lib/UI/pages/admin/wizard/do_launch.html,v
retrieving revision 2.1
retrieving revision 2.1.2.1
diff -u -r2.1 -r2.1.2.1
--- do_launch.html	2001/07/27 20:56:01	2.1
+++ do_launch.html	2001/09/18 14:02:13	2.1.2.1
@@ -46,28 +46,28 @@
 		next unless $val = $doit{$_};
 		if( ref($val) =~ /CODE/) {
 			my $status = $val->();
-			push @messages, "$_ subroutine returned $status.";
+			push @messages, errmsg("%s subroutine returned %s.", $_, $status);
 		}
 		elsif($val =~ /\w+/) {
 			$vdb->set_field($val, 'Variable', $Values->{$_});
-			push @messages, "$_ set $val to '$Values->{$_}' in variable.";
+			push @messages, errmsg("%s set %s to '%s' in variable.", $_, $val, $Values->{$_});
 		}
 		else {
-			@errors, "Don't know what to do with $_=$val";
+			@errors, errmsg("Don't know what to do with %s=%s", $_, $val);
 		}
 	}
 
-	$out = "Messages: <BR>";
+	$out = errmsg("Messages") . ": <BR>";
 	$out .= join "<BR>", @messages;
-	$out .= "<P>Errors: <BR>";
+	$out .= "<P>" . errmsg("Errors") . ": <BR>";
 	$out .= join "<BR>", @errors;
 [/perl]
 -->
 <P>
-Congratulations!  Your site has been activated!
+[L]Congratulations!  Your site has been activated![/L]
 </P>
 <blockquote>
-<LARGE><A HREF="[area index]">Go to catalog home page</P></LARGE>
+<LARGE><A HREF="[area index]">[L]Go to catalog home page[/L]</P></LARGE>
 </blockquote>
 
 @_UI_STD_FOOTER_@