Commits

Anonymous committed 22123c7

r6393@telaviv1: shlomi | 2009-02-14 23:18:16 +0200
Various validation fixes.

Comments (0)

Files changed (9)

lib/Shlomif/Homepage/ArticleIndex.pm

+package Shlomif::Homepage::ArticleIndex;
+
+use strict;
+use warnings;
+
+use XML::LibXSLT;
+use XML::LibXML;
+
+my $parser = XML::LibXML->new();
+my $xslt = XML::LibXSLT->new();
+
+my $base_path="../lib/article-index/";
+my $source = $parser->parse_file("$base_path/article-index.xml");
+my $style_doc = $parser->parse_file("$base_path/article-index.xsl");
+
+my $stylesheet = $xslt->parse_stylesheet($style_doc);
+
+my $results = $stylesheet->transform($source);
+
+my $out_string = $stylesheet->output_string($results);
+
+$out_string =~ s{\A.*?<body>}{}s;
+$out_string =~ s{</body>.*\z}{}s;
+
+print $out_string;
+
+1;

t2/humour/Star-Trek/We-the-Living-Dead/index.html.wml

 some Myths about Israel."</a> - an essay I wrote.
 </li>
 
-</li>
 <li>
 <a href="http://en.wikipedia.org/wiki/Portal:Judaism">The Wikipedia Judaism
 Portal</a>

t2/humour/bits/RMS-Lint/index.html.wml

     <p>
     Legitimate use of the term "Linux" to refer to just the kernel
     are also warned about, but can be overridden.
+    </p>
     </li>
     <li>
     <p>

t2/lecture/Freecell-Solver/The-Next-Pres/index.html.wml

 </p>
 
 <ul>
-<li><a href="slides/"><b>The Slides</b></li>
+<li><a href="slides/"><b>The Slides</b></a></li>
 <li><a href="slides/src.tar.gz">Quad-Pres Source for the Slides</a></li>
 </ul>
 

t2/lecture/W2L/Development/index.html.wml

 </p>
 
 <ul>
-<li><a href="slides/"><b>The Slides</b></li>
+<li><a href="slides/"><b>The Slides</b></a></li>
 <li><a href="slides/src.tar.gz">Quad-Pres Source for the Slides</a></li>
 </ul>

t2/lecture/W2L/Network/index.html.wml

 </p>
 
 <ul>
-<li><a href="slides/"><b>The Slides</b></li>
+<li><a href="slides/"><b>The Slides</b></a></li>
 <li><a href="slides/src.tar.gz">Quad-Pres Source for the Slides</a></li>
 </ul>

t2/lecture/mini/mdda/index.html.wml

 </p>
 
 <ul>
-<li><a href="slides/"><b>The Slides</b></li>
+<li><a href="slides/"><b>The Slides</b></a></li>
 <li><a href="slides/src.tar.gz">Quad-Pres Source for the Slides</a></li>
 </ul>

t2/open-source/favourite/index.html.wml

 <a href="http://noscript.net/">NoScript</a> - an extension that prevents
 running unauthorised JavaScript, Flash, Java, etc. except from white-listed
 sources.
+</li>
 </ul>
 
 <h3 id="konqueror"><a href="http://www.konqueror.org/">Konqueror</a></h3>

t2/philosophy/Index/index.html.wml

 <latemp_subject "Index to Shlomi Fish's Essays" />
 
 <:{
-use XML::LibXSLT;
-use XML::LibXML;
 
-my $parser = XML::LibXML->new();
-my $xslt = XML::LibXSLT->new();
+require Shlomif::Homepage::ArticleIndex;
 
-my $base_path="../lib/article-index/";
-my $source = $parser->parse_file("$base_path/article-index.xml");
-my $style_doc = $parser->parse_file("$base_path/article-index.xsl");
-
-my $stylesheet = $xslt->parse_stylesheet($style_doc);
-
-my $results = $stylesheet->transform($source);
-
-my $out_string = $stylesheet->output_string($results);
-
-$out_string =~ s{^.*<body>}{}s;
-$out_string =~ s{</body>.*$}{}s;
-
-print $out_string;
 }:>