@ -18,6 +18,7 @@ UNSETS = %w[
FZF_ALT_C_COMMAND
FZF_ALT_C_COMMAND
FZF_ALT_C_OPTS FZF_CTRL_R_OPTS
FZF_ALT_C_OPTS FZF_CTRL_R_OPTS
FZF_API_KEY
FZF_API_KEY
fish_history
] . freeze ] . freeze
DEFAULT_TIMEOUT = 10 DEFAULT_TIMEOUT = 10
@ -66,7 +67,7 @@ class Shell
end
end
def fish
def fish
" unset #{ UNSETS . join ( ' ' ) } ; FZF_DEFAULT_OPTS=--no-scrollbar fish_history= fish "
UNSETS . map { | v | v + '= ' } . join + ' FZF_DEFAULT_OPTS=--no-scrollbar fish'
end
end
end
end
end end
@ -425,25 +426,6 @@ class TestGoFZF < TestBase
end
end
end
end
def test_multi_action
tmux . send_keys " seq 10 | #{ FZF } --bind 'a:change-multi,b:change-multi(3),c:change-multi(xxx),d:change-multi(0)' " , :Enter
tmux . until { | lines | assert_equal 10 , lines . item_count }
tmux . until { | lines | assert lines [ - 2 ] & . start_with? ( ' 10/10 ' ) }
tmux . send_keys 'a'
tmux . until { | lines | assert lines [ - 2 ] & . start_with? ( ' 10/10 (0)' ) }
tmux . send_keys 'b'
tmux . until { | lines | assert lines [ - 2 ] & . start_with? ( ' 10/10 (0/3)' ) }
tmux . send_keys :BTab
tmux . until { | lines | assert lines [ - 2 ] & . start_with? ( ' 10/10 (1/3)' ) }
tmux . send_keys 'c'
tmux . send_keys :BTab
tmux . until { | lines | assert lines [ - 2 ] & . start_with? ( ' 10/10 (2/3)' ) }
tmux . send_keys 'd'
tmux . until do | lines |
assert lines [ - 2 ] & . start_with? ( ' 10/10 ' ) && ! lines [ - 2 ] & . include? ( '(' )
end
end
def test_with_nth
def test_with_nth
[ true , false ] . each do | multi |
[ true , false ] . each do | multi |
tmux . send_keys " (echo ' 1st 2nd 3rd/';
tmux . send_keys " (echo ' 1st 2nd 3rd/';
@ -557,7 +539,7 @@ class TestGoFZF < TestBase
def test_expect
def test_expect
test = lambda do | key , feed , expected = key |
test = lambda do | key , feed , expected = key |
tmux . send_keys " seq 1 100 | #{ fzf ( :expect , key , :prompt , " [ #{ key } ] " )} " , :Enter
tmux . send_keys " seq 1 100 | #{ fzf ( :expect , key } " , :Enter
tmux . until { | lines | assert_equal ' 100/100' , lines [ - 2 ] }
tmux . until { | lines | assert_equal ' 100/100' , lines [ - 2 ] }
tmux . send_keys '55'
tmux . send_keys '55'
tmux . until { | lines | assert_equal ' 1/100' , lines [ - 2 ] }
tmux . until { | lines | assert_equal ' 1/100' , lines [ - 2 ] }
@ -982,40 +964,26 @@ class TestGoFZF < TestBase
def test_execute
def test_execute
output = '/tmp/fzf-test-execute'
output = '/tmp/fzf-test-execute'
opts = %[ --bind "alt-a:execute(echo /{}/ >> #{ output } ) +change-header(alt-a) ,alt-b:execute[ echo /{}{}/ >> #{ output } ] +change-header(alt-b),C:execute( echo /{}{}{}/ >> #{ output } )+change-header(C) "]
opts = %[ --bind "alt-a:execute(echo /{}/ >> #{ output } ) ,alt-b:execute[ echo /{}{}/ >> #{ output } ] ,C:execute: echo /{}{}{}/ >> #{ output } ]
writelines ( tempname , %w[ foo'bar foo"bar foo$bar ] )
writelines ( tempname , %w[ foo'bar foo"bar foo$bar ] )
tmux . send_keys " cat #{ tempname } | #{ fzf ( opts ) } " , :Enter
tmux . send_keys " cat #{ tempname } | #{ fzf ( opts ) } " , :Enter
tmux . until { | lines | assert_equal 3 , lines . item_count }
tmux . until { | lines | assert_equal ' 3/3' , lines [ - 2 ] }
ready = - > ( s ) { tmux . until { | lines | assert_includes lines [ - 3 ] , s } }
tmux . send_keys :Escape , :a
tmux . send_keys :Escape , :a
ready . call ( 'alt-a' )
tmux . send_keys :Escape , :b
ready . call ( 'alt-b' )
tmux . send_keys :Up
tmux . send_keys :Escape , :a
tmux . send_keys :Escape , :a
ready . call ( 'alt-a' )
tmux . send_keys :Up
tmux . send_keys :Escape , :b
tmux . send_keys :Escape , :b
tmux . send_keys :Escape , :b
ready . call ( 'alt-b' )
tmux . send_keys :Up
tmux . send_keys :Up
tmux . send_keys :C
tmux . send_keys :C
ready . call ( 'C' )
tmux . send_keys 'barfoo'
tmux . send_keys 'barfoo'
tmux . until { | lines | assert_equal ' 0/3' , lines [ - 2 ] }
tmux . until { | lines | assert_equal ' 0/3' , lines [ - 2 ] }
tmux . send_keys :Escape , :a
tmux . send_keys :Escape , :a
ready . call ( 'alt-a' )
tmux . send_keys :Escape , :b
tmux . send_keys :Escape , :b
ready . call ( 'alt-b' )
wait do
wait do
assert_path_exists output
assert_path_exists output
assert_equal %w[
assert_equal %w[
/ foo'bar / / foo'bar foo'bar /
/ foo'bar / / foo'bar /
/ foo"bar / / foo"barfoo"bar /
/ foo"bar foo"bar / / foo"barfoo"bar /
/ foo$barfoo$barfoo$bar /
/ foo$barfoo$barfoo$bar /
] , File . readlines ( output , chomp : true )
] , File . readlines ( output , chomp : true )
end
end
@ -1025,28 +993,17 @@ class TestGoFZF < TestBase
def test_execute_multi
def test_execute_multi
output = '/tmp/fzf-test-execute-multi'
output = '/tmp/fzf-test-execute-multi'
opts = %[ --multi --bind "alt-a:execute-multi(echo {}/{+} >> #{ output } ) +change-header(alt-a),alt-b:change-header(alt-b) "]
opts = %[ --multi --bind "alt-a:execute-multi(echo {}/{+} >> #{ output } ) "]
writelines ( tempname , %w[ foo'bar foo"bar foo$bar foobar ] )
writelines ( tempname , %w[ foo'bar foo"bar foo$bar foobar ] )
tmux . send_keys " cat #{ tempname } | #{ fzf ( opts ) } " , :Enter
tmux . send_keys " cat #{ tempname } | #{ fzf ( opts ) } " , :Enter
ready = - > ( s ) { tmux . until { | lines | assert_includes lines [ - 3 ] , s } }
tmux . until { | lines | assert_equal ' 4/4 (0)' , lines [ - 2 ] }
tmux . until { | lines | assert_equal ' 4/4 (0)' , lines [ - 2 ] }
tmux . send_keys :Escape , :a
tmux . send_keys :Escape , :a
ready . call ( 'alt-a' )
tmux . send_keys :Escape , :b
ready . call ( 'alt-b' )
tmux . send_keys :BTab , :BTab , :BTab
tmux . send_keys :BTab , :BTab , :BTab
tmux . until { | lines | assert_equal ' 4/4 (3)' , lines [ - 2 ] }
tmux . until { | lines | assert_equal ' 4/4 (3)' , lines [ - 2 ] }
tmux . send_keys :Escape , :a
tmux . send_keys :Escape , :a
ready . call ( 'alt-a' )
tmux . send_keys :Escape , :b
ready . call ( 'alt-b' )
tmux . send_keys :Tab , :Tab
tmux . send_keys :Tab , :Tab
tmux . until { | lines | assert_equal ' 4/4 (3)' , lines [ - 2 ] }
tmux . until { | lines | assert_equal ' 4/4 (3)' , lines [ - 2 ] }
tmux . send_keys :Escape , :a
tmux . send_keys :Escape , :a
ready . call ( 'alt-a' )
wait do
wait do
assert_path_exists output
assert_path_exists output
assert_equal [
assert_equal [
@ -1264,7 +1221,7 @@ class TestGoFZF < TestBase
end
end
def test_toggle_header
def test_toggle_header
tmux . send_keys " seq 4 | #{ FZF } --header-lines 2 --header foo --bind space:toggle-header --header-first --height 10 --border rounded " , :Enter
tmux . send_keys " seq 4 | #{ FZF } --header-lines 2 --header foo --bind space:toggle-header --header-first --height 10 --border " , :Enter
before = << ~ OUTPUT
before = << ~ OUTPUT
╭ ─ ─ ─ ─ ─ ─ ─
╭ ─ ─ ─ ─ ─ ─ ─
│
│
@ -1487,19 +1444,6 @@ class TestGoFZF < TestBase
assert_equal '3' , readonce . chomp
assert_equal '3' , readonce . chomp
end
end
def test_jump_events
tmux . send_keys " seq 1000 | #{ fzf ( " --multi --jump-labels 12345 --bind 'ctrl-j:jump,jump:preview(echo jumped to {}),jump-cancel:preview(echo jump cancelled at {})' " ) } " , :Enter
tmux . until { | lines | assert_equal ' 1000/1000 (0)' , lines [ - 2 ] }
tmux . send_keys 'C-j'
tmux . until { | lines | assert_includes lines [ - 7 ] , '5 5' }
tmux . send_keys '3'
tmux . until { | lines | assert ( lines . any? { _1 . include? ( 'jumped to 3' ) } ) }
tmux . send_keys 'C-j'
tmux . until { | lines | assert_includes lines [ - 7 ] , '5 5' }
tmux . send_keys 'C-c'
tmux . until { | lines | assert ( lines . any? { _1 . include? ( 'jump cancelled at 3' ) } ) }
end
def test_pointer
def test_pointer
tmux . send_keys " seq 10 | #{ fzf ( " --pointer '>>' " ) } " , :Enter
tmux . send_keys " seq 10 | #{ fzf ( " --pointer '>>' " ) } " , :Enter
# Assert that specified pointer is displayed
# Assert that specified pointer is displayed
@ -1751,7 +1695,7 @@ class TestGoFZF < TestBase
end
end
def test_info_hidden
def test_info_hidden
tmux . send_keys 'seq 10 | fzf --info=hidden --no-separator ', :Enter
tmux . send_keys 'seq 10 | fzf --info=hidden ', :Enter
tmux . until { | lines | assert_equal '> 1' , lines [ - 2 ] }
tmux . until { | lines | assert_equal '> 1' , lines [ - 2 ] }
end
end
@ -1949,7 +1893,7 @@ class TestGoFZF < TestBase
end
end
def test_reload
def test_reload
tmux . send_keys %( seq 1000 | #{ FZF } --bind 'change:reload ( seq $FZF_QUERY ) ,a:reload ( seq 100 ) ,b:reload:seq 200' --header-lines 2 --multi 2 ) , :Enter
tmux . send_keys %( seq 1000 | #{ FZF } --bind 'change:reload ( seq {q} ) ,a:reload ( seq 100 ) ,b:reload:seq 200' --header-lines 2 --multi 2 ) , :Enter
tmux . until { | lines | assert_equal 998 , lines . match_count }
tmux . until { | lines | assert_equal 998 , lines . match_count }
tmux . send_keys 'a'
tmux . send_keys 'a'
tmux . until do | lines |
tmux . until do | lines |
@ -1974,11 +1918,6 @@ class TestGoFZF < TestBase
tmux . until { | lines | assert_equal 10 , lines . item_count }
tmux . until { | lines | assert_equal 10 , lines . item_count }
end
end
def test_reload_should_terminate_standard_input_stream
tmux . send_keys %( ruby -e "STDOUT.sync = true; loop { puts 1; sleep 0.1 }" | fzf --bind 'start:reload ( seq 100 ) ' ) , :Enter
tmux . until { | lines | assert_equal 100 , lines . item_count }
end
def test_clear_list_when_header_lines_changed_due_to_reload
def test_clear_list_when_header_lines_changed_due_to_reload
tmux . send_keys %( seq 10 | #{ FZF } --header 0 --header-lines 3 --bind 'space:reload ( seq 1 ) ' ) , :Enter
tmux . send_keys %( seq 10 | #{ FZF } --header 0 --header-lines 3 --bind 'space:reload ( seq 1 ) ' ) , :Enter
tmux . until { | lines | assert_includes lines , ' 9' }
tmux . until { | lines | assert_includes lines , ' 9' }
@ -2221,15 +2160,14 @@ class TestGoFZF < TestBase
file = Tempfile . new ( 'fzf-follow' )
file = Tempfile . new ( 'fzf-follow' )
file . sync = true
file . sync = true
tmux . send_keys %( seq 100 | #{ FZF } --preview ' echo start; tail -f "#{ file . path } "' --preview-window follow --bind 'up:preview-up,down:preview-down,space:change-preview-window:follow|nofollow' --preview-window '~ 4 ') , :Enter
tmux . send_keys %( seq 100 | #{ FZF } --preview ' tail -f "#{ file . path } "' --preview-window follow --bind 'up:preview-up,down:preview-down,space:change-preview-window:follow|nofollow' --preview-window '~ 3 ') , :Enter
tmux . until { | lines | lines . item_count == 100 }
tmux . until { | lines | lines . item_count == 100 }
# Write to the temporary file, and check if the preview window is showing
# Write to the temporary file, and check if the preview window is showing
# the last line of the file
# the last line of the file
tmux . until { | lines | assert_includes lines [ 1 ] , 'start' }
3 . times { file . puts _1 } # header lines
3 . times { file . puts _1 } # header lines
1000 . times { file . puts _1 }
1000 . times { file . puts _1 }
tmux . until { | lines | assert_includes lines [ 1 ] , '/100 4 ' }
tmux . until { | lines | assert_includes lines [ 1 ] , '/100 3 ' }
tmux . until { | lines | assert_includes lines [ - 2 ] , '999' }
tmux . until { | lines | assert_includes lines [ - 2 ] , '999' }
# Scroll the preview window and fzf should stop following the file content
# Scroll the preview window and fzf should stop following the file content
@ -2237,7 +2175,7 @@ class TestGoFZF < TestBase
tmux . until { | lines | assert_includes lines [ - 2 ] , '998' }
tmux . until { | lines | assert_includes lines [ - 2 ] , '998' }
file . puts 'foo' , 'bar'
file . puts 'foo' , 'bar'
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ 1 ] , '/100 6 '
assert_includes lines [ 1 ] , '/100 5 '
assert_includes lines [ - 2 ] , '998'
assert_includes lines [ - 2 ] , '998'
end
end
@ -2250,7 +2188,7 @@ class TestGoFZF < TestBase
end
end
file . puts 'baz'
file . puts 'baz'
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ 1 ] , '/100 7 '
assert_includes lines [ 1 ] , '/100 6 '
assert_includes lines [ - 2 ] , 'baz'
assert_includes lines [ - 2 ] , 'baz'
end
end
@ -2259,7 +2197,7 @@ class TestGoFZF < TestBase
wait { assert_includes lines [ - 2 ] , 'bar' }
wait { assert_includes lines [ - 2 ] , 'bar' }
file . puts 'aaa'
file . puts 'aaa'
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ 1 ] , '/100 8 '
assert_includes lines [ 1 ] , '/100 7 '
assert_includes lines [ - 2 ] , 'bar'
assert_includes lines [ - 2 ] , 'bar'
end
end
@ -2268,7 +2206,7 @@ class TestGoFZF < TestBase
tmux . until { | lines | assert_includes lines [ - 2 ] , 'aaa' }
tmux . until { | lines | assert_includes lines [ - 2 ] , 'aaa' }
file . puts 'bbb'
file . puts 'bbb'
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ 1 ] , '/100 9 '
assert_includes lines [ 1 ] , '/100 8 '
assert_includes lines [ - 2 ] , 'bbb'
assert_includes lines [ - 2 ] , 'bbb'
end
end
@ -2276,7 +2214,7 @@ class TestGoFZF < TestBase
tmux . send_keys :Space
tmux . send_keys :Space
file . puts 'ccc' , 'ddd'
file . puts 'ccc' , 'ddd'
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ 1 ] , '/101 1 '
assert_includes lines [ 1 ] , '/101 0 '
assert_includes lines [ - 2 ] , 'bbb'
assert_includes lines [ - 2 ] , 'bbb'
end
end
rescue StandardError
rescue StandardError
@ -2500,84 +2438,6 @@ class TestGoFZF < TestBase
tmux . until { | lines | assert_equal 10 , lines . match_count }
tmux . until { | lines | assert_equal 10 , lines . match_count }
end
end
def test_reload_disabled_case1
tmux . send_keys " seq 100 | #{ FZF } --query 99 --bind 'space:disable-search+reload(sleep 2; seq 1000)' " , :Enter
tmux . until do | lines |
assert_equal 100 , lines . item_count
assert_equal 1 , lines . match_count
end
tmux . send_keys :Space
tmux . until { | lines | assert_equal 1 , lines . match_count }
tmux . send_keys :BSpace
tmux . until { | lines | assert_equal 0 , lines . match_count }
tmux . until { | lines | assert_equal 1000 , lines . match_count }
end
def test_reload_disabled_case2
tmux . send_keys " seq 100 | #{ FZF } --query 99 --bind 'space:disable-search+reload-sync(sleep 2; seq 1000)' " , :Enter
tmux . until do | lines |
assert_equal 100 , lines . item_count
assert_equal 1 , lines . match_count
end
tmux . send_keys :Space
tmux . until { | lines | assert_equal 1 , lines . match_count }
tmux . send_keys :BSpace
tmux . until { | lines | assert_equal 1 , lines . match_count }
tmux . until { | lines | assert_equal 1000 , lines . match_count }
end
def test_reload_disabled_case3
tmux . send_keys " seq 100 | #{ FZF } --query 99 --bind 'space:disable-search+reload(sleep 2; seq 1000)+backward-delete-char' " , :Enter
tmux . until do | lines |
assert_equal 100 , lines . item_count
assert_equal 1 , lines . match_count
end
tmux . send_keys :Space
tmux . until { | lines | assert_equal 1 , lines . match_count }
tmux . send_keys :BSpace
tmux . until { | lines | assert_equal 0 , lines . match_count }
tmux . until { | lines | assert_equal 1000 , lines . match_count }
end
def test_reload_disabled_case4
tmux . send_keys " seq 100 | #{ FZF } --query 99 --bind 'space:disable-search+reload-sync(sleep 2; seq 1000)+backward-delete-char' " , :Enter
tmux . until do | lines |
assert_equal 100 , lines . item_count
assert_equal 1 , lines . match_count
end
tmux . send_keys :Space
tmux . until { | lines | assert_equal 1 , lines . match_count }
tmux . send_keys :BSpace
tmux . until { | lines | assert_equal 1 , lines . match_count }
tmux . until { | lines | assert_equal 1000 , lines . match_count }
end
def test_reload_disabled_case5
tmux . send_keys " seq 100 | #{ FZF } --query 99 --bind 'space:disable-search+reload(echo xx; sleep 2; seq 1000)' " , :Enter
tmux . until do | lines |
assert_equal 100 , lines . item_count
assert_equal 1 , lines . match_count
end
tmux . send_keys :Space
tmux . until do | lines |
assert_equal 1 , lines . item_count
assert_equal 1 , lines . match_count
end
tmux . send_keys :BSpace
tmux . until { | lines | assert_equal 1001 , lines . match_count }
end
def test_reload_disabled_case6
tmux . send_keys " seq 1000 | #{ FZF } --disabled --bind 'change:reload:sleep 0.5; seq {q}' " , :Enter
tmux . until { | lines | assert_equal 1000 , lines . match_count }
tmux . send_keys '9'
tmux . until { | lines | assert_equal 9 , lines . match_count }
tmux . send_keys '9'
tmux . until { | lines | assert_equal 99 , lines . match_count }
# TODO: How do we verify if an intermediate empty list is not shown?
end
def test_scroll_off
def test_scroll_off
tmux . send_keys " seq 1000 | #{ FZF } --scroll-off=3 --bind l:last " , :Enter
tmux . send_keys " seq 1000 | #{ FZF } --scroll-off=3 --bind l:last " , :Enter
tmux . until { | lines | assert_equal 1000 , lines . item_count }
tmux . until { | lines | assert_equal 1000 , lines . item_count }
@ -2693,17 +2553,9 @@ class TestGoFZF < TestBase
end
end
end
end
def test_change_preview_window_should_not_reset_change_preview
tmux . send_keys " #{ FZF } --preview-window up,border-none --bind 'start:change-preview(echo hello)' --bind 'enter:change-preview-window(border-left)' " , :Enter
tmux . until { | lines | assert_includes lines , 'hello' }
tmux . send_keys :Enter
tmux . until { | lines | assert_includes lines , '│ hello' }
end
def test_change_preview_window_rotate
def test_change_preview_window_rotate
tmux . send_keys " seq 100 | #{ FZF } --preview-window left,border-none --preview 'echo hello' --bind ' " \
tmux . send_keys " seq 100 | #{ FZF } --preview-window left,border-none --preview 'echo hello' --bind ' " \
" a:change-preview-window(right|down|up|hidden|)' " , :Enter
" a:change-preview-window(right|down|up|hidden|)' " , :Enter
tmux . until { | lines | assert ( lines . any? { _1 . include? ( '100/100' ) } ) }
3 . times do
3 . times do
tmux . until { | lines | lines [ 0 ] . start_with? ( 'hello' ) }
tmux . until { | lines | lines [ 0 ] . start_with? ( 'hello' ) }
tmux . send_keys 'a'
tmux . send_keys 'a'
@ -2764,7 +2616,7 @@ class TestGoFZF < TestBase
end
end
def test_height_range_fit
def test_height_range_fit
tmux . send_keys 'seq 3 | fzf --height ~100% --info=inline --border rounded ', :Enter
tmux . send_keys 'seq 3 | fzf --height ~100% --info=inline --border ', :Enter
expected = << ~ OUTPUT
expected = << ~ OUTPUT
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
│ 3
│ 3
@ -2777,7 +2629,7 @@ class TestGoFZF < TestBase
end
end
def test_height_range_fit_preview_above
def test_height_range_fit_preview_above
tmux . send_keys 'seq 3 | fzf --height ~100% --info=inline --border rounded --preview-window border-rounded --preview "seq {}" --preview-window up,60%', :Enter
tmux . send_keys 'seq 3 | fzf --height ~100% --info=inline --border --preview "seq {}" --preview-window up,60%', :Enter
expected = << ~ OUTPUT
expected = << ~ OUTPUT
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
│ ╭ ─ ─ ─ ─ ─ ─ ─ ─
│ ╭ ─ ─ ─ ─ ─ ─ ─ ─
@ -2833,7 +2685,7 @@ class TestGoFZF < TestBase
end
end
def test_height_range_overflow
def test_height_range_overflow
tmux . send_keys 'seq 100 | fzf --height ~5 --info=inline --border rounded ', :Enter
tmux . send_keys 'seq 100 | fzf --height ~5 --info=inline --border ', :Enter
expected = << ~ OUTPUT
expected = << ~ OUTPUT
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
│ 2
│ 2
@ -2898,7 +2750,7 @@ class TestGoFZF < TestBase
end
end
def test_labels_left
def test_labels_left
tmux . send_keys ': | fzf --border rounded --preview-window border-rounded --border-label foobar --border-label-pos 2 --preview : --preview-label barfoo --preview-label-pos 2', :Enter
tmux . send_keys ': | fzf --border --border-label foobar --border-label-pos 2 --preview : --preview-label barfoo --preview-label-pos 2', :Enter
tmux . until do
tmux . until do
assert_includes ( _1 [ 0 ] , '╭foobar─' )
assert_includes ( _1 [ 0 ] , '╭foobar─' )
assert_includes ( _1 [ 1 ] , '╭barfoo─' )
assert_includes ( _1 [ 1 ] , '╭barfoo─' )
@ -2906,7 +2758,7 @@ class TestGoFZF < TestBase
end
end
def test_labels_right
def test_labels_right
tmux . send_keys ': | fzf --border rounded --preview-window border-rounded --border-label foobar --border-label-pos -2 --preview : --preview-label barfoo --preview-label-pos -2', :Enter
tmux . send_keys ': | fzf --border --border-label foobar --border-label-pos -2 --preview : --preview-label barfoo --preview-label-pos -2', :Enter
tmux . until do
tmux . until do
assert_includes ( _1 [ 0 ] , '─foobar╮' )
assert_includes ( _1 [ 0 ] , '─foobar╮' )
assert_includes ( _1 [ 1 ] , '─barfoo╮' )
assert_includes ( _1 [ 1 ] , '─barfoo╮' )
@ -2914,34 +2766,13 @@ class TestGoFZF < TestBase
end
end
def test_labels_bottom
def test_labels_bottom
tmux . send_keys ': | fzf --border rounded --preview-window border-rounded --border-label foobar --border-label-pos 2:bottom --preview : --preview-label barfoo --preview-label-pos -2:bottom', :Enter
tmux . send_keys ': | fzf --border --border-label foobar --border-label-pos 2:bottom --preview : --preview-label barfoo --preview-label-pos -2:bottom', :Enter
tmux . until do
tmux . until do
assert_includes ( _1 [ - 1 ] , '╰foobar─' )
assert_includes ( _1 [ - 1 ] , '╰foobar─' )
assert_includes ( _1 [ - 2 ] , '─barfoo╯' )
assert_includes ( _1 [ - 2 ] , '─barfoo╯' )
end
end
end
end
def test_labels_variables
tmux . send_keys ': | fzf --border --border-label foobar --preview "echo \$FZF_BORDER_LABEL // \$FZF_PREVIEW_LABEL" --preview-label barfoo --bind "space:change-border-label(barbaz)+change-preview-label(bazbar)+refresh-preview,enter:transform-border-label(echo 123)+transform-preview-label(echo 456)+refresh-preview"' , :Enter
tmux . until do
assert_includes ( _1 [ 0 ] , '─foobar─' )
assert_includes ( _1 [ 1 ] , '─barfoo─' )
assert_includes ( _1 [ 2 ] , ' foobar // barfoo ' )
end
tmux . send_keys :Space
tmux . until do
assert_includes ( _1 [ 0 ] , '─barbaz─' )
assert_includes ( _1 [ 1 ] , '─bazbar─' )
assert_includes ( _1 [ 2 ] , ' barbaz // bazbar ' )
end
tmux . send_keys :Enter
tmux . until do
assert_includes ( _1 [ 0 ] , '─123─' )
assert_includes ( _1 [ 1 ] , '─456─' )
assert_includes ( _1 [ 2 ] , ' 123 // 456 ' )
end
end
def test_info_separator_unicode
def test_info_separator_unicode
tmux . send_keys 'seq 100 | fzf -q55' , :Enter
tmux . send_keys 'seq 100 | fzf -q55' , :Enter
tmux . until { assert_includes ( _1 [ - 2 ] , ' 1/100 ─' ) }
tmux . until { assert_includes ( _1 [ - 2 ] , ' 1/100 ─' ) }
@ -2977,13 +2808,6 @@ class TestGoFZF < TestBase
tmux . until { assert_match ( %r{ [⠋⠙⠹⠸⠼⠴⠦⠧⠇⠏] 100/100 } , _1 [ - 1 ] ) }
tmux . until { assert_match ( %r{ [⠋⠙⠹⠸⠼⠴⠦⠧⠇⠏] 100/100 } , _1 [ - 1 ] ) }
end
end
def test_info_inline_right_clearance
tmux . send_keys " seq 100000 | #{ FZF } --info inline-right " , :Enter
tmux . until { assert_match ( %r{ 100000/100000 } , _1 [ - 1 ] ) }
tmux . send_keys 'x'
tmux . until { assert_match ( %r{ 0/100000 } , _1 [ - 1 ] ) }
end
def test_prev_next_selected
def test_prev_next_selected
tmux . send_keys 'seq 10 | fzf --multi --bind ctrl-n:next-selected,ctrl-p:prev-selected' , :Enter
tmux . send_keys 'seq 10 | fzf --multi --bind ctrl-n:next-selected,ctrl-p:prev-selected' , :Enter
tmux . until { | lines | assert_equal 10 , lines . item_count }
tmux . until { | lines | assert_equal 10 , lines . item_count }
@ -3071,7 +2895,7 @@ class TestGoFZF < TestBase
end
end
def test_no_extra_newline_issue_3209
def test_no_extra_newline_issue_3209
tmux . send_keys ( %( seq 100 | #{ FZF } --height 10 --preview-window up,wrap ,border-rounded --preview 'printf "─%.0s" $( seq 1 "$ ( ( FZF_PREVIEW_COLUMNS - 5 ) ) " ) ; printf $" \\ e[7m%s \\ e[0m" title; echo; echo something' ) , :Enter )
tmux . send_keys ( %( seq 100 | #{ FZF } --height 10 --preview-window up,wrap --preview 'printf "─%.0s" $( seq 1 "$ ( ( FZF_PREVIEW_COLUMNS - 5 ) ) " ) ; printf $" \\ e[7m%s \\ e[0m" title; echo; echo something' ) , :Enter )
expected = << ~ OUTPUT
expected = << ~ OUTPUT
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
╭ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
│ ─ ─ ─ ─ ─ ─ ─ ─ ─
│ ─ ─ ─ ─ ─ ─ ─ ─ ─
@ -3152,7 +2976,7 @@ class TestGoFZF < TestBase
end
end
tmux . send_keys :t
tmux . send_keys :t
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ - 2 ] , '+ t '
assert_includes lines [ - 2 ] , '+ T '
end
end
tmux . send_keys :BSpace
tmux . send_keys :BSpace
tmux . until do | lines |
tmux . until do | lines |
@ -3164,7 +2988,7 @@ class TestGoFZF < TestBase
tmux . send_keys '4'
tmux . send_keys '4'
tmux . until do | lines |
tmux . until do | lines |
assert_equal 28 , lines . match_count
assert_equal 28 , lines . match_count
refute_includes lines [ - 2 ] , '+ t '
refute_includes lines [ - 2 ] , '+ T '
end
end
tmux . send_keys :BSpace
tmux . send_keys :BSpace
tmux . until do | lines |
tmux . until do | lines |
@ -3173,11 +2997,11 @@ class TestGoFZF < TestBase
end
end
tmux . send_keys :t
tmux . send_keys :t
tmux . until do | lines |
tmux . until do | lines |
assert_includes lines [ - 2 ] , '+ t '
assert_includes lines [ - 2 ] , '+ T '
end
end
tmux . send_keys :Up
tmux . send_keys :Up
tmux . until do | lines |
tmux . until do | lines |
refute_includes lines [ - 2 ] , '+ t '
refute_includes lines [ - 2 ] , '+ T '
end
end
end
end
@ -3232,11 +3056,6 @@ class TestGoFZF < TestBase
end
end
def test_delete_with_modifiers
def test_delete_with_modifiers
if ENV [ 'GITHUB_ACTION' ]
# Expected: "[3]"
# Actual: "[]3;5~"
skip ( 'CTRL-DELETE is not properly handled in GitHub Actions environment' )
end
tmux . send_keys " seq 100 | #{ FZF } --bind 'ctrl-delete:up+up,shift-delete:down,focus:transform-prompt:echo [{}]' " , :Enter
tmux . send_keys " seq 100 | #{ FZF } --bind 'ctrl-delete:up+up,shift-delete:down,focus:transform-prompt:echo [{}]' " , :Enter
tmux . until { | lines | assert_equal 100 , lines . item_count }
tmux . until { | lines | assert_equal 100 , lines . item_count }
tmux . send_keys 'C-Delete'
tmux . send_keys 'C-Delete'
@ -3264,17 +3083,6 @@ class TestGoFZF < TestBase
tmux . send_keys :Up
tmux . send_keys :Up
tmux . until { | lines | assert_includes lines , '> 2' }
tmux . until { | lines | assert_includes lines , '> 2' }
end
end
def test_fzf_pos
tmux . send_keys " seq 100 | #{ FZF } --preview 'echo $FZF_POS / $FZF_MATCH_COUNT' " , :Enter
tmux . until { | lines | assert ( lines . any? { | line | line . include? ( '1 / 100' ) } ) }
tmux . send_keys :Up
tmux . until { | lines | assert ( lines . any? { | line | line . include? ( '2 / 100' ) } ) }
tmux . send_keys '99'
tmux . until { | lines | assert ( lines . any? { | line | line . include? ( '1 / 1' ) } ) }
tmux . send_keys '99'
tmux . until { | lines | assert ( lines . any? { | line | line . include? ( '0 / 0' ) } ) }
end
end end
module TestShell module TestShell
@ -3468,10 +3276,7 @@ module CompletionTest
tmux . send_keys 'cat /tmp/fzf\ test/**' , :Tab
tmux . send_keys 'cat /tmp/fzf\ test/**' , :Tab
tmux . until { | lines | assert_operator lines . match_count , :> , 0 }
tmux . until { | lines | assert_operator lines . match_count , :> , 0 }
tmux . send_keys 'foobar$'
tmux . send_keys 'foobar$'
tmux . until do | lines |
tmux . until { | lines | assert_equal 1 , lines . match_count }
assert_equal 1 , lines . match_count
assert lines . any_include? ( '> /tmp/fzf test/foobar' )
end
tmux . send_keys :Enter
tmux . send_keys :Enter
tmux . until ( true ) { | lines | assert_equal 'cat /tmp/fzf\ test/foobar' , lines [ - 1 ] }
tmux . until ( true ) { | lines | assert_equal 'cat /tmp/fzf\ test/foobar' , lines [ - 1 ] }
@ -3506,11 +3311,7 @@ module CompletionTest
tmux . until { | lines | assert_operator lines . match_count , :> , 0 }
tmux . until { | lines | assert_operator lines . match_count , :> , 0 }
tmux . send_keys :Tab , :Tab # Tab does not work here
tmux . send_keys :Tab , :Tab # Tab does not work here
tmux . send_keys 55
tmux . send_keys 55
tmux . until do | lines |
tmux . until { | lines | assert_equal 1 , lines . match_count }
assert_equal 1 , lines . match_count
assert_includes lines , '> 55'
assert_includes lines , '> /tmp/fzf-test/d55'
end
tmux . send_keys :Enter
tmux . send_keys :Enter
tmux . until ( true ) { | lines | assert_equal 'cd /tmp/fzf-test/d55/' , lines [ - 1 ] }
tmux . until ( true ) { | lines | assert_equal 'cd /tmp/fzf-test/d55/' , lines [ - 1 ] }
tmux . send_keys :xx
tmux . send_keys :xx