From 7e75f569d946717f631944846cfda7759a7ad3b8 Mon Sep 17 00:00:00 2001 From: Sean Farley Date: Sat, 21 Dec 2019 14:34:44 -0800 Subject: [PATCH 1/3] bindings: add 'r' for remote functions `C-c r` isn't taken and makes sense to copy this from the evil bindings. --- modules/config/default/+emacs-bindings.el | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/modules/config/default/+emacs-bindings.el b/modules/config/default/+emacs-bindings.el index ee5bde218..340893170 100644 --- a/modules/config/default/+emacs-bindings.el +++ b/modules/config/default/+emacs-bindings.el @@ -48,6 +48,16 @@ :desc "Open scratch buffer" "x" #'doom/open-scratch-buffer :desc "Open project scratch buffer" "X" #'doom/switch-to-scratch-buffer) + ;;; r --- remote + (:when (featurep! :tools upload) + (:prefix-map ("r" . "remote") + :desc "Upload local" "u" #'ssh-deploy-upload-handler + :desc "Upload local (force)" "U" #'ssh-deploy-upload-handler-forced + :desc "Download remote" "d" #'ssh-deploy-download-handler + :desc "Diff local & remote" "D" #'ssh-deploy-diff-handler + :desc "Browse remote files" "." #'ssh-deploy-browse-remote-handler + :desc "Detect remote changes" ">" #'ssh-deploy-remote-changes-handler)) + ;;; g --- lookup (:when (featurep! :tools lookup) (:prefix-map ("g" . "lookup") From 85d93511f7d3fd91d49c00122b4c51a04d44ef57 Mon Sep 17 00:00:00 2001 From: Sean Farley Date: Sat, 21 Dec 2019 14:35:36 -0800 Subject: [PATCH 2/3] bindings: add `org-pomodoro' to org key prefix --- modules/config/default/+emacs-bindings.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/modules/config/default/+emacs-bindings.el b/modules/config/default/+emacs-bindings.el index 340893170..6bf8d215b 100644 --- a/modules/config/default/+emacs-bindings.el +++ b/modules/config/default/+emacs-bindings.el @@ -86,7 +86,9 @@ :desc "Capture" "c" #'org-capture :desc "Goto capture" "C" #'org-capture-goto-target :desc "Link store" "l" #'org-store-link - :desc "Sync org caldav" "S" #'org-caldav-sync) + :desc "Sync org caldav" "S" #'org-caldav-sync + (:when (featurep! :lang org +pomodoro) + :desc "Pomodoro timer" "t" #'org-pomodoro)) ;;; p --- project (:prefix ("p" . "project") From d3346fa32f1ece67fe0dd2a8a6a60541bb7a682f Mon Sep 17 00:00:00 2001 From: Sean Farley Date: Sat, 21 Dec 2019 15:32:24 -0800 Subject: [PATCH 3/3] bindings: add search section to vanilla keys --- modules/config/default/+emacs-bindings.el | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/modules/config/default/+emacs-bindings.el b/modules/config/default/+emacs-bindings.el index 6bf8d215b..6ebca7a8d 100644 --- a/modules/config/default/+emacs-bindings.el +++ b/modules/config/default/+emacs-bindings.el @@ -58,6 +58,22 @@ :desc "Browse remote files" "." #'ssh-deploy-browse-remote-handler :desc "Detect remote changes" ">" #'ssh-deploy-remote-changes-handler)) + ;;; s --- search + (:prefix-map ("s" . "search") + :desc "Search buffer" "b" #'swiper + :desc "Search current directory" "d" #'+default/search-cwd + :desc "Search other directory" "D" #'+default/search-other-cwd + :desc "Locate file" "f" #'locate + :desc "Jump to symbol" "i" #'imenu + :desc "Jump to visible link" "l" #'ace-link + :desc "Jump to link" "L" #'ffap-menu + :desc "Jump list" "j" #'evil-show-jumps + :desc "Jump to mark" "m" #'evil-show-marks + :desc "Search project" "p" #'+default/search-project + :desc "Search other project" "P" #'+default/search-other-project + :desc "Search buffer" "s" #'swiper-isearch + :desc "Search buffer for thing at point" "S" #'swiper-isearch-thing-at-point) + ;;; g --- lookup (:when (featurep! :tools lookup) (:prefix-map ("g" . "lookup")