diff options
author | Mark H Weaver <mhw@netris.org> | 2016-10-19 10:54:36 -0400 |
---|---|---|
committer | Mark H Weaver <mhw@netris.org> | 2016-10-19 10:54:36 -0400 |
commit | d2478b4cdd6f1db44f4725b39489aca89d3d9180 (patch) | |
tree | bc4714453fd9b7a2e64fcd5f58c24d371dbb91d8 /guix/scripts/publish.scm | |
parent | c9a71c6fdab6914dd648b76c349c3af9018cad35 (diff) | |
parent | 152ffe7cb6ba02915d8645102e0f6dfeb639090d (diff) |
Merge branch 'master' into core-updates
Diffstat (limited to 'guix/scripts/publish.scm')
-rw-r--r-- | guix/scripts/publish.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/guix/scripts/publish.scm b/guix/scripts/publish.scm index 8404e540f8..1b32f639ea 100644 --- a/guix/scripts/publish.scm +++ b/guix/scripts/publish.scm @@ -23,7 +23,7 @@ #:use-module (ice-9 format) #:use-module (ice-9 match) #:use-module (ice-9 regex) - #:use-module (rnrs io ports) + #:use-module (ice-9 rdelim) #:use-module (rnrs bytevectors) #:use-module (srfi srfi-1) #:use-module (srfi srfi-2) @@ -46,7 +46,7 @@ #:use-module (guix pki) #:use-module (guix pk-crypto) #:use-module (guix store) - #:use-module (guix serialization) + #:use-module ((guix serialization) #:select (write-file)) #:use-module (guix zlib) #:use-module (guix ui) #:use-module (guix scripts) @@ -167,7 +167,7 @@ compression disabled~%")) (delay (call-with-input-file file (compose string->canonical-sexp - get-string-all)))) + read-string)))) (define %private-key (lazy-read-file-sexp %private-key-file)) |