Output decryption error on stderr - pee - Pee a password manager;Pee - because you have to...
 (HTM) git clone git://vernunftzentrum.de/pee.git
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) LICENSE
       ---
 (DIR) commit 6e21d1ce190a29dd0f8575cce529434fb1d4bd31
 (DIR) parent c3b038dc8581a640505209dddde0142e9510afef
 (HTM) Author: Christian Kellermann <ckeen@pestilenz.org>
       Date:   Mon, 11 Jan 2016 14:51:25 +0100
       
       Output decryption error on stderr
       
       So when piping the output to another tool the user can see the actual
       error message.
       
       Diffstat:
         pee.scm                             |       2 +-
       
       1 file changed, 1 insertion(+), 1 deletion(-)
       ---
 (DIR) diff --git a/pee.scm b/pee.scm
       @@ -368,7 +368,7 @@
              (let* ((passphrase (get-hashed-passphrase))
                     (db (or (with-input-from-string
                                 (or (decrypt-file db-name passphrase) "#f") read)
       -                     (begin (print "Error while decrypting " db-name ", wrong key?") (exit 1)))))
       +                     (begin (fprintf (current-error-port) "Error while decrypting " db-name ", wrong key?") (exit 1)))))
                (cond
                 ((alist-ref 'change-passphrase opts)
                  (do-change-passphrase db-name db passphrase))