branch master updated: services: wireguard: Use the parameterized wireguard package.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

iyzsong pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 8d6feb4b10 services: wireguard: Use the parameterized wireguard 
package.
8d6feb4b10 is described below

commit 8d6feb4b10752fa0261d54d2d906642a5fcc08fa
Author: EuAndreh <eu@euandre.org>
AuthorDate: Tue Nov 29 20:39:29 2022 -0300

    services: wireguard: Use the parameterized wireguard package.
    
    * gnu/services/vpn.scm (wireguard-activation): Use the "wg" binary from
    the package given to <wireguard-configuration>.
    
    Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
---
 gnu/services/vpn.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gnu/services/vpn.scm b/gnu/services/vpn.scm
index def381987b..7b3bb8903c 100644
--- a/gnu/services/vpn.scm
+++ b/gnu/services/vpn.scm
@@ -833,7 +833,7 @@ PostUp = ~a set %i private-key ~a
 
 (define (wireguard-activation config)
   (match-record config <wireguard-configuration>
-    (private-key)
+    (private-key wireguard)
     #~(begin
         (use-modules (guix build utils)
                      (ice-9 popen)
@@ -842,7 +842,7 @@ PostUp = ~a set %i private-key ~a
         (unless (file-exists? #$private-key)
           (let* ((pipe
                   (open-input-pipe (string-append
-                                    #$(file-append wireguard-tools "/bin/wg")
+                                    #$(file-append wireguard "/bin/wg")
                                     " genkey")))
                  (key (read-line pipe)))
             (call-with-output-file #$private-key