1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
# 10term.patch by Niko Tyni <ntyni@iki.fi>
# DP: Fix uninitialized value message
# DP: (#99843, patch by Nicolas Bertolissio)
Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=123728
--- a/Gnu/XS.pm
+++ b/Gnu/XS.pm
@@ -364,11 +364,12 @@ sub get_history_event ( $$;$ ) {
# Some terminals do not support 'ue' (underline end).
our %term_no_ue = ( kterm => 1 );
+
sub ornaments {
return $rl_term_set unless @_;
$rl_term_set = shift;
$rl_term_set ||= ',,,';
- $rl_term_set = $term_no_ue{$ENV{TERM}} ? 'us,me,,' : 'us,ue,,'
+ $rl_term_set = $term_no_ue{defined($ENV{TERM}) ? $ENV{TERM} : ''} ? 'us,me,,' : 'us,ue,,'
if $rl_term_set eq '1';
my @ts = split /,/, $rl_term_set, 4;
my @rl_term_set
|
