emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/osm 5d8959d9ad 64/77: Improve keybindings


From: ELPA Syncer
Subject: [elpa] externals/osm 5d8959d9ad 64/77: Improve keybindings
Date: Mon, 7 Mar 2022 08:58:08 -0500 (EST)

branch: externals/osm
commit 5d8959d9ad0e1dd02b5512e55ff527975bb41efb
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]