01/05: services: Add missing (ice-9 format) import.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit db170ee9210431cdbb3716a6b9a26ca5b6d931ee
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Jun 24 10:47:23 2020 +0200

    services: Add missing (ice-9 format) import.
    
    These issues were reported by -Wformat, though they were harmless in
    practice because importing (ice-9 format) changes the global 'format'
    binding currently.
    
    * gnu/services/nix.scm: Import (ice-9 format).
    * gnu/services/web.scm: Likewise.
    * gnu/system/mapped-devices.scm: Likewise.
---
 gnu/services/nix.scm          | 1 +
 gnu/services/web.scm          | 3 ++-
 gnu/system/mapped-devices.scm | 3 ++-
 3 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/gnu/services/nix.scm b/gnu/services/nix.scm
index dfe3399..3c00652 100644
--- a/gnu/services/nix.scm
+++ b/gnu/services/nix.scm
@@ -31,6 +31,7 @@
   #:use-module (guix store)
   #:use-module (srfi srfi-1)
   #:use-module (srfi srfi-26)
+  #:use-module (ice-9 format)
   #:export (nix-service-type))
 
 ;;; Commentary:
diff --git a/gnu/services/web.scm b/gnu/services/web.scm
index 9fcfe8a..63d2324 100644
--- a/gnu/services/web.scm
+++ b/gnu/services/web.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2015 David Thompson <davet@gnu.org>
-;;; Copyright © 2015, 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès 
<ludo@gnu.org>
 ;;; Copyright © 2016 Nikita <nikita@n0.is>
 ;;; Copyright © 2016, 2017, 2018 Julien Lepiller <julien@lepiller.eu>
 ;;; Copyright © 2017 Christopher Baines <mail@cbaines.net>
@@ -57,6 +57,7 @@
   #:use-module (srfi srfi-1)
   #:use-module (srfi srfi-9)
   #:use-module (ice-9 match)
+  #:use-module (ice-9 format)
   #:export (<httpd-configuration>
             httpd-configuration
             httpd-configuration?
diff --git a/gnu/system/mapped-devices.scm b/gnu/system/mapped-devices.scm
index 7c58f87..c3f9830 100644
--- a/gnu/system/mapped-devices.scm
+++ b/gnu/system/mapped-devices.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès 
<ludo@gnu.org>
+;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès 
<ludo@gnu.org>
 ;;; Copyright © 2016 Andreas Enge <andreas@enge.fr>
 ;;; Copyright © 2017, 2018 Mark H Weaver <mhw@netris.org>
 ;;;
@@ -40,6 +40,7 @@
   #:use-module (srfi srfi-34)
   #:use-module (srfi srfi-35)
   #:use-module (ice-9 match)
+  #:use-module (ice-9 format)
   #:export (mapped-device
             mapped-device?
             mapped-device-source