minirotate 0.1.2.0 → 0.1.2.1

raw patch · 2 files changed

+3/−2 lines, 2 files

Files

minirotate.cabal +1/−1
src/Main.hs +2/−1

minirotate.cabal view

@@ -1,5 +1,5 @@ name:                minirotate-version:             0.1.2.0+version:             0.1.2.1 synopsis:            Minimalistic file rotation utility description:          minirotate is minimalistic file rotation utility designed for calling from cron or similar tool.

src/Main.hs view

@@ -19,6 +19,7 @@ import Text.Printf  import Paths_minirotate ( version )+import Data.Version ( showVersion )  import Debug.Trace @@ -38,7 +39,7 @@     Left errmsg -> logErr errmsg >> exitFailure     Right (locs,(envO,runO)) -> do          when (get showHelp $ envO) (logErr usage)-         when (get showVers $ envO) (logErr $ printf "minirotate version %s" (show version))+         when (get showVers $ envO) (logErr $ printf "minirotate version %s" (showVersion version))          when (get showDefs $ envO) (logErr $ printf "Defaults:\n\t%s\n\t%s\n"                                              (show (def :: EnvOptions))                                              (show (def :: RunOptions)))