More relative URLs please.

src/indices.lisp

@@ -33,8 +33,7 @@
 (defun write-index (posts filename title &optional prev next)
   "Write out the HTML for POSTS to FILENAME.html."
   (let ((content (loop for post in posts
-                    collect (list :url (format nil "~a/posts/~a.html"
-                                               (domain *config*) (post-slug post))
+                    collect (list :url (format nil "posts/~a.html" (post-slug post))
                                   :title (post-title post)
                                   :date (post-date post)
                                   :content (render-content (post-content post)

themes/hyde/base.tmpl

@@ -8,7 +8,7 @@
     <meta http-equiv="content-type" content="application/xhtml+xml; charset=UTF-8" />
     <link href="http://fonts.googleapis.com/css?family=Vollkorn:regular,italic,bold,bolditalic" rel="stylesheet" type="text/css" />
     <link href="http://fonts.googleapis.com/css?family=Inconsolata" rel="stylesheet" type="text/css" />
-    <link href= "{$siteroot}/css/style.css" rel="stylesheet" type="text/css" />
+    <link href= "css/style.css" rel="stylesheet" type="text/css" />
     <link rel="alternate" href="{$siteroot}/feed.atom" type="application/atom+xml" />
     {if $headInject} {$headInject |noAutoescape} {/if}
   </head>