Fixed direct use of escape sequences in PS1

This commit is contained in:
Emmanuel BENOîT 2022-10-30 09:58:25 +01:00
parent ce4528b8fe
commit 9246b94acc

View file

@ -302,6 +302,7 @@ sub tput_sequence
open( my $fh , "tput $args|" );
my $value = <$fh>;
close( $fh );
$value =~ s/\033/\\033/g;
return ( $TCCACHE{ $args } = "\\[$value\\]" );
}