branch: externals/osm
commit 5d8959d9ad0e1dd02b5512e55ff527975bb41efb
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
Improve keybindings
---
README.org | 4 +++-
osm.el | 7 +++----
2 files changed, 6 insertions(+), 5 deletions(-)
diff --git a/README.org b/README.org
index b73a0d77ec..0a6d29eff4 100644
--- a/README.org
+++ b/README.org
@@ -30,7 +30,8 @@
:bind (("C-c m h" . osm-home)
("C-c m s" . osm-search)
("C-c m t" . osm-server)
- ("C-c m g" . osm-goto))
+ ("C-c m g" . osm-goto)
+ ("C-c m b" . osm-bookmark-jump))
:init
;; Load Org link support
(with-eval-after-load 'org
@@ -59,6 +60,7 @@ Top-level commands:
- =osm-search=: Search and jump to location
- =osm-goto=: Go to coordinates
- =osm-server=: Select server
+- =osm-bookmark-jump=: Jump to bookmark
Key bindings in =osm-mode= buffer:
- ~<arrow>~: Small step scrolling
diff --git a/osm.el b/osm.el
index bb97a00690..a03b75719a 100644
--- a/osm.el
+++ b/osm.el
@@ -158,8 +158,8 @@ Should be at least 7 days according to the server usage
policies."
(define-key map "s" #'osm-search)
(define-key map "t" #'osm-server)
(define-key map "l" 'org-store-link)
- (define-key map "b" #'osm-bookmark-set)
- (define-key map "B" #'osm-bookmark-jump)
+ (define-key map "B" #'osm-bookmark-set)
+ (define-key map "b" #'osm-bookmark-jump)
(define-key map [remap scroll-down-command] #'osm-down)
(define-key map [remap scroll-up-command] #'osm-up)
(define-key map "<" nil)
@@ -871,8 +871,7 @@ MSG is a message prefix string."
(dolist (sym (list #'osm-up #'osm-down #'osm-left #'osm-right
#'osm-up-up #'osm-down-down #'osm-left-left
#'osm-right-right
- #'osm-zoom-out #'osm-zoom-in #'osm-bookmark-set
#'osm-bookmark-jump
- #'osm-bookmark-delete))
+ #'osm-zoom-out #'osm-zoom-in #'osm-bookmark-set))
(put sym 'command-modes '(osm-mode)))
(dolist (sym (list #'osm-drag #'osm-zoom-click #'osm-org-link-click
#'osm-bookmark-set-click #'osm-bookmark-delete-click))
