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

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

[elpa] externals/osm 42052c4be1 2/2: Use selected bookmark color for new


From: ELPA Syncer
Subject: [elpa] externals/osm 42052c4be1 2/2: Use selected bookmark color for new bookmarks
Date: Tue, 8 Mar 2022 07:57:39 -0500 (EST)

branch: externals/osm
commit 42052c4be1554a0145a364a59c69a6637f8cf0fe
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Use selected bookmark color for new bookmarks
---
 osm.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/osm.el b/osm.el
index b929617a97..a1209b8533 100644
--- a/osm.el
+++ b/osm.el
@@ -411,7 +411,7 @@ Should be at least 7 days according to the server usage 
policies."
   "Create bookmark at position of click EVENT."
   (interactive "@e")
   (pcase-let ((`(,x . ,y) (posn-x-y (event-start event))))
-    (osm--put-transient-pin 'bookmark
+    (osm--put-transient-pin 'selected-bookmark
                             (+ osm--x (- x osm--wx))
                             (+ osm--y (- y osm--wy))
                             "New bookmark")
@@ -931,7 +931,7 @@ xmlns='http://www.w3.org/2000/svg' 
xmlns:xlink='http://www.w3.org/1999/xlink'>
   (unless (eq major-mode #'osm-mode)
     (error "Not an osm-mode buffer"))
   (unwind-protect
-      (pcase-let* ((`(,lat ,lon ,desc) (osm--location-data 'bookmark 
"Bookmark"))
+      (pcase-let* ((`(,lat ,lon ,desc) (osm--location-data 'selected-bookmark 
"Bookmark"))
                    (def (osm--bookmark-name desc))
                    (name (read-from-minibuffer "Bookmark name: " def nil nil 
nil def))
                    (bookmark-make-record-function



reply via email to

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