M guix/android-repo-download.scm => guix/android-repo-download.scm +0 -3
@@ 29,10 29,7 @@
#:use-module (guix modules)
#:autoload (guix build-system gnu) (standard-packages)
#:use-module (ice-9 match)
- #:use-module (ice-9 vlist)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-34)
- #:use-module (srfi srfi-35)
#:export (android-repo-reference
android-repo-reference?
android-repo-reference-manifest-url
M guix/base32.scm => guix/base32.scm +0 -1
@@ 17,7 17,6 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix base32)
- #:use-module (srfi srfi-1)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (srfi srfi-60)
M guix/build-system/android-ndk.scm => guix/build-system/android-ndk.scm +0 -2
@@ 26,8 26,6 @@
#:use-module (guix packages)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (android-ndk-build-system))
(define %android-ndk-build-system-modules
M guix/build-system/ant.scm => guix/build-system/ant.scm +0 -2
@@ 26,8 26,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (%ant-build-system-modules
ant-build
ant-build-system))
M guix/build-system/asdf.scm => guix/build-system/asdf.scm +0 -2
@@ 33,9 33,7 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:use-module (gnu packages)
#:export (%asdf-build-system-modules
%asdf-build-modules
M guix/build-system/chicken.scm => guix/build-system/chicken.scm +0 -1
@@ 27,7 27,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%chicken-build-system-modules
chicken-build
chicken-build-system
M guix/build-system/clojure.scm => guix/build-system/clojure.scm +0 -2
@@ 33,8 33,6 @@
#:select
((search-path-specification->sexp . search-path-spec->sexp)))
#:use-module (guix utils)
-
- #:use-module (ice-9 match)
#:export (%clojure-build-system-modules
clojure-build
clojure-build-system))
M guix/build-system/cmake.scm => guix/build-system/cmake.scm +0 -2
@@ 24,12 24,10 @@
#:use-module (guix gexp)
#:use-module (guix utils)
#:use-module (guix monads)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%cmake-build-system-modules
cmake-build
cmake-build-system))
M guix/build-system/copy.scm => guix/build-system/copy.scm +0 -1
@@ 28,7 28,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:export (%copy-build-system-modules
default-glibc
M guix/build-system/dub.scm => guix/build-system/dub.scm +0 -2
@@ 29,8 29,6 @@
#:use-module (guix packages)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (dub-build-system))
(define (default-ldc)
M guix/build-system/dune.scm => guix/build-system/dune.scm +0 -2
@@ 25,10 25,8 @@
#:use-module (guix gexp)
#:use-module (guix search-paths)
#:use-module (guix build-system)
- #:use-module ((guix build-system gnu) #:prefix gnu:)
#:use-module ((guix build-system ocaml) #:prefix ocaml:)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:export (%dune-build-system-modules
dune-build
M guix/build-system/emacs.scm => guix/build-system/emacs.scm +0 -2
@@ 28,8 28,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (%emacs-build-system-modules
emacs-build
emacs-build-system)
M guix/build-system/font.scm => guix/build-system/font.scm +0 -1
@@ 22,7 22,6 @@
#:use-module (guix monads)
#:use-module (guix utils)
#:use-module (guix packages)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
M guix/build-system/glib-or-gtk.scm => guix/build-system/glib-or-gtk.scm +0 -2
@@ 24,14 24,12 @@
#:use-module (guix utils)
#:use-module (guix gexp)
#:use-module (guix monads)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module ((guix build glib-or-gtk-build-system)
#:select (%gdk-pixbuf-loaders-cache-file))
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%glib-or-gtk-build-system-modules
glib-or-gtk-build
glib-or-gtk-cross-build
M guix/build-system/gnu.scm => guix/build-system/gnu.scm +0 -1
@@ 22,7 22,6 @@
#:use-module (guix memoization)
#:use-module (guix gexp)
#:use-module (guix monads)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix packages)
M guix/build-system/guile.scm => guix/build-system/guile.scm +0 -1
@@ 25,7 25,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-26)
#:export (%guile-build-system-modules
guile-build-system))
M guix/build-system/haskell.scm => guix/build-system/haskell.scm +0 -1
@@ 32,7 32,6 @@
#:use-module (guix build-system gnu)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:export (hackage-uri
%haskell-build-system-modules
M guix/build-system/julia.scm => guix/build-system/julia.scm +0 -2
@@ 29,8 29,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (%julia-build-system-modules
julia-build
julia-build-system))
M guix/build-system/maven.scm => guix/build-system/maven.scm +0 -1
@@ 26,7 26,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:export (%maven-build-system-modules
default-maven
M guix/build-system/meson.scm => guix/build-system/meson.scm +0 -1
@@ 30,7 30,6 @@
#:use-module (guix build-system gnu)
#:use-module (guix build-system glib-or-gtk)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%meson-build-system-modules
meson-build-system
make-cross-file))
M guix/build-system/minify.scm => guix/build-system/minify.scm +0 -2
@@ 26,8 26,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (%minify-build-system-modules
minify-build
minify-build-system))
M guix/build-system/node.scm => guix/build-system/node.scm +0 -1
@@ 29,7 29,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
#:export (%node-build-system-modules
node-build
node-build-system))
M guix/build-system/ocaml.scm => guix/build-system/ocaml.scm +0 -1
@@ 25,7 25,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:export (%ocaml-build-system-modules
package-with-ocaml4.07
M guix/build-system/perl.scm => guix/build-system/perl.scm +0 -2
@@ 22,12 22,10 @@
#:use-module (guix utils)
#:use-module (guix gexp)
#:use-module (guix monads)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%perl-build-system-modules
perl-build
perl-cross-build
M guix/build-system/pyproject.scm => guix/build-system/pyproject.scm +0 -4
@@ 22,18 22,14 @@
#:use-module (guix gexp)
#:use-module (guix store)
#:use-module (guix utils)
- #:use-module (guix memoization)
#:use-module (guix gexp)
#:use-module (guix monads)
#:use-module (guix packages)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix build-system python)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:export (%pyproject-build-system-modules
default-python
pyproject-build
M guix/build-system/python.scm => guix/build-system/python.scm +0 -3
@@ 24,7 24,6 @@
#:use-module (guix gexp)
#:use-module (guix store)
#:use-module (guix utils)
- #:use-module (guix memoization)
#:use-module (guix gexp)
#:use-module (guix monads)
#:use-module (guix packages)
@@ 32,9 31,7 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:export (%python-build-system-modules
package-with-python2
strip-python2-variant
M guix/build-system/qt.scm => guix/build-system/qt.scm +0 -1
@@ 33,7 33,6 @@
#:use-module (guix build-system cmake)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%qt-build-system-modules
qt-build
qt-build-system))
M guix/build-system/r.scm => guix/build-system/r.scm +0 -1
@@ 27,7 27,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (%r-build-system-modules
r-build
r-build-system
M guix/build-system/rakudo.scm => guix/build-system/rakudo.scm +0 -1
@@ 26,7 26,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
- #:use-module (ice-9 match)
#:export (%rakudo-build-system-modules
rakudo-build
rakudo-build-system))
M guix/build-system/rebar.scm => guix/build-system/rebar.scm +0 -2
@@ 26,8 26,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (hexpm-uri
hexpm-package-url
%rebar-build-system-modules
M guix/build-system/renpy.scm => guix/build-system/renpy.scm +0 -3
@@ 21,16 21,13 @@
(define-module (guix build-system renpy)
#:use-module (guix store)
#:use-module (guix utils)
- #:use-module (guix memoization)
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module (guix monads)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:export (%renpy-build-system-modules
default-renpy
renpy-build
M guix/build-system/ruby.scm => guix/build-system/ruby.scm +0 -2
@@ 23,11 23,9 @@
#:use-module (guix gexp)
#:use-module (guix monads)
#:use-module (guix packages)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
#:export (rubygems-uri
%ruby-build-system-modules
ruby-build
M guix/build-system/scons.scm => guix/build-system/scons.scm +0 -1
@@ 25,7 25,6 @@
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
- #:use-module (ice-9 match)
#:export (%scons-build-system-modules
scons-build
scons-build-system))
M guix/build-system/texlive.scm => guix/build-system/texlive.scm +0 -1
@@ 28,7 28,6 @@
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix svn-download)
- #:use-module (ice-9 match)
#:export (%texlive-build-system-modules
texlive-build
texlive-build-system
M guix/build-system/trivial.scm => guix/build-system/trivial.scm +0 -2
@@ 18,12 18,10 @@
(define-module (guix build-system trivial)
#:use-module (guix store)
- #:use-module (guix utils)
#:use-module (guix gexp)
#:use-module (guix monads)
#:use-module (guix packages)
#:use-module (guix build-system)
- #:use-module (ice-9 match)
#:export (trivial-build-system))
(define* (lower name
M guix/build-system/waf.scm => guix/build-system/waf.scm +0 -3
@@ 22,14 22,11 @@
#:use-module (guix gexp)
#:use-module (guix monads)
#:use-module (guix packages)
- #:use-module (guix derivations)
#:use-module (guix search-paths)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module ((guix build-system python)
#:select (default-python default-python2))
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-26)
#:export (%waf-build-system-modules
waf-build
waf-build-system))
M guix/build/android-ndk-build-system.scm => guix/build/android-ndk-build-system.scm +0 -5
@@ 18,14 18,9 @@
(define-module (guix build android-ndk-build-system)
#:use-module ((guix build gnu-build-system) #:prefix gnu:)
- #:use-module (guix build syscalls)
#:use-module (guix build utils)
- #:use-module (ice-9 popen)
- #:use-module (ice-9 rdelim)
- #:use-module (ice-9 ftw)
#:use-module (ice-9 format)
#:use-module (ice-9 match)
- #:use-module (rnrs io ports)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26)
#:export (%standard-phases
M guix/build/asdf-build-system.scm => guix/build/asdf-build-system.scm +0 -4
@@ 24,11 24,7 @@
#:use-module (guix build union)
#:use-module (guix build lisp-utils)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
- #:use-module (ice-9 rdelim)
- #:use-module (ice-9 receive)
- #:use-module (ice-9 regex)
#:use-module (ice-9 match)
#:use-module (ice-9 format)
#:use-module (ice-9 ftw)
M guix/build/chicken-build-system.scm => guix/build/chicken-build-system.scm +0 -1
@@ 18,7 18,6 @@
(define-module (guix build chicken-build-system)
#:use-module ((guix build gnu-build-system) #:prefix gnu:)
- #:use-module (guix build union)
#:use-module (guix build utils)
#:use-module (ice-9 match)
#:use-module (ice-9 ftw)
M guix/build/clojure-utils.scm => guix/build/clojure-utils.scm +0 -1
@@ 20,7 20,6 @@
#:use-module (guix build utils)
#:use-module (ice-9 ftw)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-8)
#:use-module (srfi srfi-26)
M guix/build/download-nar.scm => guix/build/download-nar.scm +0 -1
@@ 18,7 18,6 @@
(define-module (guix build download-nar)
#:use-module (guix build download)
- #:use-module (guix build utils)
#:use-module ((guix serialization) #:hide (dump-port*))
#:autoload (zlib) (call-with-gzip-input-port)
#:use-module (guix progress)
M guix/build/elm-build-system.scm => guix/build/elm-build-system.scm +0 -1
@@ 23,7 23,6 @@
#:use-module (guix build union)
#:use-module (ice-9 ftw)
#:use-module (ice-9 rdelim)
- #:use-module (ice-9 regex)
#:use-module (ice-9 match)
#:use-module (ice-9 popen)
#:use-module (ice-9 vlist)
M guix/build/guile-build-system.scm => guix/build/guile-build-system.scm +1 -0
@@ 26,6 26,7 @@
#:use-module (ice-9 rdelim)
#:use-module (ice-9 regex)
#:use-module (ice-9 format)
+ #:autoload (ice-9 threads) (current-processor-count)
#:use-module (guix build utils)
#:export (target-guile-effective-version
%standard-phases
M guix/build/linux-module-build-system.scm => guix/build/linux-module-build-system.scm +0 -4
@@ 21,10 21,6 @@
(define-module (guix build linux-module-build-system)
#:use-module ((guix build gnu-build-system) #:prefix gnu:)
#:use-module (guix build utils)
- #:use-module (ice-9 ftw)
- #:use-module (ice-9 match)
- #:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:export (%standard-phases
linux-module-build))
M guix/build/lisp-utils.scm => guix/build/lisp-utils.scm +0 -2
@@ 20,11 20,9 @@
(define-module (guix build lisp-utils)
#:use-module (ice-9 format)
- #:use-module (ice-9 hash-table)
#:use-module (ice-9 match)
#:use-module (ice-9 regex)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:use-module (guix build utils)
#:export (%lisp
%lisp-type
M guix/build/make-bootstrap.scm => guix/build/make-bootstrap.scm +0 -3
@@ 20,9 20,6 @@
(define-module (guix build make-bootstrap)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
- #:use-module (srfi srfi-19)
- #:use-module (srfi srfi-26)
#:use-module (guix build utils)
#:export (copy-linux-headers
make-stripped-libc))
M guix/build/svn.scm => guix/build/svn.scm +0 -1
@@ 22,7 22,6 @@
(define-module (guix build svn)
#:use-module (guix build utils)
#:use-module (srfi srfi-34)
- #:use-module (ice-9 format)
#:export (svn-fetch))
;;; Commentary:
M guix/build/waf-build-system.scm => guix/build/waf-build-system.scm +0 -4
@@ 19,10 19,6 @@
(define-module (guix build waf-build-system)
#:use-module ((guix build gnu-build-system) #:prefix gnu:)
#:use-module (guix build utils)
- #:use-module (ice-9 match)
- #:use-module (ice-9 ftw)
- #:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:export (%standard-phases
waf-build))
M guix/channels.scm => guix/channels.scm +0 -4
@@ 29,8 29,6 @@
#:use-module (guix base16)
#:use-module (guix records)
#:use-module (guix gexp)
- #:use-module (guix modules)
- #:use-module (guix discovery)
#:use-module (guix monads)
#:use-module (guix profiles)
#:use-module (guix packages)
@@ 55,8 53,6 @@
#:use-module (ice-9 format)
#:use-module (ice-9 match)
#:use-module (ice-9 vlist)
- #:use-module ((ice-9 rdelim) #:select (read-string))
- #:use-module ((rnrs bytevectors) #:select (bytevector=?))
#:export (channel
channel?
channel-name
M guix/derivations.scm => guix/derivations.scm +0 -2
@@ 41,8 41,6 @@
#:use-module (guix i18n)
#:use-module (guix monads)
#:use-module (gcrypt hash)
- #:use-module (guix base32)
- #:use-module (guix records)
#:use-module (guix sets)
#:export (<derivation>
derivation?
M guix/discovery.scm => guix/discovery.scm +0 -1
@@ 24,7 24,6 @@
#:use-module (srfi srfi-1)
#:use-module (ice-9 match)
#:use-module (ice-9 vlist)
- #:use-module (ice-9 ftw)
#:export (scheme-files
scheme-modules
scheme-modules*
M guix/ftp-client.scm => guix/ftp-client.scm +0 -2
@@ 20,10 20,8 @@
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-11)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-31)
#:use-module (ice-9 binary-ports)
- #:use-module (rnrs bytevectors)
#:use-module (ice-9 match)
#:use-module (ice-9 regex)
#:use-module (ice-9 rdelim)
M guix/git-authenticate.scm => guix/git-authenticate.scm +0 -1
@@ 35,7 35,6 @@
#:use-module (guix progress)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-11)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (rnrs bytevectors)
M guix/git.scm => guix/git.scm +0 -2
@@ 23,8 23,6 @@
(define-module (guix git)
#:use-module (git)
- #:use-module (git object)
- #:use-module (git submodule)
#:use-module (guix i18n)
#:use-module (guix base32)
#:use-module (guix cache)
M guix/gnu-maintenance.scm => guix/gnu-maintenance.scm +0 -3
@@ 23,15 23,12 @@
#:use-module (web uri)
#:use-module (web client)
#:use-module (web response)
- #:use-module (sxml simple)
#:use-module (ice-9 regex)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
- #:use-module (srfi srfi-34)
#:use-module (rnrs io ports)
- #:use-module (system foreign)
#:use-module ((guix http-client) #:hide (open-socket-for-uri))
;; not required in many cases, so autoloaded to reduce start-up costs.
#:autoload (guix download) (%mirrors)
M guix/graph.scm => guix/graph.scm +0 -1
@@ 24,7 24,6 @@
#:use-module (guix sets)
#:autoload (guix diagnostics) (formatted-message)
#:autoload (guix i18n) (G_)
- #:use-module (rnrs io ports)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-26)
M guix/hg-download.scm => guix/hg-download.scm +0 -1
@@ 25,7 25,6 @@
#:use-module (guix records)
#:use-module (guix modules)
#:use-module (guix packages)
- #:autoload (guix build-system gnu) (standard-packages)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (ice-9 match)
M guix/import/cabal.scm => guix/import/cabal.scm +0 -1
@@ 22,7 22,6 @@
#:use-module (ice-9 match)
#:use-module (ice-9 regex)
#:use-module (ice-9 rdelim)
- #:use-module (ice-9 receive)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
M guix/import/cpan.scm => guix/import/cpan.scm +1 -1
@@ 31,10 31,10 @@
#:use-module (json)
#:use-module (gcrypt hash)
#:use-module (guix diagnostics)
+ #:use-module (guix i18n)
#:use-module (guix store)
#:use-module (guix utils)
#:use-module (guix base32)
- #:use-module (guix ui)
#:use-module ((guix download) #:select (download-to-store url-fetch))
#:use-module ((guix import utils) #:select (factorize-uri))
#:use-module (guix import json)
M guix/import/cran.scm => guix/import/cran.scm +0 -4
@@ 29,12 29,10 @@
#:use-module ((ice-9 rdelim) #:select (read-string read-line))
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-2)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (srfi srfi-71)
- #:use-module (ice-9 receive)
#:use-module (web uri)
#:use-module (guix memoization)
#:use-module (guix http-client)
@@ 52,11 50,9 @@
#:use-module (guix utils)
#:use-module (guix git)
#:use-module ((guix build-system r) #:select (cran-uri bioconductor-uri))
- #:use-module (guix ui)
#:use-module (guix upstream)
#:use-module (guix packages)
#:use-module (guix sets)
- #:use-module (gnu packages)
#:export (%input-style
cran->guix-package
M guix/import/crate.scm => guix/import/crate.scm +0 -3
@@ 23,14 23,11 @@
(define-module (guix import crate)
#:use-module (guix base32)
#:use-module (guix build-system cargo)
- #:use-module ((guix download) #:prefix download:)
#:use-module (gcrypt hash)
#:use-module (guix http-client)
#:use-module (guix import json)
#:use-module (guix import utils)
- #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix memoization)
- #:use-module (guix monads)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module (guix utils)
M guix/import/egg.scm => guix/import/egg.scm +0 -4
@@ 26,18 26,14 @@
#:use-module (srfi srfi-71)
#:use-module (gcrypt hash)
#:use-module (guix git)
- #:use-module (guix i18n)
#:use-module (guix base32)
- #:use-module (guix diagnostics)
#:use-module (guix memoization)
#:use-module (guix packages)
#:use-module (guix upstream)
- #:use-module (guix build-system)
#:use-module (guix build-system chicken)
#:use-module (guix store)
#:use-module ((guix download) #:select (download-to-store url-fetch))
#:use-module (guix import utils)
- #:use-module ((guix licenses) #:prefix license:)
#:export (egg->guix-package
egg-recursive-import
%egg-updater
M guix/import/elm.scm => guix/import/elm.scm +0 -11
@@ 18,10 18,8 @@
(define-module (guix import elm)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
#:use-module (ice-9 vlist)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
@@ 32,20 30,11 @@
#:use-module (guix memoization)
#:use-module (guix diagnostics)
#:use-module (guix i18n)
- #:use-module ((guix ui) #:select (display-hint))
- #:use-module ((guix build utils)
- #:select ((package-name->name+version
- . hyphen-package-name->name+version)
- find-files
- invoke))
#:use-module (guix import utils)
#:use-module (guix git)
#:use-module (guix import json)
#:autoload (gcrypt hash) (hash-algorithm sha256)
#:use-module (json)
- #:use-module (guix packages)
- #:use-module (guix upstream)
- #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system elm)
#:export (elm-recursive-import
%elm-package-registry
M guix/import/elpa.scm => guix/import/elpa.scm +1 -4
@@ 34,22 34,19 @@
#:use-module (srfi srfi-9 gnu)
#:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
- #:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
+ #:use-module (guix i18n)
#:use-module (guix diagnostics)
#:use-module ((guix download) #:select (download-to-store))
#:use-module (guix import utils)
#:use-module (guix http-client)
#:use-module (guix git)
#:use-module (guix hash)
- #:use-module ((guix serialization) #:select (write-file))
#:use-module (guix store)
- #:use-module (guix ui)
#:use-module (guix base32)
#:use-module (guix upstream)
#:use-module (guix packages)
#:use-module (guix memoization)
- #:use-module ((guix utils) #:select (call-with-temporary-output-file))
#:export (elpa->guix-package
guix-package->elpa-name
%elpa-updater
M guix/import/gem.scm => guix/import/gem.scm +0 -1
@@ 27,7 27,6 @@
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:use-module (json)
- #:use-module ((guix download) #:prefix download:)
#:use-module (guix import utils)
#:use-module (guix import json)
#:use-module (guix packages)
M guix/import/git.scm => guix/import/git.scm +1 -4
@@ 20,17 20,14 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix import git)
- #:use-module (guix build utils)
+ #:use-module (guix i18n)
#:use-module (guix diagnostics)
#:use-module (guix git)
#:use-module (guix git-download)
- #:use-module (guix i18n)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module (guix utils)
- #:use-module (ice-9 format)
#:use-module (ice-9 match)
- #:use-module (ice-9 rdelim)
#:use-module (ice-9 regex)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26)
M guix/import/github.scm => guix/import/github.scm +0 -2
@@ 35,13 35,11 @@
#:use-module ((guix download) #:prefix download:)
#:use-module ((guix git-download) #:prefix download:)
#:autoload (guix build download) (open-connection-for-uri)
- #:use-module (guix import utils)
#:use-module (json)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module (guix http-client)
#:use-module (web uri)
- #:use-module (web response)
#:export (%github-api %github-updater))
;; For tests.
M guix/import/gnome.scm => guix/import/gnome.scm +0 -2
@@ 25,8 25,6 @@
#:use-module (guix http-client)
#:use-module (json)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (web uri)
#:use-module (ice-9 match)
M guix/import/gnu.scm => guix/import/gnu.scm +0 -3
@@ 23,19 23,16 @@
#:use-module (guix gnu-maintenance)
#:use-module (guix import utils)
#:use-module (guix i18n)
- #:use-module (guix utils)
#:use-module (guix store)
#:use-module (gcrypt hash)
#:use-module (guix base32)
#:use-module (guix upstream)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
#:use-module (web uri)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
#:export (gnu->guix-package))
;;; Commentary:
M guix/import/go.scm => guix/import/go.scm +0 -8
@@ 32,25 32,20 @@
#:use-module (guix import utils)
#:use-module (guix import json)
#:use-module (guix packages)
- #:use-module ((guix utils) #:select (string-replace-substring))
#:use-module (guix http-client)
- #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix memoization)
#:autoload (htmlprag) (html->sxml) ;from Guile-Lib
- #:autoload (guix serialization) (write-file)
#:autoload (guix base32) (bytevector->nix-base32-string)
#:autoload (guix build utils) (mkdir-p)
#:autoload (gcrypt hash) (hash-algorithm sha256)
#:use-module (ice-9 format)
#:use-module (ice-9 match)
#:use-module (ice-9 peg)
- #:use-module (ice-9 rdelim)
#:use-module (ice-9 receive)
#:use-module (ice-9 regex)
#:use-module (ice-9 textual-ports)
#:use-module ((rnrs io ports) #:select (call-with-port))
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-2)
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
@@ 61,10 56,7 @@
(if (eq? 'filter s)
'xfilter
s)))
- #:use-module (web client)
- #:use-module (web response)
#:use-module (web uri)
-
#:export (go-module->guix-package
go-module->guix-package*
go-module-recursive-import))
M guix/import/hexpm.scm => guix/import/hexpm.scm +0 -9
@@ 22,10 22,6 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix import hexpm)
- #:use-module (guix base32)
- #:use-module ((guix download) #:prefix download:)
- #:use-module (gcrypt hash)
- #:use-module (guix http-client)
#:use-module (json)
#:use-module (guix import utils)
#:use-module ((guix import json) #:select (json-fetch))
@@ 33,16 29,11 @@
#:select ((package-name->name+version
. hyphen-package-name->name+version)
dump-port))
- #:use-module ((guix licenses) #:prefix license:)
- #:use-module (guix monads)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module (guix utils)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
- #:use-module (ice-9 popen)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-2)
#:use-module (srfi srfi-26)
#:use-module (guix build-system rebar)
#:export (hexpm->guix-package
M guix/import/kde.scm => guix/import/kde.scm +0 -1
@@ 20,7 20,6 @@
(define-module (guix import kde)
#:use-module (guix http-client)
- #:use-module (guix memoization)
#:use-module (guix gnu-maintenance)
#:use-module (guix packages)
#:use-module (guix upstream)
M guix/import/minetest.scm => guix/import/minetest.scm +0 -7
@@ 19,24 19,17 @@
(define-module (guix import minetest)
#:use-module (ice-9 match)
- #:use-module (ice-9 receive)
#:use-module (ice-9 threads)
#:use-module (ice-9 hash-table)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-2)
- #:use-module (srfi srfi-11)
- #:use-module (srfi srfi-26)
#:use-module (guix diagnostics)
#:use-module ((guix packages) #:prefix package:)
#:use-module (guix upstream)
- #:use-module (guix utils)
- #:use-module (guix ui)
#:use-module (guix i18n)
#:use-module (guix memoization)
#:use-module (guix serialization)
#:use-module (guix import utils)
#:use-module (guix import json)
- #:use-module ((gcrypt hash) #:select (open-sha256-port port-sha256))
#:use-module (json)
#:use-module (guix base32)
#:use-module (guix git)
M guix/import/opam.scm => guix/import/opam.scm +1 -6
@@ 22,23 22,19 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix import opam)
- #:use-module (ice-9 ftw)
#:use-module (ice-9 match)
#:use-module (ice-9 peg)
#:use-module ((ice-9 popen) #:select (open-pipe*))
- #:use-module (ice-9 receive)
#:use-module (ice-9 textual-ports)
- #:use-module (ice-9 vlist)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-2)
#:use-module ((srfi srfi-26) #:select (cut))
#:use-module ((web uri) #:select (string->uri uri->string))
#:use-module ((guix build utils) #:select (dump-port find-files mkdir-p))
#:use-module (guix build-system)
- #:use-module (guix build-system ocaml)
+ #:use-module (guix i18n)
#:use-module (guix diagnostics)
#:use-module (guix http-client)
- #:use-module (guix ui)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module ((guix utils) #:select (cache-directory
@@ 49,7 45,6 @@
recursive-import
spdx-string->license
url-fetch))
- #:use-module ((guix licenses) #:prefix license:)
#:export (opam->guix-package
opam-recursive-import
%opam-updater
M guix/import/print.scm => guix/import/print.scm +1 -2
@@ 19,12 19,11 @@
(define-module (guix import print)
#:use-module (guix base32)
- #:use-module (guix utils)
#:use-module (guix licenses)
#:use-module (guix packages)
+ #:use-module ((guix diagnostics) #:select (location-file))
#:use-module (guix search-paths)
#:use-module (guix build-system)
- #:use-module (gnu packages)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26)
#:use-module (guix import utils)
M guix/import/pypi.scm => guix/import/pypi.scm +0 -3
@@ 36,7 36,6 @@
#:use-module (ice-9 receive)
#:use-module ((ice-9 rdelim) #:select (read-line))
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
@@ 51,13 50,11 @@
find-files
invoke))
#:use-module (guix import utils)
- #:use-module ((guix download) #:prefix download:)
#:use-module (guix import json)
#:use-module (json)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module ((guix licenses) #:prefix license:)
- #:use-module (guix build-system python)
#:export (parse-requires.txt
parse-wheel-metadata
specification->requirement-name
M guix/import/test.scm => guix/import/test.scm +0 -2
@@ 18,8 18,6 @@
(define-module (guix import test)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
- #:use-module (web uri)
#:use-module (guix packages)
#:use-module (guix upstream)
#:use-module ((guix utils) #:select (version-prefix?))
M guix/import/texlive.scm => guix/import/texlive.scm +0 -3
@@ 35,9 35,6 @@
#:use-module (guix serialization)
#:use-module (guix svn-download)
#:use-module (guix import utils)
- #:use-module (guix utils)
- #:use-module (guix upstream)
- #:use-module (guix packages)
#:use-module (guix build-system texlive)
#:export (files-differ?
texlive->guix-package
M guix/import/utils.scm => guix/import/utils.scm +0 -1
@@ 39,7 39,6 @@
#:use-module (guix packages)
#:use-module (guix discovery)
#:use-module (guix build-system)
- #:use-module (guix gexp)
#:use-module ((guix i18n) #:select (G_))
#:use-module (guix store)
#:use-module (guix download)
M guix/ipfs.scm => guix/ipfs.scm +0 -5
@@ 18,15 18,10 @@
(define-module (guix ipfs)
#:use-module (json)
- #:use-module (guix base64)
- #:use-module ((guix build utils) #:select (dump-port))
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-11)
- #:use-module (srfi srfi-26)
#:use-module (rnrs io ports)
- #:use-module (rnrs bytevectors)
#:use-module (ice-9 match)
- #:use-module (ice-9 ftw)
#:use-module (web uri)
#:use-module (web client)
#:use-module (web response)
M guix/lint.scm => guix/lint.scm +0 -1
@@ 33,7 33,6 @@
(define-module (guix lint)
#:use-module (guix store)
#:autoload (guix base16) (bytevector->base16-string)
- #:use-module (guix base32)
#:autoload (guix base64) (base64-encode)
#:use-module (guix build-system)
#:use-module (guix diagnostics)
M guix/pki.scm => guix/pki.scm +0 -1
@@ 24,7 24,6 @@
#:autoload (srfi srfi-1) (delete-duplicates)
#:use-module (ice-9 match)
#:use-module (ice-9 rdelim)
- #:use-module (ice-9 binary-ports)
#:export (%public-key-file
%private-key-file
%acl-file
M guix/records.scm => guix/records.scm +0 -1
@@ 22,7 22,6 @@
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-26)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
#:use-module (ice-9 rdelim)
#:autoload (system base target) (target-most-positive-fixnum)
#:export (define-record-type*
M guix/remote.scm => guix/remote.scm +0 -2
@@ 32,8 32,6 @@
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
- #:use-module (ice-9 format)
- #:use-module (ice-9 match)
#:export (remote-eval))
;;; Commentary:
M guix/scripts.scm => guix/scripts.scm +0 -1
@@ 28,7 28,6 @@
#:use-module (guix monads)
#:use-module (guix packages)
#:use-module (guix derivations)
- #:use-module ((guix profiles) #:select (%profile-directory))
#:autoload (guix describe) (current-profile-date)
#:use-module (guix build syscalls)
#:use-module (srfi srfi-1)
M guix/scripts/archive.scm => guix/scripts/archive.scm +0 -1
@@ 18,7 18,6 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix scripts archive)
- #:use-module (guix config)
#:use-module (guix utils)
#:use-module (guix combinators)
#:use-module ((guix build utils) #:select (mkdir-p))
M guix/scripts/build.scm => guix/scripts/build.scm +0 -3
@@ 27,7 27,6 @@
#:use-module (guix store)
#:use-module (guix derivations)
#:use-module (guix packages)
- #:use-module (guix memoization)
#:use-module (guix utils)
#:use-module (guix monads)
#:use-module (guix gexp)
@@ 36,10 35,8 @@
#:autoload (guix http-client) (http-fetch http-get-error?)
#:use-module (ice-9 format)
#:use-module (ice-9 match)
- #:use-module (ice-9 vlist)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-9)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
M guix/scripts/challenge.scm => guix/scripts/challenge.scm +0 -1
@@ 24,7 24,6 @@
#:use-module (guix utils)
#:use-module (guix monads)
#:use-module (guix base32)
- #:use-module (guix packages)
#:use-module ((guix progress) #:hide (dump-port*))
#:use-module (guix serialization)
#:use-module (guix substitutes)
M guix/scripts/deploy.scm => guix/scripts/deploy.scm +0 -1
@@ 26,7 26,6 @@
#:use-module (guix store)
#:use-module (guix gexp)
#:use-module (guix ui)
- #:use-module (guix utils)
#:use-module ((guix status) #:select (with-status-verbosity))
#:use-module (guix diagnostics)
#:use-module (guix i18n)
M guix/scripts/discover.scm => guix/scripts/discover.scm +0 -1
@@ 23,7 23,6 @@
#:use-module (guix scripts)
#:use-module (guix ui)
#:use-module (guix utils)
- #:use-module (guix build syscalls)
#:use-module (guix build utils)
#:use-module (guix scripts publish)
#:use-module (avahi)
M guix/scripts/download.scm => guix/scripts/download.scm +0 -3
@@ 35,11 35,8 @@
#:use-module (web uri)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-14)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-37)
- #:use-module (rnrs bytevectors)
- #:use-module (ice-9 binary-ports)
#:export (guix-download))
M guix/scripts/edit.scm => guix/scripts/edit.scm +2 -1
@@ 22,7 22,8 @@
#:use-module (guix ui)
#:use-module (guix scripts)
#:use-module ((guix scripts build) #:select (%standard-build-options))
- #:use-module (guix utils)
+ #:use-module ((guix diagnostics)
+ #:select (location-file location-line))
#:use-module (gnu packages)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-37)
M guix/scripts/graph.scm => guix/scripts/graph.scm +0 -1
@@ 20,7 20,6 @@
(define-module (guix scripts graph)
#:use-module (guix ui)
#:use-module (guix graph)
- #:use-module (guix grafts)
#:use-module (guix scripts)
#:use-module (guix packages)
#:use-module (guix monads)
M guix/scripts/hash.scm => guix/scripts/hash.scm +0 -4
@@ 23,18 23,14 @@
(define-module (guix scripts hash)
#:use-module (gcrypt hash)
- #:use-module (guix serialization)
#:use-module (guix ui)
#:use-module (guix hash)
#:use-module (guix scripts)
#:use-module (guix base16)
#:use-module (guix base32)
#:autoload (guix base64) (base64-encode)
- #:use-module (ice-9 binary-ports)
- #:use-module (rnrs files)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-37)
#:autoload (disarchive git-hash) (git-hash-file git-hash-directory)
M guix/scripts/home.scm => guix/scripts/home.scm +0 -2
@@ 22,9 22,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix scripts home)
- #:use-module (gnu packages admin)
#:use-module ((gnu services) #:hide (delete))
- #:use-module (gnu packages)
#:autoload (gnu packages base) (coreutils)
#:autoload (gnu packages bash) (bash)
#:autoload (gnu packages gnupg) (guile-gcrypt)
M guix/scripts/import.scm => guix/scripts/import.scm +0 -3
@@ 28,9 28,6 @@
#:use-module (guix read-print)
#:use-module (guix utils)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
- #:use-module (srfi srfi-26)
- #:use-module (srfi srfi-37)
#:use-module (ice-9 format)
#:use-module (ice-9 match)
#:export (%standard-import-options
M guix/scripts/offload.scm => guix/scripts/offload.scm +0 -1
@@ 39,7 39,6 @@
#:autoload (guix derivations) (read-derivation-from-file
derivation-file-name
build-derivations)
- #:autoload (guix serialization) (nar-error? nar-error-file)
#:autoload (guix nar) (restore-file-set)
#:use-module ((guix utils) #:select (%current-system))
#:use-module ((guix build syscalls)
M guix/scripts/pack.scm => guix/scripts/pack.scm +0 -2
@@ 28,7 28,6 @@
#:use-module (guix scripts)
#:use-module (guix ui)
#:use-module (guix gexp)
- #:use-module ((guix build utils) #:select (%xz-parallel-args))
#:use-module (guix utils)
#:use-module (guix store)
#:use-module ((guix status) #:select (with-status-verbosity))
@@ 54,7 53,6 @@
#:use-module ((gnu packages compression) #:hide (zip))
#:use-module (gnu packages guile)
#:use-module (gnu packages base)
- #:autoload (gnu packages package-management) (guix)
#:autoload (gnu packages gnupg) (guile-gcrypt)
#:autoload (gnu packages guile) (guile2.0-json guile-json)
#:use-module (srfi srfi-1)
M guix/scripts/package.scm => guix/scripts/package.scm +0 -5
@@ 38,9 38,7 @@
#:use-module (guix profiles)
#:use-module (guix search-paths)
#:autoload (guix import json) (json->scheme-file)
- #:use-module (guix monads)
#:use-module (guix utils)
- #:use-module (guix config)
#:use-module (guix scripts)
#:use-module (guix scripts build)
#:use-module (guix transformations)
@@ 48,12 46,9 @@
manifest-entry-with-provenance)
#:autoload (guix channels) (channel-name channel-commit channel->code)
#:autoload (guix store roots) (gc-roots user-owned?)
- #:use-module ((guix build utils)
- #:select (directory-exists? mkdir-p))
#:use-module (ice-9 format)
#:use-module (ice-9 match)
#:autoload (ice-9 pretty-print) (pretty-print)
- #:use-module (ice-9 regex)
#:use-module (ice-9 vlist)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-11)
M guix/scripts/publish.scm => guix/scripts/publish.scm +0 -4
@@ 23,16 23,13 @@
(define-module (guix scripts publish)
#:use-module ((system repl server) #:prefix repl:)
- #:use-module (ice-9 binary-ports)
#:use-module (ice-9 format)
#:use-module (ice-9 match)
#:use-module (ice-9 poll)
- #:use-module (ice-9 regex)
#:use-module (ice-9 rdelim)
#:use-module (ice-9 threads)
#:use-module (rnrs bytevectors)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-2)
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-9 gnu)
#:use-module (srfi srfi-19)
@@ 50,7 47,6 @@
#:use-module (guix base32)
#:use-module (guix base64)
#:use-module (guix config)
- #:use-module (guix derivations)
#:use-module (gcrypt hash)
#:use-module (guix pki)
#:use-module (gcrypt pk-crypto)
M guix/scripts/pull.scm => guix/scripts/pull.scm +0 -2
@@ 30,7 30,6 @@
#:use-module (guix packages)
#:use-module (guix derivations)
#:use-module (guix profiles)
- #:use-module (guix gexp)
#:use-module (guix memoization)
#:use-module (guix monads)
#:use-module (guix channels)
@@ 45,7 44,6 @@
#:autoload (gnu packages) (fold-available-packages)
#:autoload (guix scripts package) (build-and-use-profile
delete-matching-generations)
- #:autoload (gnu packages base) (canonical-package)
#:autoload (gnu packages bootstrap) (%bootstrap-guile)
#:autoload (gnu packages certs) (le-certs)
#:use-module (srfi srfi-1)
M guix/scripts/refresh.scm => guix/scripts/refresh.scm +0 -3
@@ 43,15 43,12 @@
#:use-module (gnu packages)
#:use-module ((gnu packages commencement) #:select (%final-inputs))
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
- #:use-module (ice-9 vlist)
#:use-module (ice-9 format)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-37)
#:use-module (srfi srfi-71)
- #:use-module (ice-9 binary-ports)
#:export (guix-refresh))
M guix/scripts/repl.scm => guix/scripts/repl.scm +0 -2
@@ 23,10 23,8 @@
#:use-module (guix scripts)
#:use-module (guix repl)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-37)
#:use-module (ice-9 match)
- #:use-module (rnrs bytevectors)
#:autoload (guix describe) (current-profile)
#:autoload (system repl repl) (start-repl)
#:autoload (system repl server)
M guix/scripts/search.scm => guix/scripts/search.scm +0 -1
@@ 24,7 24,6 @@
#:select (%standard-build-options))
#:use-module (guix scripts)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-37)
#:export (guix-search))
M guix/scripts/show.scm => guix/scripts/show.scm +0 -1
@@ 23,7 23,6 @@
#:select (%standard-build-options))
#:use-module (guix scripts)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-37)
#:export (guix-show))
M guix/scripts/style.scm => guix/scripts/style.scm +0 -2
@@ 31,7 31,6 @@
#:autoload (gnu packages) (specification->package fold-packages)
#:use-module (guix scripts)
#:use-module ((guix scripts build) #:select (%standard-build-options))
- #:use-module (guix combinators)
#:use-module (guix ui)
#:use-module (guix packages)
#:use-module (guix utils)
@@ 42,7 41,6 @@
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-9)
- #:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-37)
#:export (guix-style))
M guix/scripts/substitute.scm => guix/scripts/substitute.scm +0 -4
@@ 26,7 26,6 @@
#:use-module (guix store)
#:use-module (guix substitutes)
#:use-module (guix utils)
- #:use-module (guix combinators)
#:use-module (guix config)
#:use-module (guix records)
#:use-module (guix diagnostics)
@@ 36,7 35,6 @@
#:autoload (guix scripts discover) (read-substitute-urls)
#:use-module (gcrypt hash)
#:use-module (guix base32)
- #:use-module (guix base64)
#:use-module (guix cache)
#:use-module (gcrypt pk-crypto)
#:use-module (guix pki)
@@ 55,10 53,8 @@
#:use-module (ice-9 ftw)
#:use-module (rnrs bytevectors)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-19)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
- #:use-module (srfi srfi-35)
#:use-module (srfi srfi-71)
#:use-module (web uri)
#:use-module (guix http-client)
M guix/scripts/system.scm => guix/scripts/system.scm +0 -7
@@ 55,20 55,14 @@
#:autoload (guix scripts pull) (channel-commit-hyperlink)
#:autoload (guix graph) (export-graph node-type
graph-backend-name lookup-backend)
- #:use-module (guix scripts graph)
#:use-module (guix scripts system reconfigure)
#:use-module (guix build utils)
#:use-module (guix progress)
- #:use-module ((guix build syscalls) #:select (terminal-columns))
#:use-module (gnu build image)
#:use-module (gnu build install)
#:autoload (gnu build file-systems)
(find-partition-by-label find-partition-by-uuid)
- #:autoload (gnu build linux-modules)
- (device-module-aliases matching-modules)
- #:use-module (gnu system linux-initrd)
#:use-module (gnu image)
- #:use-module (guix platform)
#:use-module (gnu system)
#:use-module (gnu bootloader)
#:use-module (gnu system file-systems)
@@ 81,7 75,6 @@
#:use-module (gnu services shepherd)
#:use-module (gnu services herd)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-11)
#:use-module (srfi srfi-19)
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
M guix/scripts/time-machine.scm => guix/scripts/time-machine.scm +0 -1
@@ 22,7 22,6 @@
#:use-module (guix ui)
#:use-module (guix scripts)
#:use-module (guix inferior)
- #:use-module (guix channels)
#:use-module (guix store)
#:use-module (guix status)
#:use-module ((guix git)
M guix/self.scm => guix/self.scm +0 -1
@@ 19,7 19,6 @@
(define-module (guix self)
#:use-module (guix config)
- #:use-module (guix i18n)
#:use-module (guix modules)
#:use-module (guix gexp)
#:use-module (guix store)
M guix/serialization.scm => guix/serialization.scm +0 -1
@@ 17,7 17,6 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (guix serialization)
- #:use-module (guix combinators)
#:use-module (rnrs bytevectors)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-26)
M guix/status.scm => guix/status.scm +0 -1
@@ 27,7 27,6 @@
#:autoload (guix build download) (nar-uri-abbreviation)
#:use-module (guix store)
#:use-module (guix derivations)
- #:use-module (guix memoization)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-9)
#:use-module (srfi srfi-9 gnu)
M guix/store.scm => guix/store.scm +0 -2
@@ 24,7 24,6 @@
#:use-module (guix utils)
#:use-module (guix config)
#:use-module (guix deprecation)
- #:use-module (guix memoization)
#:use-module (guix serialization)
#:use-module (guix monads)
#:use-module (guix records)
@@ 45,7 44,6 @@
#:use-module (srfi srfi-26)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
- #:use-module (srfi srfi-39)
#:use-module (ice-9 match)
#:use-module (ice-9 vlist)
#:use-module (ice-9 popen)
M guix/store/database.scm => guix/store/database.scm +0 -2
@@ 22,7 22,6 @@
(define-module (guix store database)
#:use-module (sqlite3)
#:use-module (guix config)
- #:use-module (guix serialization)
#:use-module (guix store deduplication)
#:use-module (guix base16)
#:use-module (guix progress)
@@ 36,7 35,6 @@
#:use-module (srfi srfi-26)
#:use-module (rnrs io ports)
#:use-module (ice-9 match)
- #:use-module (system foreign)
#:export (sql-schema
%default-database-file
store-database-file
M guix/store/deduplication.scm => guix/store/deduplication.scm +0 -2
@@ 28,9 28,7 @@
#:use-module (srfi srfi-11)
#:use-module (srfi srfi-34)
#:use-module (srfi srfi-35)
- #:use-module (rnrs bytevectors)
#:use-module (rnrs io ports)
- #:use-module (ice-9 ftw)
#:use-module (ice-9 match)
#:use-module (guix serialization)
#:export (nar-sha256
M guix/substitutes.scm => guix/substitutes.scm +0 -9
@@ 25,26 25,19 @@
#:use-module (guix utils)
#:use-module (guix combinators)
#:use-module (guix config)
- #:use-module (guix records)
#:use-module (guix diagnostics)
#:use-module (guix i18n)
#:use-module (gcrypt hash)
#:use-module (guix base32)
- #:use-module (guix base64)
#:use-module (guix cache)
- #:use-module (gcrypt pk-crypto)
- #:use-module (guix pki)
#:use-module ((guix build utils) #:select (mkdir-p dump-port))
#:use-module ((guix build download)
#:select ((open-connection-for-uri
. guix:open-connection-for-uri)
resolve-uri-reference))
#:use-module (guix progress)
- #:use-module (ice-9 rdelim)
- #:use-module (ice-9 regex)
#:use-module (ice-9 match)
#:use-module (ice-9 format)
- #:use-module (ice-9 ftw)
#:use-module (ice-9 binary-ports)
#:use-module (ice-9 vlist)
#:use-module (rnrs bytevectors)
@@ 52,8 45,6 @@
#:use-module (srfi srfi-11)
#:use-module (srfi srfi-19)
#:use-module (srfi srfi-26)
- #:use-module (srfi srfi-34)
- #:use-module (srfi srfi-35)
#:use-module (web uri)
#:use-module (web request)
#:use-module (web response)
M guix/tests/gnupg.scm => guix/tests/gnupg.scm +0 -1
@@ 21,7 21,6 @@
#:use-module (guix utils)
#:use-module (guix build utils)
#:use-module (rnrs io ports)
- #:use-module (ice-9 match)
#:export (gpg-command
gpgconf-command
with-fresh-gnupg-setup
M guix/tests/http.scm => guix/tests/http.scm +0 -1
@@ 23,7 23,6 @@
#:use-module (web server http)
#:use-module (web response)
#:use-module (srfi srfi-11)
- #:use-module (srfi srfi-39)
#:use-module (ice-9 match)
#:export (with-http-server
call-with-http-server
M guix/upstream.scm => guix/upstream.scm +0 -1
@@ 48,7 48,6 @@
#:use-module (srfi srfi-35)
#:use-module (rnrs bytevectors)
#:use-module (ice-9 match)
- #:use-module (ice-9 regex)
#:export (upstream-source
upstream-source?
upstream-source-package
M guix/utils.scm => guix/utils.scm +0 -3
@@ 36,10 36,8 @@
(define-module (guix utils)
#:use-module (guix config)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-9)
#:use-module (srfi srfi-11)
#:use-module (srfi srfi-26)
- #:use-module (srfi srfi-39)
#:use-module (srfi srfi-71)
#:use-module (rnrs io ports) ;need 'port-position' etc.
#:use-module ((rnrs bytevectors) #:select (bytevector-u8-set!))
@@ 51,7 49,6 @@
#:use-module ((guix combinators) #:select (fold2))
#:use-module (guix diagnostics) ;<location>, &error-location, etc.
#:use-module (ice-9 format)
- #:use-module (ice-9 ftw)
#:use-module ((ice-9 iconv) #:prefix iconv:)
#:use-module (ice-9 match)
#:use-module (ice-9 regex)