diff --git a/LICENSE b/LICENSE
--- a/LICENSE
+++ b/LICENSE
@@ -1,4 +1,4 @@
-NanoID, lib & app, Copyright (c) 2021, Michel Boucey
+NanoID, lib & app, Copyright (c) 2021-2024, Michel Boucey
 
 All rights reserved.
 
diff --git a/NanoID.cabal b/NanoID.cabal
--- a/NanoID.cabal
+++ b/NanoID.cabal
@@ -1,28 +1,18 @@
 name:                NanoID
-version:             3.4.0
+version:             3.4.0.1
 synopsis:            NanoID generator
 description:         Library and CLI tool for NanoID generation
 license:             BSD3
 license-file:        LICENSE
 author:              Michel Boucey
 maintainer:          michel.boucey@gmail.com
-copyright:           (c) 2021-2023 - Michel Boucey
+copyright:           (c) 2021-2024 - Michel Boucey
 category:            Data
 build-type:          Simple
 cabal-version:       >=1.10
 extra-source-files:  ReadMe.md
 
-Tested-With:
-  GHC == 8.0.2
-   || == 8.2.2
-   || == 8.4.4
-   || == 8.6.5
-   || == 8.8.4
-   || == 8.10.7
-   || == 9.0.2
-   || == 9.2.6
-   || == 9.4.5
-   || == 9.6.1
+Tested-With: GHC ==8.8.4 || ==8.10.7 || ==9.0.2 || ==9.2.8 || ==9.4.8 || ==9.6.3 || ==9.8.1
 
 source-repository head
   type:     git
@@ -30,13 +20,13 @@
 
 library
   exposed-modules:     Data.NanoID
-  build-depends:       aeson      >= 1.5.6 && < 1.6 || >= 2.0 && < 2.2
-                     , base       >= 4.7   && < 4.19
-                     , bytestring >= 0.10  && < 0.12
+  build-depends:       aeson      >= 1.5.6 && < 1.6 || >= 2.0 && < 2.3
+                     , base       >= 4.7   && < 4.20
+                     , bytestring >= 0.10  && < 0.13
                      , cereal     >= 0.5.8 && < 0.5.9
                      , extra      >= 1.6   && < 1.8
                      , mwc-random >= 0.13  && < 0.16
-                     , text       >= 1.2.3 && < 1.3 || == 2.0.*
+                     , text       >= 1.2.3 && < 2.2
   hs-source-dirs:      lib
   default-language:    Haskell2010
 
@@ -44,8 +34,8 @@
   main-is:             Main.hs
   other-modules:       Options
                        Paths_NanoID
-  build-depends:       base                 >= 4.7  && < 4.19
-                     , bytestring           >= 0.10 && < 0.12
+  build-depends:       base                 >= 4.7  && < 4.20
+                     , bytestring           >= 0.10 && < 0.13
                      , mwc-random           >= 0.13 && < 0.16
                      , NanoID
                      , optparse-applicative >= 0.14 && < 0.18
diff --git a/ReadMe.md b/ReadMe.md
--- a/ReadMe.md
+++ b/ReadMe.md
@@ -1,7 +1,8 @@
 # NanoID generator, library and CLI tool ![CI](https://github.com/MichelBoucey/NanoID/actions/workflows/haskell-ci.yml/badge.svg)
+
 ```
 [user@box ~] $ nanoid -h
-nanoid v3.4.0, (c) Michel Boucey 2022-2023
+nanoid v3.4.0.1, (c) Michel Boucey 2022-2024
 
 Usage: nanoid [-a|--alphabet ARG] [-l|--length ARG] [-p|--password] 
               [-q|--quantity ARG] [-n|--newline] [-v|--version]
diff --git a/lib/Data/NanoID.hs b/lib/Data/NanoID.hs
--- a/lib/Data/NanoID.hs
+++ b/lib/Data/NanoID.hs
@@ -29,10 +29,10 @@
 type Length = Natural
 
 instance Show NanoID where
-  show n = C.unpack (unNanoID n)
+  show = C.unpack . unNanoID
 
 instance Show Alphabet where
-  show a = C.unpack (unAlphabet a)
+  show = C.unpack . unAlphabet
 
 instance ToJSON NanoID where
   toJSON n = String (decodeUtf8 $ unNanoID n)