# NOTE: Derived from lib/Term/ReadLine/Zoid/ViCommand.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Term::ReadLine::Zoid::ViCommand; #line 1036 "lib/Term/ReadLine/Zoid/ViCommand.pm (autosplit into blib/lib/auto/Term/ReadLine/Zoid/ViCommand/bindkey.al)" sub bindkey { my $self = shift; $self->SUPER::bindkey(@_) if @_ == 2; my @arg = split /=/, $_[0], 2; $arg[1] = eval $arg[1]; return warn $@."\n\n" if $@; $self->SUPER::bindkey(@arg); } # end of Term::ReadLine::Zoid::ViCommand::bindkey 1;