[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/osm 87b5fdb8eb 4/7: Recreate overlay
From: |
ELPA Syncer |
Subject: |
[elpa] externals/osm 87b5fdb8eb 4/7: Recreate overlay |
Date: |
Mon, 14 Mar 2022 11:57:46 -0400 (EDT) |
branch: externals/osm
commit 87b5fdb8eb85bde0c80e8eeb414a3b284733e84b
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Recreate overlay
---
osm.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/osm.el b/osm.el
index 8c8b463556..110f3bb42f 100644
--- a/osm.el
+++ b/osm.el
@@ -975,6 +975,7 @@ xmlns='http://www.w3.org/2000/svg'
xmlns:xlink='http://www.w3.org/1999/xlink'>
(defun osm--display-copyright ()
"Display copyright info."
+ (when osm--copyright-overlay (delete-overlay osm--copyright-overlay))
(when-let (copyright (and osm-copyright (osm--server-property :copyright)))
(setq copyright (replace-regexp-in-string
"{\\(.*?\\)|\\(.*?\\)}"
@@ -983,9 +984,7 @@ xmlns='http://www.w3.org/2000/svg'
xmlns:xlink='http://www.w3.org/1999/xlink'>
(match-string 1 str)
(match-string 2 str)))
(concat (string-join copyright " | ") "\n")))
- (if osm--copyright-overlay
- (move-overlay osm--copyright-overlay (point-min) (point-min))
- (setq osm--copyright-overlay (make-overlay (point-min) (point-min))))
+ (setq osm--copyright-overlay (make-overlay (point-min) (point-min)))
(add-face-text-property
0 (length copyright)
'(:inherit variable-pitch :height 0.75)
- [elpa] externals/osm updated (fbd31cfe63 -> 13c78167d3), ELPA Syncer, 2022/03/14
- [elpa] externals/osm 2a43909cef 1/7: Display copyright above map, ELPA Syncer, 2022/03/14
- [elpa] externals/osm c4d65f60de 2/7: Rename option, ELPA Syncer, 2022/03/14
- [elpa] externals/osm c242a4fc40 3/7: README: Update configuration section, ELPA Syncer, 2022/03/14
- [elpa] externals/osm aafd659c3a 5/7: README: Fix links, ELPA Syncer, 2022/03/14
- [elpa] externals/osm 87b5fdb8eb 4/7: Recreate overlay,
ELPA Syncer <=
- [elpa] externals/osm 162417d1cc 6/7: Update copyright links, ELPA Syncer, 2022/03/14
- [elpa] externals/osm 13c78167d3 7/7: README: Remove empty line, ELPA Syncer, 2022/03/14