Rename running -> pacer

CHANGELOG.md

@@ -1,4 +1,4 @@
-# Revision history for running
+# Revision history for pacer
 
 ## 0.1 -- YYYY-mm-dd
 

README.md

@@ -1,10 +1,10 @@
 <div align="center">
 
-# running
+# pacer
 
-[![GitHub release (latest SemVer)](https://img.shields.io/github/v/release/tbidne/running?include_prereleases&sort=semver)](https://github.com/tbidne/running/releases/)
-[![ci](http://img.shields.io/github/actions/workflow/status/tbidne/running/ci.yaml?branch=main)](https://github.com/tbidne/running/actions/workflows/ci.yaml)
-[![MIT](https://img.shields.io/github/license/tbidne/running?color=blue)](https://opensource.org/licenses/MIT)
+[![GitHub release (latest SemVer)](https://img.shields.io/github/v/release/tbidne/pacer?include_prereleases&sort=semver)](https://github.com/tbidne/pacer/releases/)
+[![ci](http://img.shields.io/github/actions/workflow/status/tbidne/pacer/ci.yaml?branch=main)](https://github.com/tbidne/pacer/actions/workflows/ci.yaml)
+[![MIT](https://img.shields.io/github/license/tbidne/pacer?color=blue)](https://opensource.org/licenses/MIT)
 
 </div>
 

app/Main.hs

@@ -4,8 +4,8 @@
 module Main (main) where
 
 import GHC.Conc.Sync (setUncaughtExceptionHandler)
-import Running.Driver (runApp)
-import Running.Prelude hiding (IO)
+import Pacer.Driver (runApp)
+import Pacer.Prelude hiding (IO)
 import System.IO (IO)
 
 -- | Executable entry-point.

cabal.project

@@ -1,6 +1,6 @@
 packages: .
 
-package running
+package pacer
   ghc-options:
     -Wall -Wcompat
     -Widentities

flake.nix

@@ -1,7 +1,7 @@
 {
-  description = "A Template for Haskell Packages";
+  description = "Pacer: A utility for runners.";
   inputs = {
-    # ni
+    # nix
     flake-parts.url = "github:hercules-ci/flake-parts";
     nixpkgs.url = "github:nixos/nixpkgs/nixos-unstable";
     nix-hs-utils.url = "github:tbidne/nix-hs-utils";
@@ -86,7 +86,7 @@
             returnShellEnv:
             nix-hs-utils.mkHaskellPkg {
               inherit compiler pkgs returnShellEnv;
-              name = "running";
+              name = "pacer";
               root = ./.;
             };
         in

hie.yaml

@@ -2,13 +2,13 @@
 cradle:
   cabal:
     - path: "./src"
-      component: "lib:running"
+      component: "lib:pacer"
 
     - path: "./app/Main.hs"
-      component: "running:exe:running"
+      component: "pacer:exe:pacer"
 
     - path: "./test/unit"
-      component: "running:test:unit"
+      component: "pacer:test:unit"
 
     - path: "./test/functional"
-      component: "running:test:functional"
+      component: "pacer:test:functional"

running.cabal → pacer.cabal

@@ -1,14 +1,14 @@
 cabal-version:      2.4
-name:               running
+name:               pacer
 version:            0.1
 license:            MIT
 license-file:       LICENSE
 tested-with:        GHC ==9.8.2 || ==9.10.1
 copyright:          2024 Thomas Bidne
 author:             Thomas Bidne
 maintainer:         tbidne@protonmail.com
-homepage:           https://github.com/tbidne/running/
-bug-reports:        https://github.com/tbidne/running/issues
+homepage:           https://github.com/tbidne/pacer/
+bug-reports:        https://github.com/tbidne/pacer/issues
 synopsis:           Template
 description:        Template
 category:           Template
@@ -20,7 +20,7 @@ extra-source-files:
 
 source-repository head
   type:     git
-  location: https://github.com/tbidne/running
+  location: https://github.com/tbidne/pacer
 
 common common-lang
   default-extensions:
@@ -40,23 +40,23 @@ common common-lang
 
 library
   import:          common-lang
-  other-modules:   Paths_running
-  autogen-modules: Paths_running
+  other-modules:   Paths_pacer
+  autogen-modules: Paths_pacer
   exposed-modules:
-    Running
-    Running.Class.Parser
-    Running.Class.Units
-    Running.Config.Args
-    Running.Config.Args.Command
-    Running.Config.Args.Utils
-    Running.Config.Data
-    Running.Data.Distance
-    Running.Data.Distance.Units
-    Running.Data.Duration
-    Running.Data.Duration.Units
-    Running.Data.Pace
-    Running.Driver
-    Running.Prelude
+    Pacer
+    Pacer.Class.Parser
+    Pacer.Class.Units
+    Pacer.Config.Args
+    Pacer.Config.Args.Command
+    Pacer.Config.Args.Utils
+    Pacer.Config.Data
+    Pacer.Data.Distance
+    Pacer.Data.Distance.Units
+    Pacer.Data.Duration
+    Pacer.Data.Duration.Units
+    Pacer.Data.Pace
+    Pacer.Driver
+    Pacer.Prelude
 
   build-depends:
     , algebra-simple        ^>=0.1
@@ -77,12 +77,12 @@ library
 
   hs-source-dirs:  src
 
-executable running
+executable pacer
   import:         common-lang
   main-is:        Main.hs
   build-depends:
     , base
-    , running
+    , pacer
 
   hs-source-dirs: app
   ghc-options:    -threaded -with-rtsopts=-N
@@ -92,18 +92,18 @@ test-suite unit
   type:           exitcode-stdio-1.0
   main-is:        Main.hs
   other-modules:
+    Unit.Pacer
+    Unit.Pacer.Data.Distance
+    Unit.Pacer.Data.Distance.Units
+    Unit.Pacer.Data.Duration
+    Unit.Pacer.Data.Pace
     Unit.Prelude
-    Unit.Running
-    Unit.Running.Data.Distance
-    Unit.Running.Data.Distance.Units
-    Unit.Running.Data.Duration
-    Unit.Running.Data.Pace
     Unit.Utils
 
   build-depends:
     , base
     , hedgehog        >=1.0.2   && <1.5
-    , running
+    , pacer
     , tasty           >=1.1.0.3 && <1.6
     , tasty-hedgehog  >=1.0.0.2 && <1.5
     , tasty-hunit     >=0.9     && <0.11
@@ -119,7 +119,7 @@ test-suite functional
   build-depends:
     , base
     , hedgehog
-    , running
+    , pacer
     , tasty
     , tasty-hedgehog
     , tasty-hunit

src/Running.hs → src/Pacer.hs

@@ -1,4 +1,4 @@
-module Running
+module Pacer
   ( -- * Conversions
 
     -- ** Distance
@@ -15,16 +15,16 @@ module Running
   )
 where
 
-import Running.Data.Distance
+import Pacer.Data.Distance
   ( Distance (MkDistance, unDistance),
     SomeDistance (MkSomeDistance),
   )
-import Running.Data.Distance qualified as Dist
-import Running.Data.Distance.Units (SDistanceUnit (SKilometer, SMeter, SMile))
-import Running.Data.Duration (Duration (MkDuration), TimeUnit (Second))
-import Running.Data.Duration qualified as Duration
-import Running.Data.Pace (Pace (MkPace), PaceDistF, SomePace (MkSomePace), mkPace)
-import Running.Prelude
+import Pacer.Data.Distance qualified as Dist
+import Pacer.Data.Distance.Units (SDistanceUnit (SKilometer, SMeter, SMile))
+import Pacer.Data.Duration (Duration (MkDuration), TimeUnit (Second))
+import Pacer.Data.Duration qualified as Duration
+import Pacer.Data.Pace (Pace (MkPace), PaceDistF, SomePace (MkSomePace), mkPace)
+import Pacer.Prelude
 
 -- | Given a distance and a duration, calculates the pace.
 calculatePace ::

src/Running/Class/Parser.hs → src/Pacer/Class/Parser.hs

@@ -1,5 +1,5 @@
 -- | Provides parsing functionality.
-module Running.Class.Parser
+module Pacer.Class.Parser
   ( Parser (..),
     MParser,
     parse,
@@ -23,7 +23,7 @@ where
 import Data.Char qualified as Ch
 import Data.Text qualified as T
 import Data.Time.Relative qualified as Rel
-import Running.Prelude
+import Pacer.Prelude
 import Text.Megaparsec (Parsec, (<?>))
 import Text.Megaparsec qualified as MP
 import Text.Read qualified as TR
@@ -81,7 +81,7 @@ parse :: (Parser a) => Text -> Either Text a
 parse = parseWith parser
 
 parseWith :: MParser a -> Text -> Either Text a
-parseWith p t = case MP.runParser (p <* MP.eof) "Running.Class.Parser.parseWith" t of
+parseWith p t = case MP.runParser (p <* MP.eof) "Pacer.Class.Parser.parseWith" t of
   Left err -> Left . T.pack . MP.errorBundlePretty $ err
   Right v -> Right v
 

src/Running/Class/Units.hs → src/Pacer/Class/Units.hs

@@ -1,13 +1,13 @@
 {-# LANGUAGE AllowAmbiguousTypes #-}
 
 -- | Provides common units functionality.
-module Running.Class.Units
+module Pacer.Class.Units
   ( Units (..),
     singFactor,
   )
 where
 
-import Running.Prelude
+import Pacer.Prelude
 
 -- | Class for units.
 class Units a where

src/Running/Config/Args.hs → src/Pacer/Config/Args.hs

@@ -1,4 +1,4 @@
-module Running.Config.Args
+module Pacer.Config.Args
   ( Args (..),
     parserInfo,
   )
@@ -24,9 +24,9 @@ import Options.Applicative qualified as OA
 import Options.Applicative.Help.Chunk (Chunk (Chunk))
 import Options.Applicative.Help.Chunk qualified as Chunk
 import Options.Applicative.Types (ArgPolicy (Intersperse))
-import Paths_running qualified as Paths
-import Running.Config.Args.Command (Command, cmdParser)
-import Running.Prelude
+import Pacer.Config.Args.Command (Command, cmdParser)
+import Pacer.Prelude
+import Paths_pacer qualified as Paths
 
 -- | CLI args.
 newtype Args = MkArgs
@@ -48,12 +48,12 @@ parserInfo =
       infoPolicy = Intersperse
     }
   where
-    header = Just "Running: A tool for running."
+    header = Just "Pacer: A tool for runners."
     footerTxt = Just $ fromString versNum
     desc =
       Chunk.paragraph
         $ mconcat
-          [ "Running includes several commands useful for runners."
+          [ "Pacer includes several commands useful for runners."
           ]
 
 argsParser :: Parser Args

src/Running/Config/Args/Command.hs → src/Pacer/Config/Args/Command.hs

@@ -1,4 +1,4 @@
-module Running.Config.Args.Command
+module Pacer.Config.Args.Command
   ( -- * Command
     Command (..),
     cmdParser,
@@ -22,13 +22,13 @@ import Options.Applicative
   )
 import Options.Applicative qualified as OA
 import Options.Applicative.Types (ReadM)
-import Running.Class.Parser qualified as P
-import Running.Config.Args.Utils qualified as Utils
-import Running.Data.Distance (SomeDistance)
-import Running.Data.Duration (Duration)
-import Running.Data.Duration.Units (TimeUnit (Second))
-import Running.Data.Pace (SomePace)
-import Running.Prelude
+import Pacer.Class.Parser qualified as P
+import Pacer.Config.Args.Utils qualified as Utils
+import Pacer.Data.Distance (SomeDistance)
+import Pacer.Data.Duration (Duration)
+import Pacer.Data.Duration.Units (TimeUnit (Second))
+import Pacer.Data.Pace (SomePace)
+import Pacer.Prelude
 
 -- | Possible commands
 data Command

src/Running/Config/Args/Utils.hs → src/Pacer/Config/Args/Utils.hs

@@ -1,4 +1,4 @@
-module Running.Config.Args.Utils
+module Pacer.Config.Args.Utils
   ( mkCommand,
     mkCommandDesc,
     mkCommandDescChunk,
@@ -16,7 +16,7 @@ import Options.Applicative qualified as OA
 import Options.Applicative.Help (Chunk, Doc)
 import Options.Applicative.Help.Chunk qualified as Chunk
 import Options.Applicative.Help.Pretty qualified as Pretty
-import Running.Prelude
+import Pacer.Prelude
 
 mkCommand :: String -> Parser a -> InfoMod a -> Mod CommandFields a
 mkCommand cmdTxt parser helpTxt = OA.command cmdTxt (OA.info parser helpTxt)

src/Running/Config/Data.hs → src/Pacer/Config/Data.hs

@@ -1,9 +1,9 @@
-module Running.Config.Data
+module Pacer.Config.Data
   ( Either3 (..),
   )
 where
 
-import Running.Prelude
+import Pacer.Prelude
 
 data Either3 a b c
   = Either1 a

src/Running/Data/Distance.hs → src/Pacer/Data/Distance.hs

@@ -1,5 +1,5 @@
 -- | Provide distance types.
-module Running.Data.Distance
+module Pacer.Data.Distance
   ( -- * Distance
     Distance (..),
 
@@ -23,13 +23,13 @@ module Running.Data.Distance
   )
 where
 
-import Running.Class.Parser (MParser, Parser (parser))
-import Running.Class.Units (singFactor)
-import Running.Data.Distance.Units
+import Pacer.Class.Parser (MParser, Parser (parser))
+import Pacer.Class.Units (singFactor)
+import Pacer.Data.Distance.Units
   ( DistanceUnit (Kilometer, Meter, Mile),
     SDistanceUnit (SKilometer, SMeter, SMile),
   )
-import Running.Prelude
+import Pacer.Prelude
 import Text.Megaparsec qualified as MP
 import Text.Megaparsec.Char qualified as MPC
 import Text.Printf (printf)

src/Running/Data/Distance/Units.hs → src/Pacer/Data/Distance/Units.hs

@@ -1,15 +1,15 @@
 -- | Units for distance.
-module Running.Data.Distance.Units
+module Pacer.Data.Distance.Units
   ( DistanceUnit (..),
 
     -- * Singletons
     SDistanceUnit (..),
   )
 where
 
-import Running.Class.Parser (Parser (parser))
-import Running.Class.Units (Units (baseFactor))
-import Running.Prelude
+import Pacer.Class.Parser (Parser (parser))
+import Pacer.Class.Units (Units (baseFactor))
+import Pacer.Prelude
 import Text.Megaparsec qualified as MP
 import Text.Megaparsec.Char qualified as MPC