/usr/share/vile/search.rc is in vile-common 9.8s-5.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 | ; $Header: /usr/build/vile/vile/macros/RCS/search.rc,v 1.3 2001/08/26 19:20:15 tom Exp $
store-procedure SearchForFile
~local %path %word %test %find %n
setv %find &trim $pathname
~if &equal 0 &length %find
write-message "No filename at the current position"
~return
~endif
~if &seq $majormode ''
setv %path '.'
~elseif &seq $majormode 'make'
setv %path '.:/usr/share/mk'
~elseif &seq $majormode 'c'
setv %path '.:/usr/local/include:/usr/include'
~else
setv %path &env 'VILE_SEARCH_PATH'
~if &seq %path ''
setv %path &env 'CDPATH'
~if &seq %path ''
setv %path '.'
~endif
~endif
~endif
setv %n 0
~while ¬ 0
setv %test ''
setv %word &token %n $pathlist-separator %path
~if &seq %word ''
~break
~endif
setv %test &cat %word &cat '/' %find
~if &rd %test
~break
~endif
setv %n &add %n 1
~endwhile
~if &seq %test ''
setv %test=%find
~else
edit-file %test
~endif
~if &rd %test
edit-file %test
~else
write-message &cat 'File not found: ' %test
~endif
~endm
bind-key SearchForFile ^X-e
|