diff --git a/AddCommand.hs b/AddCommand.hs
index 20466a228..2c8a386a6 100644
--- a/AddCommand.hs
+++ b/AddCommand.hs
@@ -25,7 +25,7 @@ add :: [Opt] -> [String] -> Ledger -> IO ()
 add opts args l
     | filepath (rawledger l) == "-" = return ()
     | otherwise = do
-  hPutStrLn stderr ("Please enter one or more transactions, which will be added to your ledger file.\n\
+  hPutStrLn stderr ("Enter one or more transactions, which will be added to your ledger file.\n\
                     \A blank account or amount ends a transaction, control-d to finish.")
   ts <- getAndAddTransactions l args
   hPutStrLn stderr $ printf "\nAdded %d transactions to %s" (length ts) (filepath $ rawledger l)