optReportRemove :: Options -> Bool
optReportRemove opts = case optRemove opts of
    OptDryRun -> True
    OptScript -> False
    OptRemove -> optVerbose opts
optReportRemove :: Options -> Bool
optReportRemove opts = case optRemove opts of
    OptDryRun -> True
    OptScript -> False
    OptRemove -> optVerbose opts
optReportRemove opts = case optRemove opts of
    OptDryRun -> True
    OptScript -> False
    OptRemove -> optVerbose opts