diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-10-14 23:21:37 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-10-16 23:28:34 +0200 |
| commit | 78831230ee0c3d535a5cd278be050ddcab8a7428 (patch) | |
| tree | f906c68b0af2bea7616be55b51781b615b2af47e | |
| parent | Move load-config to own file. (diff) | |
| download | calp-78831230ee0c3d535a5cd278be050ddcab8a7428.tar.gz calp-78831230ee0c3d535a5cd278be050ddcab8a7428.tar.xz | |
Clean up imports in main.
| -rw-r--r-- | module/calp/main.scm | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/module/calp/main.scm b/module/calp/main.scm index 30465a49..90e7e115 100644 --- a/module/calp/main.scm +++ b/module/calp/main.scm @@ -1,10 +1,10 @@ ;; -*- geiser-scheme-implementation: guile -*- (define-module (calp main) - :use-module (hnh util) + :use-module ((hnh util) :select (awhen)) :use-module ((hnh util path) :select (path-append)) :use-module (srfi srfi-1) - :use-module (srfi srfi-88) ; keyword syntax + :use-module ((srfi srfi-88) :select ()) ; keyword syntax :use-module (hnh util options) :use-module ((calp util hooks) :select (shutdown-hook)) @@ -16,10 +16,6 @@ :use-module ((calp util exceptions) :select ()) :use-module (ice-9 getopt-long) - :use-module (ice-9 regex) - :use-module ((ice-9 popen) :select (open-input-pipe)) - :use-module ((ice-9 sandbox) :select - (make-sandbox-module all-pure-and-impure-bindings)) :use-module (statprof) :use-module (calp repl) |