diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index 8678b56b044b17dd28d75e20a99964fb5ad3d141..6077fb6272037cfc2b421237765abec7eadeac7f 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -1131,7 +1131,7 @@ (define-record-type* <gpm-configuration>
 
 (define gpm-dmd-service
   (match-lambda
-    (($ <gpm-configuration> dmd options)
+    (($ <gpm-configuration> gpm options)
      (list (dmd-service
             (requirement '(udev))
             (provision '(gpm))