Lines Matching +refs:history +refs:search
1 # history-match
4 # command history
6 # command history.. Try it twice as it may miss it the first time
7 # The other feature is that if there are several matches in the history
9 # modify the pattern or hit return it will reset the search to something
12 @ RCS.ircIId = [$$Header: /home/cvs/ircii/script/history-match,v 1.2 2001/08/12 15:44:17 mrg Exp $$]
14 bind meta2-p parse history.expn $L
18 on #-input 765 * @ history.pat = [xxnomatchxx]
20 alias history.expn {
21 if ([$0] != history.key)
24 @ history.pat = [xxnomatchxx]
25 @ history.key = [$0]
27 if (history.nomatch == []) {@ history.nomatch = 1}
28 if (!match($(history.pat)* $1)) {@ history.pat = [$1]}
29 @ history.found = 0
30 while (!history.found)
32 if ((history.search = [$(!$(0)!)]) != [])
34 if (match($(history.pat)* $word(1 $history.search)))
37 xtype -literal $history.search
38 @ history.found = 1
39 @ history.nomatch = 0
43 # we hit the top of the history.. drop out of the while loop
44 @ history.found = 1
45 @ history.nomatch = 1