diff --git a/HOpenPGP/Tools/Common.hs b/HOpenPGP/Tools/Common.hs
--- a/HOpenPGP/Tools/Common.hs
+++ b/HOpenPGP/Tools/Common.hs
@@ -62,7 +62,7 @@
 import Data.Monoid ((<>))
 import Data.Text (Text)
 import qualified Data.Text as T
-import Options.Applicative.Builder (auto, help, infoOption, long, short)
+import Options.Applicative.Builder (auto, help, hidden, infoOption, long, short)
 import Options.Applicative.Types (Parser, ReadM(..))
 import Text.PrettyPrint.ANSI.Leijen (Doc, (<+>), hardline, text)
 
@@ -84,12 +84,13 @@
      text "This is free software, and you are welcome to redistribute it" <+>
      text "under certain conditions."
 
-versioner :: Parser (a -> a)
+versioner :: String -> Parser (a -> a)
 {-# INLINE versioner #-}
-versioner = infoOption (showVersion version) $
+versioner name = infoOption (name ++ " (hopenpgp-tools) " ++ showVersion version) $
     long "version"
    <> short 'V'
    <> help "Show version information"
+   <> hidden
 
 prependAuto :: Read a => String -> ReadM a
 prependAuto s = ReadM (local (s++) (unReadM auto))
diff --git a/hkt.hs b/hkt.hs
--- a/hkt.hs
+++ b/hkt.hs
@@ -231,7 +231,7 @@
 main = do
     hSetBuffering stderr LineBuffering
     homedir <- getHomeDirectory
-    customExecParser (prefs showHelpOnError) (info (helper <*> versioner <*> cmd homedir) (headerDoc (Just (banner "hkt")) <> progDesc "hOpenPGP Keyring Tool" <> footerDoc (Just (warranty "hkt")))) >>= dispatch
+    customExecParser (prefs showHelpOnError) (info (helper <*> versioner "hkt" <*> cmd homedir) (headerDoc (Just (banner "hkt")) <> progDesc "hOpenPGP Keyring Tool" <> footerDoc (Just (warranty "hkt")))) >>= dispatch
 
 cmd :: String -> Parser Command
 cmd homedir = hsubparser
diff --git a/hokey.hs b/hokey.hs
--- a/hokey.hs
+++ b/hokey.hs
@@ -369,7 +369,7 @@
 main :: IO ()
 main = do
     hSetBuffering stderr LineBuffering
-    customExecParser (prefs showHelpOnError) (info (helper <*> versioner <*> cmd) (headerDoc (Just (banner "hokey")) <> progDesc "hOpenPGP Key utility" <> footerDoc (Just (warranty "hokey")))) >>= dispatch
+    customExecParser (prefs showHelpOnError) (info (helper <*> versioner "hokey" <*> cmd) (headerDoc (Just (banner "hokey")) <> progDesc "hOpenPGP Key utility" <> footerDoc (Just (warranty "hokey")))) >>= dispatch
 
 cmd :: Parser Command
 cmd = hsubparser
diff --git a/hopenpgp-tools.cabal b/hopenpgp-tools.cabal
--- a/hopenpgp-tools.cabal
+++ b/hopenpgp-tools.cabal
@@ -1,5 +1,5 @@
 name:                hopenpgp-tools
-version:             0.19.2
+version:             0.19.3
 synopsis:            hOpenPGP-based command-line tools
 description:         command-line tools for performing some OpenPGP-related operations
 homepage:            http://floss.scru.org/hopenpgp-tools
@@ -126,4 +126,4 @@
 source-repository this
   type:     git
   location: https://anonscm.debian.org/git/users/clint/hopenpgp-tools.git
-  tag:      hopenpgp-tools/0.19.1
+  tag:      hopenpgp-tools/0.19.3
diff --git a/hot.hs b/hot.hs
--- a/hot.hs
+++ b/hot.hs
@@ -28,7 +28,7 @@
 import Codec.Encryption.OpenPGP.Serialize ()
 import Codec.Encryption.OpenPGP.Types
 #if !MIN_VERSION_base(4,8,0)
-import Control.Applicative ((<$>), (<*>))
+import Control.Applicative ((<$>), (<*>), pure)
 #endif
 import Control.Applicative (optional)
 import Control.Error.Util (note)
@@ -157,7 +157,7 @@
 main :: IO ()
 main = do
     hSetBuffering stderr LineBuffering
-    customExecParser (prefs showHelpOnError) (info (helper <*> versioner <*> cmd) (headerDoc (Just (banner "hot")) <> progDesc "hOpenPGP OpenPGP-message Tool" <> footerDoc (Just (warranty "hot")))) >>= dispatch
+    customExecParser (prefs showHelpOnError) (info (helper <*> versioner "hot" <*> cmd) (headerDoc (Just (banner "hot")) <> progDesc "hOpenPGP OpenPGP-message Tool" <> footerDoc (Just (warranty "hot")))) >>= dispatch
 
 cmd :: Parser Command
 cmd = hsubparser