aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2022-08-05 15:26:17 +0200
committerLudovic Courtès <ludo@gnu.org>2022-08-05 15:28:05 +0200
commitd11a432adffe9308eafec6b77cddd3145029109e (patch)
treefaf17a82e659d4311c8b28ef6ecf43c1aa84b21b
parent12087b1b19e6d6e746304447669dfe5b66090012 (diff)
downloadguix-d11a432adffe9308eafec6b77cddd3145029109e.tar.gz
guix-d11a432adffe9308eafec6b77cddd3145029109e.zip
guix system: Remove unused 'read-operating-system' procedure.
* guix/scripts/system.scm (read-operating-system): Remove. * gnu/ci.scm: Remove unused (guix scripts system) import.
-rw-r--r--gnu/ci.scm1
-rw-r--r--guix/scripts/system.scm5
2 files changed, 0 insertions, 6 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm
index f476e22731..9389b43824 100644
--- a/gnu/ci.scm
+++ b/gnu/ci.scm
@@ -39,7 +39,6 @@
#:use-module ((guix licenses)
#:select (gpl3+ license? license-name))
#:use-module ((guix utils) #:select (%current-system))
- #:use-module ((guix scripts system) #:select (read-operating-system))
#:use-module ((guix scripts pack)
#:select (lookup-compressor self-contained-tarball))
#:use-module (gnu bootloader)
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index bfde0a88ca..be6e839941 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -91,7 +91,6 @@
#:use-module (ice-9 match)
#:use-module (rnrs bytevectors)
#:export (guix-system
- read-operating-system
service-node-type
shepherd-service-node-type))
@@ -107,10 +106,6 @@
(gnu services)
(gnu system shadow))))
-(define (read-operating-system file)
- "Read the operating-system declaration from FILE and return it."
- (load* file %user-module))
-
;;;
;;; Installation.