Fixed anykey so that it flushs STDIN before waiting for input

2021-09-10 12:24:57 -06:00 · 2021-09-10 12:24:57 -06:00 · 41f611c1e6
commit 41f611c1e6
parent db068908d6
1 changed files with 2 additions and 1 deletions
--- a/wipe.pl
+++ b/wipe.pl
@ -61,6 +61,7 @@ my @good = ();

 # for providing a waiting prompt
 sub anykey {
+	$termios->setattr(fileno(STDIN), TCSAFLUSH);
 	print shift;
 	return getc(STDIN);
 }