From 9e1fe3d0c34e65a50ba93b5d7f7398503131c1ba Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Fri, 25 Aug 2017 21:33:44 +0200
Subject: bootloader: Emit warnings with 'warning'.

* gnu/bootloader.scm (bootloader-configuration-target): Use 'warning'
instead of 'issue-deprecation-warning'.
---
 gnu/bootloader.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'gnu/bootloader.scm')

diff --git a/gnu/bootloader.scm b/gnu/bootloader.scm
index 122e350874..736f119527 100644
--- a/gnu/bootloader.scm
+++ b/gnu/bootloader.scm
@@ -132,9 +132,9 @@
   (or (%bootloader-configuration-target config)
       (let ((device (bootloader-configuration-device config)))
         (when device
-          (issue-deprecation-warning
-           "The 'device' field of bootloader configurations is deprecated."
-           "Use 'target' instead."))
+          (warning
+           (G_ "The 'device' field of bootloader configurations is deprecated.~%"))
+          (warning (G_ "Use 'target' instead.~%")))
         device)))
 
 
-- 
cgit v1.2.3