swerc

commit a95acad9fd83086a85a8bac8a2493e39f654f81e
parent 845ce8253c57172e60b215384fcd0d6bc336534f
Author: uriel@engel.se.cat-v.org <unknown>
Date:   Thu, 25 Sep 2008 11:04:57 +0200

Dynamically generate a sitemap.txt when the sitemap page is requested
Diffstat:
M
lib/sitemap.tpl
 | 
19
+++++++++++++------

1 file changed, 13 insertions(+), 6 deletions(-)
diff --git a/lib/sitemap.tpl b/lib/sitemap.tpl
@@ -1,7 +1,8 @@
 <h1>Site map</h1>
 
 %{
-
+p=`{pwd}
+tmpfile=$p/tmp/sitemap_$pid.txt
 saveddf = $dirfilter
 
 fn getMdDesc {
@@ -17,9 +18,11 @@ fn listDir {
 
     echo '<ul>'
 
-    if (! ~ $#blogDirs 0 || ~ $1 blog Blog )
-        echo '' 
-    if not {
+    # Don't hide blog dirs for now
+    #if (! ~ $#blogDirs 0 || ~ $1 */blog */Blog )
+    #    echo '' 
+    #if not 
+    {
 
     for ( i in `{ ls -d $d/*/ $d/*.md $d/*.html $d/*.txt >[2]/dev/null |sed $dirfilter^'/index$/d;' } ) {
         desc = ''
@@ -38,7 +41,8 @@ fn listDir {
         if (! ~ $desc '')
             desc = ' - '$"desc
         tit = `{basename $i|sed 's/_/ /g'}
-        echo '<li><a style="text-transform: capitalize" href="'$i'">'^$"tit^'</a>' $desc '</li>' 
+        echo '<li><a style="text-transform: capitalize" href="/'$i'">'^$"tit^'</a>' $desc '</li>' 
+        echo $baseuri^$i >> $tmpfile
         if (test -d $i)
             @{ listDir $i }
     }
@@ -46,7 +50,10 @@ fn listDir {
     echo '</ul>'
 }
 
-cd $sitedir
+cd $sitedir 
 listDir .
 
+cp $tmpfile ./sitemap.txt
+rm $tmpfile
+
 %}