ver 2010.02 → 2010.08

data/spec/ver/keymap/vim/digraphs.rb

@@ -0,0 +1,52 @@
+# Encoding: UTF-8
+require_relative '../vim'
+
+VER.spec keymap: 'vim', hidden: false do
+  describe 'Keymap for VIM' do
+    describe 'Digraphs' do
+      behaves_like :destructive_key_spec
+
+      key '<Control-k>a:', 'insert ä by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == "ä"
+      end
+
+      key '<Control-k>:o', 'insert ö by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == "ö"
+      end
+
+      key '<Control-k>si', 'insert し by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == 'し'
+      end
+
+      key '<Control-k>A5', 'insert ぁ by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == 'ぁ'
+      end
+
+      key '<Control-k>a5', 'insert あ by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == 'あ'
+      end
+
+      key '<Control-k>A6', 'insert ア by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == 'ア'
+      end
+
+      key '<Control-k>a6', 'insert ァ by digraph' do |key|
+        type 'i'
+        type key
+        buffer.get('1.0').should == 'ァ'
+      end
+    end
+  end
+end

data/spec/ver/keymap/vim/external_commands.rb

@@ -0,0 +1,21 @@
+require_relative '../vim'
+
+VER.spec keymap: 'vim', hidden: false do
+  describe 'Keymap for VIM' do
+    describe 'External commands' do
+      behaves_like :destructive_key_spec
+
+      key ':sh[ell]', 'start a shell' do
+        skip
+      end
+
+      key '!{command}', 'execute {command} with a shell' do
+        skip
+      end
+
+      key 'K', 'lookup keyword under the cursor with "keywordprg" program (default: "man")' do
+        skip
+      end
+    end
+  end
+end

data/spec/ver/keymap/vim/inserting_mode_keys.rb

@@ -0,0 +1,115 @@
+require_relative '../vim'
+
+VER.spec keymap: 'vim', hidden: false do
+  describe 'Keymap for VIM' do
+    describe 'Insert mode keys' do
+      behaves_like :destructive_key_spec
+
+      before do
+        type 'i'
+      end
+
+      key '<Escape>', 'end Insert mode, back to Normal mode' do |key|
+        buffer.minor_mode?(:insert).should.not.nil
+        type key
+        buffer.minor_mode?(:insert).should.be.nil
+      end
+
+      key '<Control-c>', 'like <Escape>, but do not use an abbreviation' do |key|
+        skip # we have no support for abbreviations, we do snippets.
+      end
+
+      key '<Control-o>{command}', 'execute {command} and return to Insert mode' do
+        type '<Control-o>'
+        buffer.minor_mode?(:insert).should.be.not.nil
+        type 'l'
+        buffer.minor_mode?(:insert).should.be.not.nil
+        insert.index.should == '1.1'
+      end
+
+      key '<Up>', 'move cursor up' do |key|
+        insert.index = 'end'
+        type key
+        insert.index.should == '40.40'
+        type '<Right>', key
+        insert.index.should == '39.27'
+      end
+
+      key '<Down>', 'move cursor down' do |key|
+        type key
+        insert.index.should == '2.0'
+        type '<Right>', key
+        insert.index.should == '3.1'
+      end
+
+      key '<Left>', 'move cursor left one character at a time until linestart' do |key|
+        type key
+        insert.index.should == '1.0'
+
+        insert.index = '2.10'
+        type key
+        insert.index.should == '2.9'
+        type key
+        insert.index.should == '2.8'
+      end
+
+      key '<Right>', 'move cursor right one character at a time until lineend' do |key|
+        type key
+        insert.index.should == '1.1'
+        type key
+        insert.index.should == '1.2'
+
+        insert.index = '1.41'
+        type key
+        insert.index.should == '1.41'
+        type key
+        insert.index.should == '1.41'
+      end
+
+      key '<Shift-Left>', 'one word left' do |key|
+        insert.index = 'end'
+        %w[41.39 41.29 41.23 41.15 41.12 41.0 40.42].each do |index|
+          type key
+          insert.index.should == index
+        end
+      end
+
+      key '<Shift-Right>', 'one word right' do |key|
+        %w[1.10 1.23 1.31 1.40 2.0 2.11].each do |index|
+          type key
+          insert.index.should == index
+        end
+      end
+
+      key '<End>', 'cursor after last character in the line' do |key|
+        type key
+        insert.index.should == '1.41'
+        insert.index = '41.0'
+        type key
+        insert.index.should == '41.40'
+      end
+
+      key '<Home>', 'cursor to first character in the line' do |key|
+        # first line
+        type key
+        insert.index.should == '1.0'
+        type key
+        insert.index.should == '1.0'
+
+        # make sure it also works on indented lines
+        insert.index = '16.10'
+        type key
+        insert.index.should == '16.0'
+        type key
+        insert.index.should == '16.0'
+
+        # and on last line
+        insert.index = 'end'
+        type key
+        insert.index.should == '41.0'
+        type key
+        insert.index.should == '41.0'
+      end
+    end
+  end
+end

data/spec/ver/keymap/vim/inserting_mode_special.rb

@@ -0,0 +1,168 @@
+require_relative '../vim'
+
+VER.spec keymap: 'vim', hidden: false do
+  describe 'Keymap for VIM' do
+    describe 'Special keys in Insert mode' do
+      behaves_like :destructive_key_spec
+
+      before do
+        type 'i'
+      end
+
+      key '<Control-v>', 'insert character for ordinal equivalent' do |key|
+        buffer.value = ''
+        type key, '065'
+        buffer.value.should == "A\n"
+      end
+
+      key '<Control-v>o', 'insert character for octal equivalent' do |key|
+        buffer.value = ''
+        type key, '101'
+        buffer.value.should == "A\n"
+      end
+
+      key '<Control-v>O', 'insert character for octal equivalent' do |key|
+        buffer.value = ''
+        type key, '101'
+        buffer.value.should == "A\n"
+      end
+
+      key '<Control-v>x', 'insert character for hexadecimal equivalent of length two' do |key|
+        buffer.value = ''
+        type key, '41'
+        buffer.value.should == "A\n"
+      end
+
+      key '<Control-v>X', 'insert character for hexadecimal equivalent of length two' do |key|
+        buffer.value = ''
+        type key, '41'
+        buffer.value.should == "A\n"
+      end
+
+      key '<Control-v>u', 'insert character for hexadecimal equivalent of length four' do |key|
+        buffer.value = ''
+        type key, '0041'
+        buffer.value.should == "A\n"
+      end
+
+      key '<Control-v>U', 'insert character for hexadecimal equivalent of length eight' do |key|
+        buffer.value = ''
+        type key, '00000041'
+        buffer.value.should == "A\n"
+      end
+
+      keys '<Return>', '<Control-m>', '<Control-j>', 'begin new line' do |key|
+        buffer.value = ''
+        type key
+        buffer.value.should == "\n\n"
+      end
+
+      key '<Control-e>', 'insert the character from below the cursor' do |key|
+        buffer.value = "\nsecond line"
+        insert.index = '1.0'
+        type key
+        buffer.value.should == <<-VALUE
+s
+second line
+        VALUE
+        15.times{ type key }
+        buffer.value.should == <<-VALUE
+second line
+second line
+        VALUE
+      end
+
+      key '<Control-y>', 'insert the character from above the cursor' do |key|
+        buffer.value = "first line\n"
+        insert.index = '2.0'
+        type key
+        buffer.value.should == <<-VALUE
+first line
+f
+        VALUE
+        15.times{ type key }
+        buffer.value.should == <<-VALUE
+first line
+first line
+        VALUE
+      end
+
+      key '<Control-a>', 'insert previously inserted text' do
+        skip
+      end
+
+      key '<Control-at>', 'insert previously inserted text and stop Insert mode' do
+        skip
+      end
+
+      key '<Control-r>', 'insert the contents of a register' do
+        skip
+      end
+
+      key '<Control-n>', 'insert next match of identifier before the cursor' do
+        skip
+      end
+
+      key '<Control-p>', 'insert previous match of identifier before the cursor' do
+        skip
+      end
+
+      key '<Control-x>', 'complete the word before the cursor in various ways' do
+        skip
+      end
+
+      key '<BackSpace>', '<Control-h>', 'delete the character before the cursor' do |key|
+        insert.index = '1.22'
+        13.times{ type key }
+        insert.get('linestart', 'lineend').should == "Inventore dolorem assumenda."
+      end
+
+      key '<Delete>', 'delete the character under the cursor' do |key|
+        type key
+        insert.get.should == 'n'
+      end
+
+      key '<Control-w>', 'delete word before the cursor' do |key|
+        insert.index = '1.22'
+        type key
+        insert.get('linestart', 'lineend').should == "Inventore  dolorem assumenda."
+      end
+
+      key '<Control-u>', 'delete all entered characters in the current line' do |key|
+        skip
+      end
+
+      key '<Control-t>', 'insert one shiftwidth of indent in front of the current line' do |key|
+        insert.index = '16.16'
+        type key
+        buffer.get('13.0', '18.0').should == <<-VALUE
+Fugiat tempore officiis ab.
+  Aut culpa accusantium consequatur laboriosam pariatur.
+    Cum autem explicabo dignissimos nemo.
+        Omnis vero rerum et in fugiat et eos.
+Ipsum commodi beatae maxime deserunt aut.
+        VALUE
+      end
+
+      key '<Control-d>', 'delete one shiftwidth of indent in front of the current line' do |key|
+        insert.index = '16.16'
+        type key
+        buffer.get('13.0', '18.0').should == <<-VALUE
+Fugiat tempore officiis ab.
+  Aut culpa accusantium consequatur laboriosam pariatur.
+    Cum autem explicabo dignissimos nemo.
+    Omnis vero rerum et in fugiat et eos.
+Ipsum commodi beatae maxime deserunt aut.
+        VALUE
+      end
+
+      key '0<Control-d>', 'delete all indent in the current line' do |key|
+        skip # i don't think i'll implement that myself
+      end
+
+      key '^<Control-d>', 'delete all indent in the current line, restore indent in next line' do |key|
+        skip # i don't think i'll implement that myself
+      end
+    end
+  end
+end

data/spec/ver/keymap/vim/inserting_text.rb

@@ -0,0 +1,108 @@
+require_relative '../vim'
+
+VER.spec keymap: 'vim', hidden: false do
+  describe 'Keymap for VIM' do
+    describe 'Inserting text' do
+      behaves_like :destructive_key_spec
+
+      key 'a', 'append text after the cursor (N times)' do |key|
+        buffer.minor_mode?(:insert).should.be.nil
+        type key
+        buffer.minor_mode?(:insert).should.not.be.nil
+        type ' Hello, World! '
+        buffer.minor_mode?(:insert).should.not.be.nil
+        insert.get('linestart', 'lineend').should ==
+        "I Hello, World! nventore voluptatibus dolorem assumenda."
+      end
+
+      key 'A', 'append text at the end of the line (N times)' do |key|
+        buffer.minor_mode?(:insert).should.be.nil
+        type key
+        buffer.minor_mode?(:insert).should.not.be.nil
+        type ' Hello, World! '
+        buffer.minor_mode?(:insert).should.not.be.nil
+        insert.get('linestart', 'lineend').should ==
+        "Inventore voluptatibus dolorem assumenda. Hello, World! "
+      end
+
+      keys 'i', '<Insert>', 'insert text before the cursor (N times)', do |key|
+        buffer.minor_mode?(:insert).should.be.nil
+        type key
+        buffer.minor_mode?(:insert).should.not.be.nil
+        type ' Hello, World! '
+        buffer.minor_mode?(:insert).should.not.be.nil
+        insert.get('linestart', 'lineend').should ==
+        " Hello, World! Inventore voluptatibus dolorem assumenda."
+      end
+
+      key 'I', 'insert text before the first non-blank in the line (N times)' do |key|
+        buffer.minor_mode?(:insert).should.be.nil
+        type key
+        buffer.minor_mode?(:insert).should.not.be.nil
+        type ' Hello, World! '
+        buffer.minor_mode?(:insert).should.not.be.nil
+        insert.get('linestart', 'lineend').should ==
+        " Hello, World! Inventore voluptatibus dolorem assumenda."
+        type '<Escape>'
+        buffer.minor_mode?(:insert).should.be.nil
+
+        insert.index = '15.0'
+        type key, 'Hello, World! '
+        insert.get('linestart', 'lineend').should ==
+        "    Hello, World! Cum autem explicabo dignissimos nemo."
+      end
+
+      key 'gI', 'insert text in column 1 (N times)' do |key|
+        buffer.minor_mode?(:insert).should.be.nil
+        type key
+        buffer.minor_mode?(:insert).should.not.be.nil
+        type ' Hello, World! '
+        buffer.minor_mode?(:insert).should.not.be.nil
+        insert.get('linestart', 'lineend').should ==
+        " Hello, World! Inventore voluptatibus dolorem assumenda."
+        type '<Escape>'
+        buffer.minor_mode?(:insert).should.be.nil
+
+        insert.index = '15.0'
+        type key, 'Hello, World!'
+        insert.get('linestart', 'lineend').should ==
+        "Hello, World!    Cum autem explicabo dignissimos nemo."
+      end
+
+      key 'o', 'open a new line below the current line, append text (N times)' do |key|
+        type key
+        insert.index.should == '2.0'
+        insert.get('linestart', 'lineend').should == ''
+        buffer.minor_mode?(:insert).should.not.be.nil
+      end
+
+      key 'O', 'open a new line above the current line, append text (N times)' do |key|
+        type key
+        insert.index.should == '1.0'
+        insert.get('linestart', 'lineend').should == ''
+        buffer.minor_mode?(:insert).should.not.be.nil
+      end
+
+      key '{visual}I', 'insert the same text in front of all the selected lines' do
+        type 'vjIHi <Return>'
+        buffer.get('1.0', '4.0').should == <<-VALUE
+Hi Inventore voluptatibus dolorem assumenda.
+Hi Voluptates officiis quidem nemo est.
+Qui similique quia voluptatem.
+        VALUE
+      end
+
+      key '{visual}A', 'append the same text after all the selected lines' do
+        type 'vjA Hi<Return>'
+        buffer.get('1.0', '4.0').should == <<-VALUE
+Inventore voluptatibus dolorem assumenda. Hi
+Voluptates officiis quidem nemo est. Hi
+Qui similique quia voluptatem.
+        VALUE
+      end
+
+      # |:startinsert|  :star[tinsert][!]  start Insert mode, append when [!] used
+      # |:startreplace| :startr[eplace][!]  start Replace mode, at EOL when [!] used
+    end
+  end
+end