Add 'permalinks' to blog posts.

2007-06-25 23:14:52 +02:00 · 2007-06-25 23:14:52 +02:00 · 3e7069e2fd
commit 3e7069e2fd
parent 9156762a5e
1 changed files with 1 additions and 1 deletions
--- a/bin/controller.rc
+++ b/bin/controller.rc
@ -75,7 +75,7 @@ fn sortedBlogPostList {
 fn blogTitle {
    title=`{basename $1 | sed 's/^[0-9\-]*_(.*)\.md$/\1/; s/_/ /g' }
    du=`{ls -l $1}
-    echo '##' $title '*('By $du(4) Last mod: $du(7 8 9) ')*'
+    echo '##<a href="' `{echo $1 | sed 's,^sites/[^/]*/*/,/,; s/\.md$//' } '">' $"title^'</a> *('By $du(4) Last mod: $du(7 8 9) ')*'
 }

 # Body