parent
1195bed77a
commit
5e648b2b39
|
@ -308,7 +308,7 @@ sub run {
|
|||
|
||||
# set up readline if necessary
|
||||
unless($pipe) {
|
||||
require Term::ReadLine qw();
|
||||
require Term::ReadLine;
|
||||
$term = Term::ReadLine->new('IPERL');
|
||||
my $attribs = $term->Attribs();
|
||||
$attribs->{special_prefixes} = '$@%*&';
|
||||
|
|
Loading…
Reference in New Issue