diff --git a/htools/Ganeti/OpParams.hs b/htools/Ganeti/OpParams.hs
index d3eca0e4d50397a3fa93520dcf3b901001df9fa8..e375ae596a17a846845b1b073305d8d09c63fb9a 100644
--- a/htools/Ganeti/OpParams.hs
+++ b/htools/Ganeti/OpParams.hs
@@ -1210,7 +1210,7 @@ pAllowFailover = defaultFalse "allow_failover"
 -- | Duration parameter for 'OpTestDelay'.
 pDelayDuration :: Field
 pDelayDuration =
-  renameField "DelayDuration "$ simpleField "duration" [t| Double |]
+  renameField "DelayDuration" $ simpleField "duration" [t| Double |]
 
 -- | on_master field for 'OpTestDelay'.
 pDelayOnMaster :: Field