From 69c41cdd9992b0ab0fe445e2d92860dd5f341201 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 8 Jul 2017 08:22:42 +0100
Subject: [PATCH] cli, help: usage tweaks

[ci skip]
---
 hledger/Hledger/Cli/Help.hs | 2 +-
 hledger/Hledger/Cli/Main.hs | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger/Hledger/Cli/Help.hs b/hledger/Hledger/Cli/Help.hs
index 1ca1eb6f5..2ee1232a4 100644
--- a/hledger/Hledger/Cli/Help.hs
+++ b/hledger/Hledger/Cli/Help.hs
@@ -32,7 +32,7 @@ import Hledger.Cli.DocFiles
 --import Hledger.Utils.Debug
 
 helpmode = (defCommandMode $ ["help"] ++ aliases) {
-  modeHelp = "show any of the hledger manuals, as plain text. With no argument, list the manuals." `withAliases` aliases
+  modeHelp = "show any of the hledger manuals, choosing the most suitable viewer (info, man, a pager, or stdout). With no argument, list the manuals." `withAliases` aliases
  ,modeGroupFlags = Group {
      groupUnnamed = [
       flagNone ["info"]  (setboolopt "info")  "show the manual with info"
diff --git a/hledger/Hledger/Cli/Main.hs b/hledger/Hledger/Cli/Main.hs
index 2ce8af2b3..d9ec01d2a 100644
--- a/hledger/Hledger/Cli/Main.hs
+++ b/hledger/Hledger/Cli/Main.hs
@@ -81,7 +81,7 @@ import Hledger.Utils
 mainmode addons = defMode {
   modeNames = [progname ++ " [CMD]"]
  ,modeArgs = ([], Just $ argsFlag "[ARGS]")
- ,modeHelp = unlines ["hledger's command line interface"]
+ ,modeHelp = unlines ["hledger's main command line interface. Runs builtin commands and other hledger executables. Type \"hledger\" to list available commands."]
  ,modeGroupModes = Group {
     -- subcommands in the unnamed group, shown first:
     groupUnnamed = [