Mailing List Archive

svn commit: r393496 - /perl/embperl/trunk/eg/web/header.epl
Author: richter
Date: Wed Apr 12 09:22:29 2006
New Revision: 393496

URL: http://svn.apache.org/viewcvs?rev=393496&view=rev
Log:
website update

Modified:
perl/embperl/trunk/eg/web/header.epl

Modified: perl/embperl/trunk/eg/web/header.epl
URL: http://svn.apache.org/viewcvs/perl/embperl/trunk/eg/web/header.epl?rev=393496&r1=393495&r2=393496&view=diff
==============================================================================
--- perl/embperl/trunk/eg/web/header.epl (original)
+++ perl/embperl/trunk/eg/web/header.epl Wed Apr 12 09:22:29 2006
@@ -49,8 +49,8 @@
<input type="hidden" name="ie" value="ISO-8859-1"></input>
<input type="hidden" name="oe" value="ISO-8859-1"></input>
<input type="hidden" name="cof" value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:336699;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;LH:74;LW:74;L:http://www.ecos.de/embperl/images/EmbperlLogo.gif;S:http://www.ecos.de/embperl;LP:1;FORID:1;"></input>
-<input type="hidden" name="hl" value="de"></input>
-<input type="submit" name="sa" value="Suchen"></input>
+<input type="hidden" name="hl" value="[+ $r -> param -> language +]"></input>
+<input type="submit" name="sa" value="[+ $r -> param -> language eq 'de'?'Suchen':'Search' +]"></input>
</td></tr></table>
</form>
<!-- SiteSearch Google -->



---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org