From be5c17612a6996615fb4f38a4b373b577273c079 Mon Sep 17 00:00:00 2001
From: Junegunn Choi <junegunn.c@gmail.com>
Date: Sat, 17 Jan 2015 12:21:38 +0900
Subject: [PATCH] Add basic test case for --reverse

---
 test/test_go.rb | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/test/test_go.rb b/test/test_go.rb
index 0b39ea8..fd04efc 100644
--- a/test/test_go.rb
+++ b/test/test_go.rb
@@ -224,9 +224,26 @@ class TestGoFZF < MiniTest::Unit::TestCase
         tmux.send_keys '^', '3'
         tmux.until { |lines| lines[-2].include?('1/2') }
         tmux.send_keys :Enter
+        tmux.send_keys 'echo -n done', :Enter
+        tmux.until { |lines| lines[-1].include?('done') }
         assert_equal ['  1st 2nd 3rd/'], File.read(tempname).split($/)
       end
     end
   end
+
+  def test_scroll
+    [true, false].each do |rev|
+      tmux.send_keys "seq 1 100 | fzf #{'--reverse' if rev} > #{tempname}", :Enter
+      tmux.until { |lines| rev ? lines.first == '>' : lines.last == '>' }
+
+      110.times do
+        tmux.send_keys rev ? :Down : :Up
+      end
+      tmux.send_keys :Enter
+      tmux.send_keys 'echo -n done', :Enter
+      tmux.until { |lines| lines[-1].include?('done') }
+      assert_equal '100', File.read(tempname).chomp
+    end
+  end
 end