realized that the zip option is unnecessary.

src/Poseidon/CLI/OptparseApplicativeParsers.hs

@@ -829,7 +829,7 @@ parseArchiveConfigCLI = ArchiveConfig <$> OP.some parseArchiveSpec
         in  case parts of
                 [name, fp] -> do
                     let fps = splitOn "," fp
-                    return $ ArchiveSpec name fps Nothing Nothing Nothing False
+                    return $ ArchiveSpec name fps Nothing Nothing Nothing
                 _ -> Left $ "could not parse archive and base directory " ++ str ++
                             ". Please use format name=path1,path2,... "
 
@@ -839,7 +839,7 @@ parseArchiveConfigPath = OP.strOption (
     OP.metavar "FILE" <>
     OP.help "Path to a .yml config file for the server archive configuration. \
             \This file must include a list of \"archives:\", each with the fields\
-            \ \"name\", \"paths\", \"description\", \"URL\", \"dataURL\", and \"zip\"."
+            \ \"name\", \"paths\", \"description\", \"URL\" and \"dataURL\"."
     )
 
 parseMaybeArchiveName :: OP.Parser (Maybe String)

src/Poseidon/CLI/Serve.hs

@@ -90,7 +90,6 @@ data ArchiveSpec = ArchiveSpec
     , _archSpecDescription :: Maybe String
     , _archSpecURL         :: Maybe String
     , _archSpecDataURL     :: Maybe String
-    , _archSpecZip         :: Bool
     } deriving (Show)
 
 instance FromJSON ArchiveSpec where
@@ -100,13 +99,12 @@ instance FromJSON ArchiveSpec where
         <*> v .:? "description"
         <*> v .:? "URL"
         <*> v .:? "dataURL"
-        <*> v .:  "zip"
 
 type ZipStore = [(PacNameAndVersion, FilePath)] -- maps PackageName+Version to a zipfile-path
 
 type ArchiveName = String
 
-type ArchiveStore a = [(ArchiveSpec, a)] -- a generic lookup table from an archive name to an item
+type ArchiveStore a = [(ArchiveSpec, a)] -- a generic lookup table from an archive specification to an item
 -- we have two concrete ones: ArchiveStore [PoseidonPackage]   and     ArchiveStore ZipStore
 
 getArchiveSpecs :: ArchiveStore a -> [ArchiveSpec]
@@ -254,7 +252,7 @@ runServer (ServeOptions archBaseDirs maybeZipPath port ignoreChecksums certFiles
             archiveName <- captureParam "archive_name"
             spec <- getArchiveSpecByName archiveName archiveStore
             let maybeArchiveDataURL = _archSpecDataURL spec
-                archiveZip = _archSpecZip spec
+                archiveZip = isJust maybeZipPath
             latestPacs  <- selectLatest <$> getArchiveContentByName archiveName archiveStore
             let mapMarkers = concatMap (prepMappable archiveName) latestPacs
             archivePage archiveName maybeArchiveDataURL archiveZip mapMarkers latestPacs

test/PoseidonGoldenTests/GoldenTestsRunCommands.hs

@@ -1207,11 +1207,11 @@ archives = Left $ ArchiveConfig [
         "test/testDat/testPackages/ancient/Lamnidis_2018"
       , "test/testDat/testPackages/ancient/Lamnidis_2018_newVersion"
       , "test/testDat/testPackages/ancient/Wang_2020"
-      ] Nothing Nothing Nothing False
+      ] Nothing Nothing Nothing
     , ArchiveSpec "testArchive2" [
         "test/testDat/testPackages/ancient/Schiffels_2016"
       , "test/testDat/testPackages/ancient/Schmid_2028"
-      ] Nothing Nothing Nothing False
+      ] Nothing Nothing Nothing
     ]
 
  -- Note: We here use our test server (no SSL and different port). The reason is that