aboutsummaryrefslogtreecommitdiff
path: root/module/calp/html/vcomponent.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-02-02 02:36:43 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2022-02-02 02:36:43 +0100
commitcf692903b848d7b02a1966da671f5c653212a25c (patch)
treec2eadcfc96a0f533c09bf2fea30aebb900045104 /module/calp/html/vcomponent.scm
parentDocumentation of (hnh util ...) (diff)
downloadcalp-cf692903b848d7b02a1966da671f5c653212a25c.tar.gz
calp-cf692903b848d7b02a1966da671f5c653212a25c.tar.xz
Move calculate-fg-color into calp subtree.
While the algorithm was general, the packing of colors, along with the error handling made it to non-portable.
Diffstat (limited to 'module/calp/html/vcomponent.scm')
-rw-r--r--module/calp/html/vcomponent.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/module/calp/html/vcomponent.scm b/module/calp/html/vcomponent.scm
index 4c1ebbb3..16f418c5 100644
--- a/module/calp/html/vcomponent.scm
+++ b/module/calp/html/vcomponent.scm
@@ -10,10 +10,9 @@
:use-module (datetime)
:use-module ((text util) :select (add-enumeration-punctuation))
:use-module ((web uri-query) :select (encode-query-parameters))
- :use-module (calp html util)
+ :use-module ((calp html util) :select (html-id calculate-fg-color))
:use-module ((calp html config) :select (edit-mode debug))
:use-module ((calp html components) :select (btn tabset form with-label))
- :use-module ((hnh util color) :select (calculate-fg-color))
:use-module ((crypto) :select (sha256 checksum->string))
:use-module ((xdg basedir) :prefix xdg-)
:use-module ((vcomponent recurrence) :select (repeating?))