
richter at apache
Apr 9, 2006, 9:35 PM
Post #1 of 1
(1105 views)
Permalink
|
|
svn commit: r392884 - in /perl/embperl/trunk/eg: images/EmbperlLogo.gif web/base.epl web/header.epl web/menuleft.epl web/pod/content.epl
|
|
Author: richter Date: Sun Apr 9 21:35:11 2006 New Revision: 392884 URL: http://svn.apache.org/viewcvs?rev=392884&view=rev Log: Website update Added: perl/embperl/trunk/eg/images/EmbperlLogo.gif (with props) Modified: perl/embperl/trunk/eg/web/base.epl perl/embperl/trunk/eg/web/header.epl perl/embperl/trunk/eg/web/menuleft.epl perl/embperl/trunk/eg/web/pod/content.epl Added: perl/embperl/trunk/eg/images/EmbperlLogo.gif URL: http://svn.apache.org/viewcvs/perl/embperl/trunk/eg/images/EmbperlLogo.gif?rev=392884&view=auto ============================================================================== Binary file - no diff available. Propchange: perl/embperl/trunk/eg/images/EmbperlLogo.gif ------------------------------------------------------------------------------ svn:executable = * Propchange: perl/embperl/trunk/eg/images/EmbperlLogo.gif ------------------------------------------------------------------------------ svn:mime-type = application/octet-stream Modified: perl/embperl/trunk/eg/web/base.epl URL: http://svn.apache.org/viewcvs/perl/embperl/trunk/eg/web/base.epl?rev=392884&r1=392883&r2=392884&view=diff ============================================================================== --- perl/embperl/trunk/eg/web/base.epl (original) +++ perl/embperl/trunk/eg/web/base.epl Sun Apr 9 21:35:11 2006 @@ -6,7 +6,14 @@ <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"> - <title>Embperl</title> + <title>Embperl + [$if @{$r -> {menuitems}} > 1 || $r -> {menuitems}[0]{menu} ne 'Home' $] + [- $i = 0 -] + [$foreach $item (@{$r -> {menuitems}}) $] + - [+ $r -> gettext($item -> {menu}) +] + [$endforeach$] + [$endif$] + </title> <style type="text/css"> [- $font = 'font-family: Geneva,Arial,Helvetica;' ; Modified: perl/embperl/trunk/eg/web/header.epl URL: http://svn.apache.org/viewcvs/perl/embperl/trunk/eg/web/header.epl?rev=392884&r1=392883&r2=392884&view=diff ============================================================================== --- perl/embperl/trunk/eg/web/header.epl (original) +++ perl/embperl/trunk/eg/web/header.epl Sun Apr 9 21:35:11 2006 @@ -27,7 +27,35 @@ [$endforeach$] [$endif$] </td> - <td align="right" valign="middle" height="99%">[# search is comeing soon -> [= Search =]: <input type="text" name="search"> #]</td> + <td align="right" valign="middle" height="99%"> + [# search is comeing soon -> [= Search =]: <input type="text" name="search"> #] + +<!-- SiteSearch Google --> +<form method="get" action="http://www.google.de/custom" target="_top"> +<table border="0" bgcolor="#ffffff"> +<tr><td nowrap="nowrap" valign="top" align="left" height="32"> +<a href="http://www.google.com/"> +<img src="http://www.google.com/logos/Logo_25wht.gif" border="0" alt="Google" align="middle"></img></a> +</td> +<td nowrap="nowrap"> +<input type="hidden" name="domains" value="www.ecos.de"></input> +<input type="text" name="q" size="31" maxlength="255" value=""></input> +<input type="radio" name="sitesearch" value="" checked="checked"></input> +<font size="-1" color="#000000">Web</font> +<input type="radio" name="sitesearch" value="www.ecos.de"></input> +<font size="-1" color="#000000">www.ecos.de</font> +<input type="hidden" name="client" value="pub-6848064800813254"></input> +<input type="hidden" name="forid" value="1"></input> +<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> +</td></tr></table> +</form> +<!-- SiteSearch Google --> + + </td> </tr> </table> </td> Modified: perl/embperl/trunk/eg/web/menuleft.epl URL: http://svn.apache.org/viewcvs/perl/embperl/trunk/eg/web/menuleft.epl?rev=392884&r1=392883&r2=392884&view=diff ============================================================================== --- perl/embperl/trunk/eg/web/menuleft.epl (original) +++ perl/embperl/trunk/eg/web/menuleft.epl Sun Apr 9 21:35:11 2006 @@ -58,21 +58,27 @@ <table width="152" border="0" cellspacing="0" cellpadding="0"> <tr> - <td><img src="[+ $r -> {imageuri} +]h_content.gif" width="152" height="19"></td> + <td><img src="[+ $r -> {imageuri} +]h_content.gif" width="152" height="19"><br></td> </tr> +[# <tr> <td> </td> </tr> +#] [- menu ($r -> {menu} , 0, 1) -] +[# <tr> <td> </td> </tr> +#] <tr> - <td><img src="[+ $r -> {imageuri} +]h_current-v.gif" width="152" height="19"></td> + <td><img src="[+ $r -> {imageuri} +]h_current-v.gif" width="152" height="19"><br></td> </tr> +[# <tr> <td> </td> </tr> +#] <tr> <td><img src="[+ $r -> {imageuri} +]linie-nav.gif" width="152" height="1"></td> </tr> @@ -86,4 +92,27 @@ <td><img src="[+ $r -> {imageuri} +]linie-nav.gif" width="152" height="1"></td> </tr> #] + + <tr> + <td align="left" valign="top"> + <br> +<script type="text/javascript"><!-- +google_ad_client = "pub-6848064800813254"; +google_alternate_color = "ffffff"; +google_ad_width = 120; +google_ad_height = 90; +google_ad_format = "120x90_0ads_al_s"; +google_ad_channel =""; +google_color_border = "B4D0DC"; +google_color_bg = "ECF8FF"; +google_color_link = "0000CC"; +google_color_url = "008000"; +google_color_text = "6F6F6F"; +//--></script> +<script type="text/javascript" + src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> +</script> + </td> + </tr> + </table> Modified: perl/embperl/trunk/eg/web/pod/content.epl URL: http://svn.apache.org/viewcvs/perl/embperl/trunk/eg/web/pod/content.epl?rev=392884&r1=392883&r2=392884&view=diff ============================================================================== --- perl/embperl/trunk/eg/web/pod/content.epl (original) +++ perl/embperl/trunk/eg/web/pod/content.epl Sun Apr 9 21:35:11 2006 @@ -1,3 +1,4 @@ +<table><tr><td valign="top" width="95%"> [- $r = shift -] [$if $r -> param -> uri !~ /html?$|\/$/ $] @@ -18,3 +19,24 @@ [$endforeach$] </pre> [$endif$] +</td> +<td width=130 align="center" valign="top"> +<script type="text/javascript"><!-- +google_ad_client = "pub-6848064800813254"; +google_alternate_color = "ffffff"; +google_ad_width = 120; +google_ad_height = 600; +google_ad_format = "120x600_as"; +google_ad_type = "text"; +google_ad_channel =""; +google_color_border = "FDFFCA"; +google_color_bg = "FDFFCA"; +google_color_link = "0000CC"; +google_color_url = "008000"; +google_color_text = "000000"; +//--></script> +<script type="text/javascript" + src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> +</script></td> +</tr> +</table> \ No newline at end of file --------------------------------------------------------------------- To unsubscribe, e-mail: embperl-cvs-unsubscribe [at] perl For additional commands, e-mail: embperl-cvs-help [at] perl
|