shithub: werc

Download patch

ref: 9a628dc0c68560ea8651b3d516fa35b71da2e2b2
parent: 9ee98142e778cc3146700aaa0738bd8add5588ff
author: uriel <[email protected]>
date: Mon Jun 25 19:14:52 EDT 2007

Add 'permalinks' to blog posts.

--- a/bin/controller.rc
+++ b/bin/controller.rc
@@ -75,7 +75,7 @@
 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