[perl #19153] Term::Complete (the argument of stty)

[p5sagit/p5-mst-13.2.git] / lib / Term / Complete.pm

diff --git a/lib/Term/Complete.pm b/lib/Term/Complete.pm
index e20b2a6..4ae4541 100644 (file)
--- a/lib/Term/Complete.pm
+++ b/lib/Term/Complete.pm
@@ -106,6 +106,7 @@ sub Complete {
            $tty_saved_state = undef;
        }
        else {
+           chomp $tty_saved_state;
            $tty_restore = qq($stty "$tty_saved_state");
        }
     }