diff --git a/guix/scripts/system/reconfigure.scm b/guix/scripts/system/reconfigure.scm
index ca988953f9..9ca66687ee 100644
--- a/guix/scripts/system/reconfigure.scm
+++ b/guix/scripts/system/reconfigure.scm
@@ -134,7 +134,7 @@ return the <live-service> objects that are currently running on MACHINE."
                  (map (lambda (service)
                         (list (live-service-provision service)
                               (live-service-requirement service)
-                              (live-service-transient service)
+                              (live-service-transient? service)
                               (match (live-service-running service)
                                 (#f #f)
                                 (#t #t)