close to prerelase

werc/apps/blagh/app.rc

@@ -49,7 +49,7 @@ fn blagh_init {
         if not if(~ $req_path $blagh_uri^index.rss)
             blagh_setup_feed_handlers rss20.tpl 'text/xml; charset=utf-8'
 
-				if not if(~ $req_path $blagh_uri^feed.json)
+		if not if(~ $req_path $blagh_uri^feed.json)
             blagh_setup_feed_handlers jsonfeed.tpl 'application/json; charset=utf-8'
 
         if not if(~ $req_path $blagh_uri^new_post && ! ~ $#editor_mode 0) {
@@ -101,16 +101,16 @@ fn get_post_list {
 }
 
 fn mkbpost {
-    bptext=$1
-    bpdate=$2
-    bptitle=$3
-    bpid=$4
+    bptext=$1;
+    bpdate=$2;
+    bptitle=$3;
+    bpid=$4;
     _status=()
     if(~ $"bptext '')
         _status=($_status 'You need to provide a post body.')
     if(! ~ $"bpdate [0-9][0-9][0-9][0-9]/[0-9][0-9]/[0-9][0-9])
         _status=($_status 'Invalid date: '''^$"bpdate^'''') # XXX Should make semantic check.
-
+    
     if(~ $#_status 0) {
         umask 002 # Let group write
         if(! ~ $"bpid '')

werc/apps/blagh/rss20.tpl

@@ -19,7 +19,7 @@ fn statpost {
         <link>%($base_url^$req_path%)</link>
         <description><![CDATA[%($blogDesc%)]]></description>
         <language>en-us</language>
-        <generator><![CDATA[Tom Duff's rc, and Kris Maglione's clever hackery]]></generator>
+        <generator><![CDATA[werc blagh app]]></generator>
 %{
         # <webMaster>uriel99+rss@gmail.com (Uriel)</webMaster>
 	# rfc2822 last time channel content changed.
@@ -32,7 +32,7 @@ fn statpost {
 %}
         <item>
             <title><![CDATA[%($title%)]]></title>
-            <author><![CDATA[%($by%)@noreply.cat-v.org (%($by%))]]></author>
+            <author><![CDATA[%($by%)]]></author>
             <link>%($post_uri%)</link>
             <guid isPermaLink="true">%($post_uri%)</guid>
             <pubDate>%($pubdate%)</pubDate>