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

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

[elpa] externals/osm e7f38427ca 05/77: Document all variables


From: ELPA Syncer
Subject: [elpa] externals/osm e7f38427ca 05/77: Document all variables
Date: Mon, 7 Mar 2022 08:58:04 -0500 (EST)

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

    Document all variables
---
 osm.el | 50 ++++++++++++++++++++++++++++++++++++--------------
 1 file changed, 36 insertions(+), 14 deletions(-)

diff --git a/osm.el b/osm.el
index d2fcbe2feb..dc4ab977d7 100644
--- a/osm.el
+++ b/osm.el
@@ -84,20 +84,42 @@ Should be at least 7 days according to the server usage 
policies."
 
 (defconst osm--placeholder1
   `(image :type xbm :width 256 :height 256 :background nil
-          :data ,(make-bool-vector (* 256 256) nil)))
-(defconst osm--placeholder2 (copy-sequence osm--placeholder1))
-
-(defvar osm--search-history nil)
-
-(defvar osm--clean-cache 0)
-(defvar-local osm--url-index 0)
-(defvar-local osm--queue nil)
-(defvar-local osm--active nil)
-(defvar-local osm--width 0)
-(defvar-local osm--height 0)
-(defvar-local osm--zoom nil)
-(defvar-local osm--x nil)
-(defvar-local osm--y nil)
+          :data ,(make-bool-vector (* 256 256) nil))
+  "First placeholder image for tiles.")
+
+(defconst osm--placeholder2 `(image ,@(cdr osm--placeholder1))
+  "Second placeholder image for tiles.
+We need two distinct images which are not `eq' for the display properties.")
+
+(defvar osm--search-history nil
+  "Minibuffer search history used by `osm-search'.")
+
+(defvar osm--clean-cache 0
+  "Last time the tile cache was cleaned.")
+
+(defvar-local osm--url-index 0
+  "Current url index to query the servers in a round-robin fashion.")
+
+(defvar-local osm--queue nil
+  "Download queue of tiles.")
+
+(defvar-local osm--active nil
+  "Active download jobs.")
+
+(defvar-local osm--width 0
+  "Window width in units of the tile size.")
+
+(defvar-local osm--height 0
+  "Window height in units of the tile size.")
+
+(defvar-local osm--zoom nil
+  "Zoom level of the map.")
+
+(defvar-local osm--x nil
+  "Y coordinate on the map in pixel.")
+
+(defvar-local osm--y nil
+  "X coordinate on the map in pixel.")
 
 (defun osm--bb-to-zoom (lat1 lat2 lon1 lon2)
   "Compute zoom level from boundingbox LAT1 to LAT2 and LON1 to LON2."



reply via email to

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