From 38c7c3e8f062dc8f0f61136312d8bccdb78f8f2e Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Sun, 4 Jan 2015 11:36:36 -0200 Subject: Rename to sx-switchto.el --- sx-switchto.el | 56 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 sx-switchto.el (limited to 'sx-switchto.el') diff --git a/sx-switchto.el b/sx-switchto.el new file mode 100644 index 0000000..064ba82 --- /dev/null +++ b/sx-switchto.el @@ -0,0 +1,56 @@ +;;; sx-switchto.el --- Keymap for navigating between pages. -*- lexical-binding: t; -*- + +;; Copyright (C) 2014 Artur Malabarba + +;; Author: Artur Malabarba + +;; This program is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . + +;;; Commentary: + +;;; Code: + +(require 'sx) +(require 'sx-filter) +(require 'sx-method) +(require 'sx-question-list) + + +;;; Keybinds +;;;###autoload +(define-prefix-command 'sx-switchto-map) + +(mapc (lambda (x) (define-key sx-switchto-map (car x) (cadr x))) + '( + ;; These immitate the site's G hotkey. + ("m" sx-tab-meta-or-main) + ("a" sx-ask) + ("h" sx-tab-frontpage) + ;; This is `n' on the site. + ("u" sx-tab-unanswered) + ;; These are extra things we can do, because we're awesome. + ("i" sx-inbox) + ("f" sx-tab-featured) + ("U" sx-tab-unanswered-my-tags) + ("n" sx-tab-newest) + ("w" sx-tab-week) + ("v" sx-tab-topvoted) + )) + +(provide 'sx-switchto) +;;; sx-switchto.el ends here + +;; Local Variables: +;; indent-tabs-mode: nil +;; End: -- cgit v1.2.3