diff --git a/src/Model/Types/Sheet.hs b/src/Model/Types/Sheet.hs
index 2f6e43200..793ddd310 100644
--- a/src/Model/Types/Sheet.hs
+++ b/src/Model/Types/Sheet.hs
@@ -224,7 +224,11 @@ data UploadModeDescr = UploadModeNone
 instance Universe UploadModeDescr
 instance Finite UploadModeDescr
 
-nullaryPathPiece ''UploadModeDescr $ camelToPathPiece' 2
+finitePathPiece ''UploadModeDescr
+  [ "no-upload"
+  , "any"
+  , "specific"
+  ]
 
 classifyUploadMode :: UploadMode -> UploadModeDescr
 classifyUploadMode NoUpload = UploadModeNone