 |
Flush output on prompt so it gets displayed - pee - Pee a password manager;Pee … |
 |
git clone git://vernunftzentrum.de/pee.git |
 |
Log |
|
Files |
|
Refs |
|
LICENSE |
|
--- |
|
commit 3daef81bd910bc6a286cabdd3e70be3cc5dbca56 |
|
parent a5c8e7929fc90d2ddf8c560a2f3154b473af269c |
|
Author: Kooda <[email protected]> |
|
Date: Thu, 1 Dec 2016 13:36:31 +0100 |
|
|
|
Flush output on prompt so it gets displayed |
|
|
|
Diffstat: |
|
pee.scm | 1 + |
|
|
|
1 file changed, 1 insertion(+), 0 deletions(-) |
|
--- |
|
diff --git a/pee.scm b/pee.scm |
|
@@ -62,6 +62,7 @@ |
|
(define (prompt-for msg #!optional default) |
|
(if default (printf "~a [~a]: " msg default) |
|
(printf "~a: " msg)) |
|
+ (flush-output) |
|
(let ((l (read-line))) |
|
(if (and default (equal? "" l)) |
|
default |
