aboutsummaryrefslogtreecommitdiff
path: root/module/calp/entry-points/html.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/calp/entry-points/html.scm')
-rw-r--r--module/calp/entry-points/html.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/module/calp/entry-points/html.scm b/module/calp/entry-points/html.scm
index b2f613ea..8c400e1d 100644
--- a/module/calp/entry-points/html.scm
+++ b/module/calp/entry-points/html.scm
@@ -19,7 +19,7 @@
:use-module ((sxml simple) :select (sxml->xml))
:use-module ((sxml transformations) :select (href-transformer))
- :use-module (directories)
+ :use-module ((xdg basedir) :prefix xdg-)
:autoload (vcomponent instance) (global-event-object)
)
@@ -74,7 +74,7 @@
;; TODO nicer way to resolve static
(let ((link (path-append output-directory "/static")))
(unless (file-exists? link)
- (symlink (path-append data-directory "www/static") link)))))
+ (symlink (path-append (xdg-data-home) "/calp/www/static") link)))))
(define (re-root-static tree)