diff --git a/guix/read-print.scm b/guix/read-print.scm
index 6421b79737..1f7902c546 100644
--- a/guix/read-print.scm
+++ b/guix/read-print.scm
@@ -350,7 +350,7 @@ (define %special-forms
    ('swap-space 1)
    ('user-account 1)
    ('user-group 1)
-   ('setuid-program 1)
+   ('privileged-program 1)
    ('modify-services 2)
 
    ;; (gnu home).