From 821143968581bbdfee5ddae20b58d77cc202ea7f Mon Sep 17 00:00:00 2001
From: Zak Greant <zak@greant.com>
Date: Sat, 15 Aug 2015 12:41:24 +0200
Subject: [PATCH 1/3] J.A. (Zak) Greant Copyright Waiver

I dedicate any and all copyright interest in this software to the public
domain.  I make this dedication for the benefit of the public at large and to
the detriment of my heirs and successors.  I intend this dedication to be an
overt act of relinquishment in perpetuity of all present and future rights to
this software under copyright law.

From b2cff3f42086e3ab63f8d2d8df7dd48d42e25938 Mon Sep 17 00:00:00 2001
From: Zak Greant <zak@greant.com>
Date: Sat, 15 Aug 2015 12:45:10 +0200
Subject: [PATCH 2/3] Generate normal mode reference

Parse entries out of the cmds array in normal.cc, then generate a
sorted list of key bindings as an HTML table.
---
 contrib/kakmap.rb | 61 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 61 insertions(+)
 create mode 100755 contrib/kakmap.rb

diff --git a/contrib/kakmap.rb b/contrib/kakmap.rb
new file mode 100755
index 000000000..33b61639c
--- /dev/null
+++ b/contrib/kakmap.rb
@@ -0,0 +1,61 @@
+#!/usr/bin/env ruby
+
+# Generate a reference sheet for Kakoune's normal mode
+# Use: ./kakmap.rb ../src/normal.cc
+
+require 'markaby'
+
+# Relies on the cmds array assignment ending with };
+raw = ARGF.read.split( /cmds\[\] =\s+{\s*/m ).last.split( /^};$/ ).first
+
+commands = {}
+
+# break code into lines
+raw.split( /\n+/ ).each{ |line|
+  line.gsub!( /(^\s*{\s*|\s*},?\*$)/, '' ) # discard wrapping for array elements
+
+  mod = (line.scan( /^alt|^ctrl/ ).first || 'none').to_sym
+  key = line.scan(/(?:^Key::(\w+)|(?<!\\)'\\?(.*?)(?<!\\)')/).flatten.compact.first
+  des = line.scan(/(?<!\\)"(?<desc>.*?)(?<!\\)"/).flatten.first
+
+  key = 'Space' if key == ' '
+
+  commands[key] ||= {}
+  commands[key][mod] = des
+}
+
+# sort, showing single characters first, symbols next and spelled out keys last
+commands = commands.sort_by{ |key, _|
+  case key
+  when /^\w$/
+    key.upcase + key.swapcase
+  when /^\W$/
+    '_' + key
+  else
+    '~~' + key
+  end
+}
+
+puts Markaby::Builder.new {
+  table do
+    thead do
+      tr do
+        th "Key"
+        th "Description"
+        th "ALT + key"
+        th "CTRL + key"
+      end
+    end
+    tbody do
+      for key, binding in commands
+        tr do
+          th key
+          td binding[:none]
+          td binding[:alt]
+          td binding[:ctrl]
+        end
+      end
+    end
+  end
+}
+

From dc2d12a1242ca040b8b2e50275e0e34e4eeeaa2c Mon Sep 17 00:00:00 2001
From: Zak Greant <zak@greant.com>
Date: Sat, 15 Aug 2015 16:46:57 +0200
Subject: [PATCH 3/3] Fixing minor typo

s/prevous/previous/
---
 src/normal.cc | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/normal.cc b/src/normal.cc
index 90487fc0c..0a824cf1b 100644
--- a/src/normal.cc
+++ b/src/normal.cc
@@ -1520,17 +1520,17 @@ static NormalCmdDesc cmds[] =
 
     { 'w', "select to next word start", repeated<&select<SelectMode::Replace, select_to_next_word<Word>>> },
     { 'e', "select to next word end", repeated<select<SelectMode::Replace, select_to_next_word_end<Word>>> },
-    { 'b', "select to prevous word start", repeated<select<SelectMode::Replace, select_to_previous_word<Word>>> },
+    { 'b', "select to previous word start", repeated<select<SelectMode::Replace, select_to_previous_word<Word>>> },
     { 'W', "extend to next word start", repeated<select<SelectMode::Extend, select_to_next_word<Word>>> },
     { 'E', "extend to next word end", repeated<select<SelectMode::Extend, select_to_next_word_end<Word>>> },
-    { 'B', "extend to prevous word start", repeated<select<SelectMode::Extend, select_to_previous_word<Word>>> },
+    { 'B', "extend to previous word start", repeated<select<SelectMode::Extend, select_to_previous_word<Word>>> },
 
     { alt('w'), "select to next WORD start", repeated<select<SelectMode::Replace, select_to_next_word<WORD>>> },
     { alt('e'), "select to next WORD end", repeated<select<SelectMode::Replace, select_to_next_word_end<WORD>>> },
-    { alt('b'), "select to prevous WORD start", repeated<select<SelectMode::Replace, select_to_previous_word<WORD>>> },
+    { alt('b'), "select to previous WORD start", repeated<select<SelectMode::Replace, select_to_previous_word<WORD>>> },
     { alt('W'), "extend to next WORD start", repeated<select<SelectMode::Extend, select_to_next_word<WORD>>> },
     { alt('E'), "extend to next WORD end", repeated<select<SelectMode::Extend, select_to_next_word_end<WORD>>> },
-    { alt('B'), "extend to prevous WORD start", repeated<select<SelectMode::Extend, select_to_previous_word<WORD>>> },
+    { alt('B'), "extend to previous WORD start", repeated<select<SelectMode::Extend, select_to_previous_word<WORD>>> },
 
     { alt('l'), "select to line end", repeated<select<SelectMode::Replace, select_to_line_end<false>>> },
     { Key::End, "select to line end", repeated<select<SelectMode::Replace, select_to_line_end<false>>> },