diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-03-31 16:46:02 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-03-31 16:46:02 +0200 |
commit | 35a413167e323f8b0c9ea40fe7599ffb50e9e321 (patch) | |
tree | 9b00917547b4a3e756aab29543fbb6574e0f7788 /module/entry-points | |
parent | Fix IPv6 binding for server. (diff) | |
download | calp-35a413167e323f8b0c9ea40fe7599ffb50e9e321.tar.gz calp-35a413167e323f8b0c9ea40fe7599ffb50e9e321.tar.xz |
Attempt at decentralized configuration system.
Placing all possible configuration items in a central (parameters)
module scales really badly. This idea that any module can register
configuration parameters is better. The current implementation however
has the drawback that it requires that the module exposing the parameter
is loaded before the value can be sat, but that scales even worse.
A probable solution would be to abandon binding everything to guile's
module system, and instead let (util config) provide a `conf-ref' and a
`conf-set!' procedures.
A `define-configuration' similar to emacs `defcustom' could be of use,
mainly for retroactively type checking parameters.
Diffstat (limited to '')
-rw-r--r-- | module/entry-points/benchmark.scm | 2 | ||||
-rw-r--r-- | module/entry-points/html.scm | 2 | ||||
-rw-r--r-- | module/entry-points/ical.scm | 2 | ||||
-rw-r--r-- | module/entry-points/server.scm | 2 | ||||
-rw-r--r-- | module/entry-points/terminal.scm | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/module/entry-points/benchmark.scm b/module/entry-points/benchmark.scm index eff4c261..a21b4630 100644 --- a/module/entry-points/benchmark.scm +++ b/module/entry-points/benchmark.scm @@ -4,7 +4,7 @@ :use-module (ice-9 getopt-long) :use-module (util) :use-module (vcomponent) - :use-module (parameters) + :use-module (util config all) ) diff --git a/module/entry-points/html.scm b/module/entry-points/html.scm index 71a68f44..bacc8038 100644 --- a/module/entry-points/html.scm +++ b/module/entry-points/html.scm @@ -8,7 +8,7 @@ :use-module (datetime util) :use-module (ice-9 getopt-long) - :use-module (parameters) + :use-module (util config all) ) diff --git a/module/entry-points/ical.scm b/module/entry-points/ical.scm index 9f7457c3..e2ee7dcf 100644 --- a/module/entry-points/ical.scm +++ b/module/entry-points/ical.scm @@ -3,7 +3,7 @@ :use-module (util) :use-module (output ical) :use-module ((vcomponent) :select (load-calendars*)) - :use-module ((parameters) :select (calendar-files)) + :use-module ((util config all) :select (calendar-files)) :use-module (ice-9 getopt-long) :use-module (datetime) :use-module (datetime util) diff --git a/module/entry-points/server.scm b/module/entry-points/server.scm index f90afa63..e3ce168a 100644 --- a/module/entry-points/server.scm +++ b/module/entry-points/server.scm @@ -2,7 +2,7 @@ :export (main) :use-module (util) :use-module (vcomponent) - :use-module (parameters) + :use-module (util config all) ) (use-modules* (web (server request response uri)) diff --git a/module/entry-points/terminal.scm b/module/entry-points/terminal.scm index 09ae8004..0f2a85f0 100644 --- a/module/entry-points/terminal.scm +++ b/module/entry-points/terminal.scm @@ -5,7 +5,7 @@ :use-module (ice-9 getopt-long) :use-module (datetime) :use-module (datetime util) - :use-module (parameters) + :use-module (util config all) :use-module (vulgar) ) |