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

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

[elpa] externals/osm a9d0ec74e3 07/77: Simplify placeholder


From: ELPA Syncer
Subject: [elpa] externals/osm a9d0ec74e3 07/77: Simplify placeholder
Date: Mon, 7 Mar 2022 08:58:04 -0500 (EST)

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

    Simplify placeholder
---
 osm.el | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/osm.el b/osm.el
index 9c220063b8..20491ee140 100644
--- a/osm.el
+++ b/osm.el
@@ -83,8 +83,7 @@ Should be at least 7 days according to the server usage 
policies."
   :type '(choice (const nil) integer))
 
 (defconst osm--placeholder1
-  `(image :type xbm :width 256 :height 256 :background nil
-          :data ,(make-bool-vector (* 256 256) nil))
+  `(image :type xbm :width 256 :height 256 :data ,(make-bool-vector (* 256 
256) nil))
   "First placeholder image for tiles.")
 
 (defconst osm--placeholder2 `(image ,@(cdr osm--placeholder1))
@@ -423,8 +422,6 @@ We need two distinct images which are not `eq' for the 
display properties.")
         '(:eval (osm--queue-info))))
       (setq osm--height (1+ (ceiling (window-pixel-height) 256))
             osm--width (1+ (ceiling (window-pixel-width) 256)))
-      (plist-put (cdr osm--placeholder1) :background (face-attribute 'default 
:background))
-      (plist-put (cdr osm--placeholder2) :background (face-attribute 'default 
:background))
       (erase-buffer)
       (dotimes (_j osm--height)
         (insert (concat (make-string osm--width ?\s) "\n")))



reply via email to

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