tty-prompt 0.18.1 → 0.19.0

data/spec/unit/paginator_spec.rb

@@ -23,9 +23,9 @@ RSpec.describe TTY::Prompt::Paginator, '#paginate' do
 
     expect(paginator.paginate(list, 1).to_a).to eq([['a',0], ['b',1], ['c',2]])
     expect(paginator.paginate(list, 2).to_a).to eq([['a',0], ['b',1], ['c',2]])
-    expect(paginator.paginate(list, 3).to_a).to eq([['a',0], ['b',1], ['c',2]])
-    expect(paginator.paginate(list, 4).to_a).to eq([['b',1], ['c',2], ['d',3]])
-    expect(paginator.paginate(list, 5).to_a).to eq([['c',2], ['d',3], ['e',4]])
+    expect(paginator.paginate(list, 3).to_a).to eq([['b',1], ['c',2], ['d',3]])
+    expect(paginator.paginate(list, 4).to_a).to eq([['c',2], ['d',3], ['e',4]])
+    expect(paginator.paginate(list, 5).to_a).to eq([['d',3], ['e',4], ['f',5]])
     expect(paginator.paginate(list, 6).to_a).to eq([['d',3], ['e',4], ['f',5]])
     expect(paginator.paginate(list, 7).to_a).to eq([['d',3], ['e',4], ['f',5]])
   end
@@ -36,22 +36,41 @@ RSpec.describe TTY::Prompt::Paginator, '#paginate' do
 
     expect(paginator.paginate(list, 1).to_a).to eq([['a',0], ['b',1], ['c',2]])
     expect(paginator.paginate(list, 2).to_a).to eq([['a',0], ['b',1], ['c',2]])
-    expect(paginator.paginate(list, 3).to_a).to eq([['a',0], ['b',1], ['c',2]])
-    expect(paginator.paginate(list, 4).to_a).to eq([['b',1], ['c',2], ['d',3]])
-    expect(paginator.paginate(list, 5).to_a).to eq([['c',2], ['d',3], ['e',4]])
-    expect(paginator.paginate(list, 6).to_a).to eq([['d',3], ['e',4], ['f',5]])
+    expect(paginator.paginate(list, 3).to_a).to eq([['b',1], ['c',2], ['d',3]])
+    expect(paginator.paginate(list, 4).to_a).to eq([['c',2], ['d',3], ['e',4]])
+    expect(paginator.paginate(list, 5).to_a).to eq([['d',3], ['e',4], ['f',5]])
+    expect(paginator.paginate(list, 6).to_a).to eq([['e',4], ['f',5], ['g',6]])
     expect(paginator.paginate(list, 7).to_a).to eq([['e',4], ['f',5], ['g',6]])
     expect(paginator.paginate(list, 8).to_a).to eq([['e',4], ['f',5], ['g',6]])
   end
 
-  it "finds maximum index for current selection" do
+  it "finds both start and end index for current selection" do
     list = %w(a b c d e f g)
     paginator = described_class.new({per_page: 3, default: 0})
 
+    paginator.paginate(list, 2)
+    expect(paginator.start_index).to eq(0)
+    expect(paginator.end_index).to eq(2)
+
+    paginator.paginate(list, 3)
+    expect(paginator.start_index).to eq(1)
+    expect(paginator.end_index).to eq(3)
+
     paginator.paginate(list, 4)
-    expect(paginator.max_index).to eq(3)
+    expect(paginator.start_index).to eq(2)
+    expect(paginator.end_index).to eq(4)
+
     paginator.paginate(list, 5)
-    expect(paginator.max_index).to eq(4)
+    expect(paginator.start_index).to eq(3)
+    expect(paginator.end_index).to eq(5)
+
+    paginator.paginate(list, 7)
+    expect(paginator.start_index).to eq(4)
+    expect(paginator.end_index).to eq(6)
+
+    paginator.paginate(list, 8)
+    expect(paginator.start_index).to eq(4)
+    expect(paginator.end_index).to eq(6)
   end
 
   it "starts with default selection" do

data/spec/unit/select_spec.rb

@@ -5,6 +5,8 @@ RSpec.describe TTY::Prompt, '#select' do
   subject(:prompt) { TTY::TestPrompt.new }
 
   let(:symbols) { TTY::Prompt::Symbols.symbols }
+  let(:up_down) { "#{symbols[:arrow_up]}/#{symbols[:arrow_down]}" }
+  let(:left_right) { "#{symbols[:arrow_left]}/#{symbols[:arrow_right]}"}
 
   def output_helper(prompt, choices, active, options = {})
     raise ":init requires :hint" if options[:init] && options[:hint].nil?
@@ -24,7 +26,7 @@ RSpec.describe TTY::Prompt, '#select' do
       if disabled
         "\e[31m#{symbols[:cross]}\e[0m #{num}#{name} #{disabled}"
       elsif name == active
-        "\e[32m#{symbols[:pointer]} #{num}#{name}\e[0m"
+        "\e[32m#{symbols[:marker]} #{num}#{name}\e[0m"
       else
         "  #{num}#{name}"
       end
@@ -49,8 +51,8 @@ RSpec.describe TTY::Prompt, '#select' do
 
     expect(prompt.select('What size?', choices)).to eq(:Large)
     expected_output = [
-      "\e[?25lWhat size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m#{symbols[:marker]} Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -70,15 +72,15 @@ RSpec.describe TTY::Prompt, '#select' do
     end
     expect { prompt.select('What size?', choices) }.not_to output.to_stderr
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m#{symbols[:marker]} Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
       "\e[2K\e[1G",
       "What size? \n",
       "  Large\n",
-      "\e[32m#{symbols[:pointer]} Medium\e[0m\n",
+      "\e[32m#{symbols[:marker]} Medium\e[0m\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
       "\e[2K\e[1G",
@@ -92,8 +94,8 @@ RSpec.describe TTY::Prompt, '#select' do
     prompt.input.rewind
     expect(prompt.select('What size?', choices, default: 1)).to eq(1)
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} large\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m#{symbols[:marker]} large\e[0m\n",
       "  medium\n",
       "  small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -106,14 +108,16 @@ RSpec.describe TTY::Prompt, '#select' do
     prompt.input << " "
     prompt.input.rewind
     value = prompt.select('What size?') do |menu|
+              menu.symbols marker: '>'
+
               menu.choice "Large"
               menu.choice "Medium"
               menu.choice "Small"
             end
     expect(value).to eq('Large')
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m> Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -123,6 +127,7 @@ RSpec.describe TTY::Prompt, '#select' do
   end
 
   it "sets choice name & value through DSL" do
+    prompt = TTY::TestPrompt.new(symbols: {marker: '>'})
     prompt.input << " "
     prompt.input.rewind
     value = prompt.select('What size?') do |menu|
@@ -132,8 +137,8 @@ RSpec.describe TTY::Prompt, '#select' do
             end
     expect(value).to eq(1)
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} large\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m> large\e[0m\n",
       "  medium\n",
       "  small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -151,8 +156,8 @@ RSpec.describe TTY::Prompt, '#select' do
             end
     expect(value).to eq('Large')
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m#{symbols[:marker]} Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -174,9 +179,9 @@ RSpec.describe TTY::Prompt, '#select' do
             end
     expect(value).to eq(2)
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow or number (1-3) keys, press Enter to select)\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow or number (1-3) keys, press Enter to select)\e[0m\n",
       "  1. large\n",
-      "\e[32m#{symbols[:pointer]} 2. medium\e[0m\n",
+      "\e[32m#{symbols[:marker]} 2. medium\e[0m\n",
       "  3. small",
       "\e[2K\e[1G\e[1A" * 3,
       "\e[2K\e[1G",
@@ -192,11 +197,12 @@ RSpec.describe TTY::Prompt, '#select' do
               menu.choice :medium do 'Good choice!' end
               menu.choice :small, 3
             end
+
     expect(value).to eq('Good choice!')
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow or number (1-3) keys, press Enter to select)\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow or number (1-3) keys, press Enter to select)\e[0m\n",
       "  1) large\n",
-      "\e[32m#{symbols[:pointer]} 2) medium\e[0m\n",
+      "\e[32m#{symbols[:marker]} 2) medium\e[0m\n",
       "  3) small",
       "\e[2K\e[1G\e[1A" * 3,
       "\e[2K\e[1G",
@@ -210,9 +216,9 @@ RSpec.describe TTY::Prompt, '#select' do
     prompt.input.rewind
     expect(prompt.select('What size?', choices, default: 2, enum: '.')).to eq('Medium')
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[90m(Use arrow or number (1-3) keys, press Enter to select)\e[0m\n",
+      "\e[?25lWhat size? \e[90m(Use #{up_down} arrow or number (1-3) keys, press Enter to select)\e[0m\n",
       "  1. Large\n",
-      "\e[32m#{symbols[:pointer]} 2. Medium\e[0m\n",
+      "\e[32m#{symbols[:marker]} 2. Medium\e[0m\n",
       "  3. Small",
       "\e[2K\e[1G\e[1A" * 3,
       "\e[2K\e[1G",
@@ -222,13 +228,16 @@ RSpec.describe TTY::Prompt, '#select' do
 
   it "changes selected item color & marker" do
     choices = %w(Large Medium Small)
+    prompt = TTY::TestPrompt.new(symbols: {marker: '>'})
     prompt.input << " "
     prompt.input.rewind
-    options = {active_color: :blue, help_color: :red, marker: '>'}
+    options = {active_color: :blue, help_color: :red, symbols: {marker: '>' }}
+
     value = prompt.select('What size?', choices, options)
+
     expect(value).to eq('Large')
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat size? \e[31m(Use arrow keys, press Enter to select)\e[0m\n",
+      "\e[?25lWhat size? \e[31m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
       "\e[34m> Large\e[0m\n",
       "  Medium\n",
       "  Small",
@@ -246,7 +255,7 @@ RSpec.describe TTY::Prompt, '#select' do
     expect(value).to eq('Large')
     expect(prompt.output.string).to eq([
       "\e[?25lWhat size? \e[90m(Bash keyboard)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[32m#{symbols[:marker]} Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -266,7 +275,7 @@ RSpec.describe TTY::Prompt, '#select' do
     expect(value).to eq('Large')
     expect(prompt.output.string).to eq([
       "\e[?25lWhat size? \e[90m(Bash keyboard)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[32m#{symbols[:marker]} Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -282,8 +291,8 @@ RSpec.describe TTY::Prompt, '#select' do
     prompt.input.rewind
     expect(prompt.select('What size?', choices)).to eq('Large')
     expect(prompt.output.string).to eq([
-      "\e[?25l[?] What size? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} Large\e[0m\n",
+      "\e[?25l[?] What size? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m#{symbols[:marker]} Large\e[0m\n",
       "  Medium\n",
       "  Small",
       "\e[2K\e[1G\e[1A" * 3,
@@ -292,66 +301,258 @@ RSpec.describe TTY::Prompt, '#select' do
     ].join)
   end
 
-  it "paginates long selections" do
-    choices = %w(A B C D E F G H)
-    prompt.input << "\r"
-    prompt.input.rewind
-    value = prompt.select("What letter?", choices, per_page: 3, default: 4)
-    expect(value).to eq('D')
-    expect(prompt.output.string).to eq([
-      "\e[?25lWhat letter? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} D\e[0m\n",
-      "  E\n",
-      "  F\n",
-      "\e[90m(Move up or down to reveal more choices)\e[0m",
-      "\e[2K\e[1G\e[1A" * 4,
-      "\e[2K\e[1G",
-      "What letter? \e[32mD\e[0m\n\e[?25h",
-    ].join)
-  end
+  context "when paginated" do
+    it "paginates long selections" do
+      choices = %w(A B C D E F G H)
+      prompt.input << "\r"
+      prompt.input.rewind
 
-  it "paginates choices as hash object" do
-    prompt = TTY::TestPrompt.new
-    choices = {A: 1, B: 2, C: 3, D: 4, E: 5, F: 6, G: 7, H: 8}
-    prompt.input << "\r"
-    prompt.input.rewind
-    value = prompt.select("What letter?", choices, per_page: 3, default: 4)
-    expect(value).to eq(4)
-    expect(prompt.output.string).to eq([
-      "\e[?25lWhat letter? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} D\e[0m\n",
-      "  E\n",
-      "  F\n",
-      "\e[90m(Move up or down to reveal more choices)\e[0m",
-      "\e[2K\e[1G\e[1A" * 4,
-      "\e[2K\e[1G",
-      "What letter? \e[32mD\e[0m\n\e[?25h",
-    ].join)
-  end
+      answer = prompt.select("What letter?", choices, per_page: 3, default: 4)
 
-  it "paginates long selections through DSL" do
-    prompt = TTY::TestPrompt.new
-    choices = %w(A B C D E F G H)
-    prompt.input << "\r"
-    prompt.input.rewind
-    value = prompt.select("What letter?") do |menu|
-              menu.per_page 3
-              menu.page_help '(Wiggle thy finger up or down to see more)'
-              menu.default 4
+      expect(answer).to eq('D')
+      expected_output = [
+        "\e[?25lWhat letter? \e[90m(Use #{up_down} and #{left_right} arrow keys, press Enter to select)\e[0m\n",
+        "\e[32m#{symbols[:marker]} D\e[0m\n",
+        "  E\n",
+        "  F",
+        "\e[2K\e[1G\e[1A" * 3,
+        "\e[2K\e[1G",
+        "What letter? \e[32mD\e[0m\n\e[?25h",
+      ].join
 
-              menu.choices choices
-            end
-    expect(value).to eq('D')
-    expect(prompt.output.string).to eq([
-      "\e[?25lWhat letter? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} D\e[0m\n",
-      "  E\n",
-      "  F\n",
-      "\e[90m(Wiggle thy finger up or down to see more)\e[0m",
-      "\e[2K\e[1G\e[1A" * 4,
-      "\e[2K\e[1G",
-      "What letter? \e[32mD\e[0m\n\e[?25h",
-    ].join)
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "paginates choices as hash object" do
+      prompt = TTY::TestPrompt.new
+      choices = {A: 1, B: 2, C: 3, D: 4, E: 5, F: 6, G: 7, H: 8}
+      prompt.input << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What letter?", choices, per_page: 3, default: 4)
+
+      expect(answer).to eq(4)
+      expected_output = [
+        "\e[?25lWhat letter? \e[90m(Use #{up_down} and #{left_right} arrow keys, press Enter to select)\e[0m\n",
+        "\e[32m#{symbols[:marker]} D\e[0m\n",
+        "  E\n",
+        "  F",
+        "\e[2K\e[1G\e[1A" * 3,
+        "\e[2K\e[1G",
+        "What letter? \e[32mD\e[0m\n\e[?25h",
+      ].join
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "paginates long selections through DSL" do
+      prompt = TTY::TestPrompt.new
+      choices = %w(A B C D E F G H)
+      prompt.input << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What letter?") do |menu|
+                menu.per_page 3
+                menu.default 4
+
+                menu.choices choices
+              end
+
+      expect(answer).to eq('D')
+
+
+      expected_output = [
+        "\e[?25lWhat letter? \e[90m(Use #{up_down} and #{left_right} arrow keys, press Enter to select)\e[0m\n",
+        "\e[32m#{symbols[:marker]} D\e[0m\n",
+        "  E\n",
+        "  F",
+        "\e[2K\e[1G\e[1A" * 3,
+        "\e[2K\e[1G",
+        "What letter? \e[32mD\e[0m\n\e[?25h",
+      ].join
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "navigates evenly paged output with right arrow until end of selection" do
+      prompt = TTY::TestPrompt.new
+      choices = ('1'..'12').to_a
+      prompt.on(:keypress) { |e| prompt.trigger(:keyright) if e.value == "l" }
+      prompt.input << "l" << "l" << "l" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, per_page: 4)
+
+      expect(answer).to eq('9')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "1", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[4..7], "5"),
+        output_helper('What number?', choices[8..11], "9"),
+        output_helper('What number?', choices[8..11], "9"),
+        "What number? \e[32m9\e[0m\n\e[?25h",
+      ].join
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "navigates unevenly paged output with right arrow until the end of selection" do
+      prompt = TTY::TestPrompt.new
+      choices = ('1'..'10').to_a
+      prompt.on(:keypress) { |e| prompt.trigger(:keyright) if e.value == "l" }
+      prompt.input << "l" << "l" << "l" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, default: 4, per_page: 4)
+
+      expect(answer).to eq('10')
+
+      expected_output = [
+        output_helper('What number?', choices[3..6], "4", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[4..7], "8"),
+        output_helper('What number?', choices[8..9], "10"),
+        output_helper('What number?', choices[8..9], "10"),
+        "What number? \e[32m10\e[0m\n\e[?25h",
+      ].join
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "navigates left and right" do
+      prompt = TTY::TestPrompt.new
+      choices = ('1'..'10').to_a
+      prompt.on(:keypress) { |e|
+        prompt.trigger(:keyright) if e.value == "l"
+        prompt.trigger(:keyleft) if e.value == "h"
+      }
+      prompt.input << "l" << "l" << "h" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, default: 2, per_page: 4)
+
+      expect(answer).to eq('6')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "2", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[4..7], "6"),
+        output_helper('What number?', choices[8..9], "10"),
+        output_helper('What number?', choices[4..7], "6"),
+        "What number? \e[32m6\e[0m\n\e[?25h",
+      ].join
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "combines up/down navigation with left/right" do
+      prompt = TTY::TestPrompt.new
+      choices = ('1'..'11').to_a
+      prompt.on(:keypress) { |e|
+        prompt.trigger(:keyup)    if e.value == "k"
+        prompt.trigger(:keydown)  if e.value == "j"
+        prompt.trigger(:keyright) if e.value == "l"
+        prompt.trigger(:keyleft)  if e.value == "h"
+      }
+      prompt.input << "j" << "l" << "k" << "k" << "h" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, default: 2, per_page: 4)
+
+      expect(answer).to eq('1')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "2", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[0..3], "3"),
+        output_helper('What number?', choices[4..7], "7"),
+        output_helper('What number?', choices[4..7], "6"),
+        output_helper('What number?', choices[3..6], "5"),
+        output_helper('What number?', choices[0..3], "1"),
+        "What number? \e[32m1\e[0m\n\e[?25h"
+      ].join
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "navigates pages up/down with disabled items" do
+      prompt = TTY::TestPrompt.new
+      prompt.on(:keypress) { |e|
+        prompt.trigger(:keyup)    if e.value == "k"
+        prompt.trigger(:keydown)  if e.value == "j"
+      }
+      choices = [
+        '1',
+        {name: '2', disabled: 'out'},
+        '3',
+        {name: '4', disabled: 'out'},
+        '5',
+        {name: '6', disabled: 'out'},
+        {name: '7', disabled: 'out'},
+        '8',
+        '9',
+        {name: '10', disabled: 'out'},
+      ]
+
+      prompt.input << "j" << "j" << "j" << "j" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, per_page: 4)
+
+      expect(answer).to eq('9')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "1", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[0..3], "3"),
+        output_helper('What number?', choices[2..5], "5"),
+        output_helper('What number?', choices[5..8], "8"),
+        output_helper('What number?', choices[6..9], "9"),
+        "What number? \e[32m9\e[0m\n\e[?25h"
+      ].join('')
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "navigates pages left/right with disabled items" do
+      prompt = TTY::TestPrompt.new
+      prompt.on(:keypress) { |e|
+        prompt.trigger(:keyright) if e.value == "l"
+        prompt.trigger(:keyleft)  if e.value == "h"
+      }
+      choices = [
+        {name: '1', disabled: 'out'},
+        '2',
+        {name: '3', disabled: 'out'},
+        '4',
+        '5',
+        {name: '6', disabled: 'out'},
+        '7',
+        '8',
+        '9',
+        {name: '10', disabled: 'out'}
+      ]
+
+      prompt.input << "l" << "l" << "l" << "h" << "h" << "h" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, per_page: 4)
+
+      expect(answer).to eq('2')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "2", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[4..7], "7"),
+        output_helper('What number?', choices[8..9], "9"),
+        output_helper('What number?', choices[8..9], "9"),
+        output_helper('What number?', choices[4..7], "5"),
+        output_helper('What number?', choices[0..3], "2"),
+        output_helper('What number?', choices[0..3], "2"),
+        "What number? \e[32m2\e[0m\n\e[?25h"
+      ].join('')
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
   end
 
   context 'with :cycle option' do
@@ -361,15 +562,19 @@ RSpec.describe TTY::Prompt, '#select' do
       prompt.on(:keypress) { |e| prompt.trigger(:keydown) if e.value == "j" }
       prompt.input << "j" << "j" << "j" << "\r"
       prompt.input.rewind
+
       value = prompt.select("What letter?", choices)
+
       expect(value).to eq("C")
-      expect(prompt.output.string).to eq(
-        output_helper("What letter?", choices, "A", init: true, hint: "Use arrow keys, press Enter to select") +
-        output_helper("What letter?", choices, "B") +
-        output_helper("What letter?", choices, "C") +
-        output_helper("What letter?", choices, "C") +
+      expected_output = [
+        output_helper("What letter?", choices, "A", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select"),
+        output_helper("What letter?", choices, "B"),
+        output_helper("What letter?", choices, "C"),
+        output_helper("What letter?", choices, "C"),
         "What letter? \e[32mC\e[0m\n\e[?25h"
-      )
+      ].join
+      expect(prompt.output.string).to eq(expected_output)
     end
 
     it "cycles around when configured to do so" do
@@ -378,15 +583,19 @@ RSpec.describe TTY::Prompt, '#select' do
       prompt.on(:keypress) { |e| prompt.trigger(:keydown) if e.value == "j" }
       prompt.input << "j" << "j" << "j" << "\r"
       prompt.input.rewind
-      value = prompt.select("What letter?", choices, cycle: true)
-      expect(value).to eq("A")
-      expect(prompt.output.string).to eq(
-        output_helper("What letter?", choices, "A", init: true, hint: "Use arrow keys, press Enter to select") +
-        output_helper("What letter?", choices, "B") +
-        output_helper("What letter?", choices, "C") +
-        output_helper("What letter?", choices, "A") +
+
+      answer = prompt.select("What letter?", choices, cycle: true)
+
+      expect(answer).to eq("A")
+      expected_output = [
+        output_helper("What letter?", choices, "A", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select"),
+        output_helper("What letter?", choices, "B"),
+        output_helper("What letter?", choices, "C"),
+        output_helper("What letter?", choices, "A"),
         "What letter? \e[32mA\e[0m\n\e[?25h"
-      )
+      ].join
+      expect(prompt.output.string).to eq(expected_output)
     end
 
     it "cycles around disabled items" do
@@ -406,7 +615,7 @@ RSpec.describe TTY::Prompt, '#select' do
 
       expected_output =
         output_helper("What letter?", choices, "B", init: true,
-                       hint: "Use arrow keys, press Enter to select") +
+                       hint: "Use #{up_down} arrow keys, press Enter to select") +
         output_helper("What letter?", choices, "D") +
         output_helper("What letter?", choices, "B") +
         output_helper("What letter?", choices, "D") +
@@ -414,6 +623,74 @@ RSpec.describe TTY::Prompt, '#select' do
 
       expect(prompt.output.string).to eq(expected_output)
     end
+
+    it "cycles choices using left/right arrows" do
+      prompt = TTY::TestPrompt.new
+      choices = ('1'..'10').to_a
+      prompt.on(:keypress) { |e|
+        prompt.trigger(:keyright) if e.value == "l"
+        prompt.trigger(:keyleft) if e.value == "h"
+      }
+      prompt.input << "l" << "l" << "l" << "h" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, default: 2, per_page: 4, cycle: true)
+
+      expect(answer).to eq('10')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "2", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[4..7], "6"),
+        output_helper('What number?', choices[8..9], "10"),
+        output_helper('What number?', choices[0..3], "2"),
+        output_helper('What number?', choices[8..9], "10"),
+        "What number? \e[32m10\e[0m\n\e[?25h",
+      ].join
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
+
+    it "cycles pages left/right with disabled items" do
+      prompt = TTY::TestPrompt.new
+      prompt.on(:keypress) { |e|
+        prompt.trigger(:keyright) if e.value == "l"
+        prompt.trigger(:keyleft)  if e.value == "h"
+      }
+      choices = [
+        {name: '1', disabled: 'out'},
+        '2',
+        {name: '3', disabled: 'out'},
+        '4',
+        '5',
+        {name: '6', disabled: 'out'},
+        '7',
+        '8',
+        '9',
+        {name: '10', disabled: 'out'}
+      ]
+
+      prompt.input << "l" << "l" << "l" << "h" << "h" << "h" << "\r"
+      prompt.input.rewind
+
+      answer = prompt.select("What number?", choices, per_page: 4, cycle: true)
+
+      expect(answer).to eq('2')
+
+      expected_output = [
+        output_helper('What number?', choices[0..3], "2", init: true,
+          hint: "Use #{up_down} and #{left_right} arrow keys, press Enter to select"),
+        output_helper('What number?', choices[4..7], "7"),
+        output_helper('What number?', choices[8..9], "9"),
+        output_helper('What number?', choices[0..3], "2"),
+        output_helper('What number?', choices[8..9], "9"),
+        output_helper('What number?', choices[4..7], "5"),
+        output_helper('What number?', choices[0..3], "2"),
+        "What number? \e[32m2\e[0m\n\e[?25h"
+      ].join('')
+
+      expect(prompt.output.string).to eq(expected_output)
+    end
   end
 
   it "verifies default index format" do
@@ -436,8 +713,8 @@ RSpec.describe TTY::Prompt, '#select' do
     expect(value).to eq('A')
 
     expect(prompt.output.string).to eq([
-      "\e[?25lWhat letter? \e[90m(Use arrow keys, press Enter to select)\e[0m\n",
-      "\e[32m#{symbols[:pointer]} A\e[0m\n",
+      "\e[?25lWhat letter? \e[90m(Use #{up_down} arrow keys, press Enter to select)\e[0m\n",
+      "\e[32m#{symbols[:marker]} A\e[0m\n",
       "  B\n",
       "  C\n",
       "  D",
@@ -478,7 +755,8 @@ RSpec.describe TTY::Prompt, '#select' do
       actual_prompt_output = prompt.output.string
 
       expected_prompt_output =
-        output_helper("What size?", %w(Small Medium Large Huge), "Small", init: true, hint: "Use arrow keys, press Enter to select, and letter keys to filter") +
+        output_helper("What size?", %w(Small Medium Large Huge), "Small", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select, and letter keys to filter") +
         output_helper("What size?", %w(Medium Huge), "Medium", hint: 'Filter: "U"') +
         output_helper("What size?", %w(Huge), "Huge", hint: 'Filter: "Ug"') +
         exit_message("What size?", "Huge")
@@ -496,7 +774,8 @@ RSpec.describe TTY::Prompt, '#select' do
 
       actual_prompt_output = prompt.output.string
       expected_prompt_output =
-        output_helper("What size?", %w(Small Medium Large Huge), "Small", init: true, hint: "Use arrow keys, press Enter to select, and letter keys to filter") +
+        output_helper("What size?", %w(Small Medium Large Huge), "Small", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select, and letter keys to filter") +
         output_helper("What size?", %w(Large Huge), "Large", hint: 'Filter: "g"') +
         exit_message("What size?", "Large")
 
@@ -513,7 +792,8 @@ RSpec.describe TTY::Prompt, '#select' do
 
       actual_prompt_output = prompt.output.string
       expected_prompt_output =
-        output_helper("What email?", %w(p*1@mail.com p*2@mail.com p*3@mail.com), "p*1@mail.com", init: true, hint: "Use arrow keys, press Enter to select, and letter keys to filter") +
+        output_helper("What email?", %w(p*1@mail.com p*2@mail.com p*3@mail.com), "p*1@mail.com", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select, and letter keys to filter") +
         output_helper("What email?", %w(p*1@mail.com p*2@mail.com p*3@mail.com), "p*1@mail.com", hint: 'Filter: "p"') +
         output_helper("What email?", %w(p*1@mail.com p*2@mail.com p*3@mail.com), "p*1@mail.com", hint: 'Filter: "p*"') +
         output_helper("What email?", %w(p*2@mail.com), "p*2@mail.com", hint: 'Filter: "p*2"') +
@@ -535,7 +815,8 @@ RSpec.describe TTY::Prompt, '#select' do
 
       actual_prompt_output = prompt.output.string
       expected_prompt_output =
-        output_helper("What size?", %w(Tiny Medium Large Huge), "Tiny", init: true, hint: "Use arrow keys, press Enter to select, and letter keys to filter") +
+        output_helper("What size?", %w(Tiny Medium Large Huge), "Tiny", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select, and letter keys to filter") +
         output_helper("What size?", %w(), "", hint: 'Filter: "z"') +
         output_helper("What size?", %w(), "", hint: 'Filter: "z"') +
         output_helper("What size?", %w(Large), "Large", hint: 'Filter: "a"') +
@@ -556,7 +837,8 @@ RSpec.describe TTY::Prompt, '#select' do
       expect(answer).to eql("Small")
 
       expected_prompt_output =
-        output_helper("What size?", %w(Small Medium Large Huge), "Small", init: true, hint: "Use arrow keys, press Enter to select, and letter keys to filter") +
+        output_helper("What size?", %w(Small Medium Large Huge), "Small", init: true,
+          hint: "Use #{up_down} arrow keys, press Enter to select, and letter keys to filter") +
         output_helper("What size?", %w(Huge), "Huge", hint: 'Filter: "H"') +
         output_helper("What size?", %w(Huge), "Huge", hint: 'Filter: "Hu"') +
         output_helper("What size?", %w(Small), "Small", hint: 'Filter: "S"') +
@@ -579,7 +861,7 @@ RSpec.describe TTY::Prompt, '#select' do
 
       expected_output =
         output_helper("What size?", choices, "Small", init: true,
-                      hint: "Use arrow keys, press Enter to select") +
+          hint: "Use #{up_down} arrow keys, press Enter to select") +
         output_helper("What size?", choices, "Medium") +
         output_helper("What size?", choices, "Huge") +
         "What size? \e[32mHuge\e[0m\n\e[?25h"
@@ -600,7 +882,7 @@ RSpec.describe TTY::Prompt, '#select' do
 
       expected_output =
         output_helper("What letter?", choices, "A", init: true,
-                      hint: "Use arrow keys, press Enter to select, and letter keys to filter") +
+          hint: "Use #{up_down} arrow keys, press Enter to select, and letter keys to filter") +
         output_helper("What letter?", [], "", hint: 'Filter: "c"') +
         output_helper("What letter?", [], "", hint: 'Filter: "c"') +
         output_helper("What letter?", ['A'], "A", hint: 'Filter: "a"') +
@@ -625,7 +907,7 @@ RSpec.describe TTY::Prompt, '#select' do
 
       expected_output =
         output_helper("What size?", choices, "Small", init: true, enum: ') ',
-                    hint: "Use arrow or number (1-3) keys, press Enter to select") +
+          hint: "Use #{up_down} arrow or number (1-3) keys, press Enter to select") +
         output_helper("What size?", choices, "Small", enum: ') ') +
         "What size? \e[32mSmall\e[0m\n\e[?25h"