Merge pull request #99 from mawis/xhtml_blogging

Supporting other file extensions for the index page as well.

src/coleslaw.lisp

@@ -36,7 +36,8 @@ in REPO-DIR. Optionally, OLDREV is the revision prior to the last push."
       (publish ctype))
     (do-subclasses (itype index)
       (publish itype))
-    (update-symlink "index.html" "1.html")))
+    (update-symlink (format nil "index.~A" (page-ext *config*))
+                    (format nil "1.~A" (page-ext *config*)))))
 
 (defgeneric deploy (staging)
   (:documentation "Deploy the STAGING build to the directory specified in the config.")