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