more message improvements

1 files changed, 1 insertions, 0 deletions

diff --git a/Gpg.hs b/Gpg.hs
index 4d387f8..9ae0638 100644
--- a/Gpg.hs
+++ b/Gpg.hs
@@ -31,6 +31,7 @@ myPublicKey (MySessionKey _ epk) (GpgSign gpgsign) = do
 
 gpgSign :: PublicKey -> IO (PerhapsSigned PublicKey)
 gpgSign pk = do
+	putStrLn "Using gpg to sign the debug-me session key."
 	-- Write it to a temp file because gpg sometimes is unhappy
 	-- about password prompting when stdin is not connected to
 	-- the console.