From: plugd <plugd@thelambdalab.xyz>
Date: Tue, 17 Aug 2021 19:56:50 +0000 (+0200)
Subject: Handle relative selectors.
X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=scratchy.git;a=commitdiff_plain;h=f03b019a39aad3138fe36ef33ab0b09d6066b504

Handle relative selectors.
---

diff --git a/scratchy.scm b/scratchy.scm
index 4258eee..12c7094 100644
--- a/scratchy.scm
+++ b/scratchy.scm
@@ -280,7 +280,7 @@
                    dir-selector config))
     ((type display-string selector)
      (serve-record (list type display-string
-                         (make-pathname dir-selector selector)
+                         (normalize-pathname (make-pathname dir-selector selector))
                          (config-host config) (config-port config))
                    dir-selector config))
     ((display-string selector)