Start implimenting in real src/

perlorg · Jul 30, 2012 · e91971d · e91971d
1 parent 1558af0
commit e91971d
Show file tree

Hide file tree

Showing 12 changed files with 124 additions and 424 deletions.
diff --git a/bin/xml b/bin/xml
@@ -342,7 +342,7 @@ foreach my $continent (@continents) {
         mkpath $directories;
         warn "$file -> $destfile\n";
 
-        if ( $file =~ /\.png$/ ) {
+        if ( $file =~ /\.png$/ || $file =~ /\.jpg$/ ) {
             copy( $file, $destfile );
         } else {
             $parms->{description}

diff --git a/lib/layout b/lib/layout
@@ -1,134 +1,59 @@
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
+<!doctype html>
-   "http://www.w3.org/TR/2002/REC-xhtml1-20020801/DTD/xhtml1-transitional.dtd">
+    <html lang="en">
-<html>
+    <head>
-  <head>
+        <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/> 
-       <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/> 
+        <meta name="description" content="[% description %]" />
-    <meta name="description" 
+        <meta name="keywords" content="Perl,Perl Mongers,Mongers,User Group,Meeting" />
-          content="[% description %]" />
+        <meta name="MsSmartTagsPreventParsing" content="TRUE" />
-    <meta name="keywords"
+        <title>[% title or "Perl Mongers" %]</title>
-          content="Perl,Perl Mongers,Mongers,User Group,Meeting" />
+        <link rel="stylesheet" href="/includes/style.css">
-    <meta name="MsSmartTagsPreventParsing" content="TRUE" />
+    </head>
-    <title>[% title or "Perl Mongers" %]</title>
-
-    <link rel="stylesheet" type="text/css"
-          href="/graphics/basic.css" 
-          title="basic" />
-    <link rel="shortcut icon" href="/groups/favicon.ico">
-    <!-- This key good for http://www.pm.org/groups -->
-    <script type="text/javascript"
-    src="http://maps.google.com/maps?file=api&amp;v=1&amp;key=ABQIAAAAjrB1EtK9LGPa_E4v8BqfIhTlJQKl_2NMosGPJ4kJAF_u_Vcv4hQ6A7lpErcC3Q23mBu5eRPQ_SGvBA&amp;sensor=false">
-    </script>
 
-    <script type="text/javascript" src="/groups/map.js"></script> 
+    <body class="index">
-</head>
+    <div id="wrapper">
-
+
-<body  [% IF onload %] onload="[% onload %]()"[% END %]  [% IF onunload %] onunload="[% onunload %]()"[% END %] >
+        <header>
-<table border="0" cellpadding="6" cellspacing="0" width="100%">
+            <a href="/"><img src="/images/camel.png" height="30px" id="onion_logo" alt="Perl Mongers"></a>
-  <tr>
+        	<div id="nav_holder">
-    <td class="side" width="120" valign="top">
+                <nav>
-      <table cellpadding="2" cellspacing="0" border="0">
+                    <div id="large_copy">
-        <tr>
+                        <a href="/groups/">Find a group</a>
-          <td bgcolor="#000000"><a href="/"><img src="/graphics/title.png" width="150" height="65" border="0" alt="Perl Mongers" /></a></td>
+                        <a href="/start/">Start a group</a>
-        </tr>
+                        <a href="/other/">Useful links</a>
-      </table>
+                    </div>
-[%# <br> %]
+            		<div id="small_copy">Perl Groups: 
-
+            			<a href="/groups/">Find</a>
-[% INCLUDE sideheader
+            			<a href="/start/">Start</a>
-  major = {"Perl Mongers" => "/"}
+            		</div>
-  minor = {
+                </nav>
-    "Contact" => "/contact/",
+        	</div>
-    "FAQ" => "/faq/",
+        </header>
-    "Running a group" => "/successful/",
+
-    "Invite a guru" => "/invite/",
+[%# INCLUDE heading %]
-    "Start a group" => "/start/",
-  }
-%]
-
-[% INCLUDE sideheader
-  major = {"User groups" => "/groups/"}
-  minor = {
-    "North America" => "/groups/north_america.html",
-    "South America" => "/groups/south_america.html",
-    "Central America" => "/groups/central_america.html",
-    "Europe" => "/groups/europe.html",
-    "Non-geographical" => "/groups/non_geographical.html",
-    "Oceania" => "/groups/oceania.html",
-    "Asia" => "/groups/asia.html",
-    "Africa" => "/groups/africa.html",
-  }
-%]
-
-[% 
-  pfbase = "http://www.perlfoundation.org/perl5/index.cgi?"; 
-  INCLUDE sideheader
-  major = {"Non-English" => "http://www.perlfoundation.org/perl5/index.cgi?international_perl_resources"}
-  minor = {
-    "Català"           => pfbase _ "catalan",
-    "Čeština"          => pfbase _ "czech",
-    "中文"             => pfbase _ "chinese",
-    "Hrvatski"         => pfbase _ "croatian",
-    "Nederlands"       => pfbase _ "dutch",
-    "Français"         => pfbase _ "french",
-    "Deutsch"          => pfbase _ "german",
-    "עברית"            => pfbase _ "hebrew",
-    "Magyar"           => pfbase _ "hungarian",
-    "Italiano"         => pfbase _ "italian",
-    "日本語"           => pfbase _ "japanese",
-    "한국어"           => pfbase _ "korean",
-    "Lietuvių kalba"   => pfbase _ "lithuanian",
-    "Norsk"            => pfbase _ "norwegian",
-    "Polski"           => pfbase _ "polish",
-    "Português"        => pfbase _ "portuguese",
-    "Română"           => pfbase _ "romanian",
-    "По-русски"        => pfbase _ "russian",
-    "Slovenčina"       => pfbase _ "slovakian",
-    "Español"          => pfbase _ "spanish",
-    "Svenska"          => pfbase _ "swedish",
-    "Türkçe"           => pfbase _ "turkish",
-   }
-%]
-
-[% INCLUDE sideheader
-  major = {"Affiliates" => "/"}
-  minor = {
-    "The Perl Foundation" => "http://www.perlfoundation.org/",
-    "Search CPAN" => "http://search.cpan.org/",
-    "MetaCPAN" => "http://metacpan.org/",
-    "Perl advocacy" => "http://www.perl.org/",
-    "Perl Blogs"  => "http://blogs.perl.org/",
-    "Iron Man"    => "http://ironman.enlightenedperl.org/",
-    "Perl Sphere" => "http://perlsphere.net/",
-    "Perl Buzz"   => "http://perlbuzz.com/",
-    "Perl Weekly News" => "http://perlweekly.com/",
-    "Perl.com" => "http://www.perl.com/",
-    "Perlmonks" => "http://www.perlmonks.com/",
-    "YAPC" => "http://www.yapc.org/",
-    "Perl training" => "http://www.perltraining.org/",
-    "Perl 6 planet" => "http://planetsix.perl.org/",
-    "Rakudo" => "http://www.rakudo.org/",
-  }
-%]
-
-</td>
-<td valign="top">
-[% INCLUDE heading %]
 
 [% content %]
 
-    </td>
+
-  </tr>
+       <div id="footer">
-  <tr>
+           <div id="google_translate_element"></div>
-    <td class="side" bgcolor="#0087d9" width="120">
+           <p>Copyright © 2012 <a href="http://www.perlfoundation.org/">The Perl Foundation</a>.</p>
-      <br /><br /><br />&nbsp;</td> 
+           <p>The Perl camel image is a trademark of <a href="http://www.oreilly.com/">O'Reilly Media, Inc.</a> Used with permission.</p>
-    <td valign="baseline">
+       </div>
-      <br /><br /><br /><br />
+
-      <p class="moddate">
+       <script type="text/javascript">
-           Copyright &copy; 2010 The Perl Foundation.<br/>
+       function googleTranslateElementInit() {
-           The Perl camel image is a trademark of <a href="http://www.oreilly.com">O'Reilly Media, Inc.</a>
+                 new google.translate.TranslateElement({
-           Used with permission.
+                   pageLanguage: 'en',
-      </p>
+                   autoDisplay: false
-    </td>
+                   ,
-  </tr>
+                   gaTrack: true,
-</table>
+                   gaId: 'UA-50555-1'
-</body>
+                         }, 'google_translate_element');
-</html>
+               }
+               </script><script src="http://translate.google.com/translate_a/element.js?cb=googleTranslateElementInit" type="text/javascript">
+       </script>
+   </div>
+
+
+   </body>
+   </html>
diff --git a/src/graphics/basic.css b/src/graphics/basic.css
diff --git a/testing/images/background_map.jpg → src/images/background_map.jpg b/testing/images/background_map.jpg → src/images/background_map.jpg
diff --git a/testing/images/background_map_lr.jpg → src/images/background_map_lr.jpg b/testing/images/background_map_lr.jpg → src/images/background_map_lr.jpg
diff --git a/testing/images/camel.png → src/images/camel.png b/testing/images/camel.png → src/images/camel.png
diff --git a/testing/images/onion.png → src/images/onion.png b/testing/images/onion.png → src/images/onion.png
diff --git a/src/graphics/title.png → src/images/title.png b/src/graphics/title.png → src/images/title.png
diff --git a/testing/includes/style.css → src/includes/style.css b/testing/includes/style.css → src/includes/style.css