Add Conkeror config

3 files changed, 42 insertions, 0 deletions

diff --git a/conkeror/.conkerorrc/.gitignore b/conkeror/.conkerorrc/.gitignore
new file mode 100644
index 0000000..bac1726
--- /dev/null
+++ b/conkeror/.conkerorrc/.gitignore
@@ -0,0 +1 @@
+init.js
diff --git a/conkeror/.conkerorrc/GNUmakefile b/conkeror/.conkerorrc/GNUmakefile
new file mode 100644
index 0000000..82e5b9b
--- /dev/null
+++ b/conkeror/.conkerorrc/GNUmakefile
@@ -0,0 +1,6 @@
+include ../../dotfiles.mk
+
+all: init.js
+
+%.js: %.org
+	$(call tangle,js)
diff --git a/conkeror/.conkerorrc/init.org b/conkeror/.conkerorrc/init.org
new file mode 100644
index 0000000..991f9ba
--- /dev/null
+++ b/conkeror/.conkerorrc/init.org
@@ -0,0 +1,35 @@
+Add commands to search through and open links from history.
+
+#+BEGIN_SRC js
+  define_browser_object_class(
+      "history-url", null,
+      function (I, prompt) {
+          check_buffer(I.buffer, content_buffer);
+          var result = yield I.buffer.window.minibuffer.read_url(
+              $prompt = prompt, $use_webjumps = false, $use_history = true,
+              $use_bookmarks = false, $sort_order = 'date_descending'
+          );
+          yield co_return(result);
+      }
+  );
+
+  interactive("find-url-from-history",
+              "Find a page from history in the current buffer",
+              "find-url",
+              $browser_object = browser_object_history_url);
+  interactive("find-url-from-history-new-buffer",
+              "Find a page from history in a new buffer",
+              "find-url-new-buffer",
+              $browser_object = browser_object_history_url);
+
+  define_key(content_buffer_normal_keymap, "H", "find-url-from-history");
+  define_key(content_buffer_normal_keymap, "h", "find-url-from-history-new-buffer");
+
+#+END_SRC
+
+Set the hints digits to the keys on my keyboard's home row, for easy
+access.
+
+#+BEGIN_SRC js
+  hint_digits = "arstdhneio";
+#+END_SRC