remove 'copyImages' from singlepage

make-pages/Main.hs

@@ -22,8 +22,7 @@ data ModeOptions =
     SinglePage {
       file        :: FilePath,
       includeNsfw :: Bool,
-      output      :: Maybe FilePath,
-      copyImages  :: Bool
+      output      :: Maybe FilePath
     }
   | GalleryPage {
       files       :: [FilePath],
@@ -41,7 +40,7 @@ optionsParser = globalOpts `Opt.info` mainInfo where
   subcommands = Opt.hsubparser (single <> gallery)
 
   single = Opt.command "single" $ singleOpts `Opt.info` singleInfo
-  singleOpts = SinglePage <$> fileArg <*> nsfwSwitchS <*> outputOpt <*> copyOpt
+  singleOpts = SinglePage <$> fileArg <*> nsfwSwitchS <*> outputOpt
   fileArg = Opt.strArgument $
     Opt.metavar "FILE" <> Opt.help "yaml file to read"
   nsfwSwitchS = Opt.switch $
@@ -51,9 +50,6 @@ optionsParser = globalOpts `Opt.info` mainInfo where
     Opt.short 'o' <> Opt.long "output" <> Opt.metavar "FILE" <>
     Opt.value Nothing <>
     Opt.help "output file (default: stdout)"
-  copyOpt = Opt.switch $
-    Opt.short 'c' <> Opt.long "copy" <>
-    Opt.help "copy mentioned image files to output directory"
   singleInfo = Opt.progDesc "generate a page for a single work"
 
   gallery = Opt.command "gallery" $ galleryOpts `Opt.info` galleryInfo