From ce16b07d10ebda486d6e4cb6fd30fe797125aeac Mon Sep 17 00:00:00 2001
From: Mathieu Othacehe <othacehe@gnu.org>
Date: Tue, 9 Jun 2020 12:33:38 +0200
Subject: installer: final: Remove left-over pk call.

* gnu/installer/final.scm (kill-cow-users): Remove pk call.
---
 gnu/installer/final.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'gnu/installer')

diff --git a/gnu/installer/final.scm b/gnu/installer/final.scm
index ece1aff95c..90c76e9d5f 100644
--- a/gnu/installer/final.scm
+++ b/gnu/installer/final.scm
@@ -127,7 +127,7 @@ (define %not-nul
                    (lambda (port)
                      (match (string-tokenize (read-string port) %not-nul)
                        ((argv0 _ ...)
-                        (unless (member (pk (basename argv0)) spare)
+                        (unless (member (basename argv0) spare)
                           (syslog "Killing process ~a (~a)~%" pid argv0)
                           (kill pid SIGKILL)))
                        (_ #f))))))
-- 
cgit v1.2.3