# 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 889 "lib/Term/ReadLine/Zoid/ViCommand.pm (autosplit into blib/lib/auto/Term/ReadLine/Zoid/ViCommand/bsearch.al)" sub bsearch { my ($self, $string) = @_; if (length $string) { $$self{last_search} = ['b', $string, -1]; eval { qr/$string/ }; if ($@) { $self->output($@); return $self->bell; } } return $self->vi_N('n', undef, 'b'); } # end of Term::ReadLine::Zoid::ViCommand::bsearch 1;