[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/osm 3bab32bb2f 1/7: Simplify
From: |
ELPA Syncer |
Subject: |
[elpa] externals/osm 3bab32bb2f 1/7: Simplify |
Date: |
Thu, 10 Mar 2022 11:57:48 -0500 (EST) |
branch: externals/osm
commit 3bab32bb2fdc65f3e176da109f0cef728f0cc80b
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Simplify
---
osm.el | 12 +-----------
1 file changed, 1 insertion(+), 11 deletions(-)
diff --git a/osm.el b/osm.el
index f1937ce4cd..855da2c347 100644
--- a/osm.el
+++ b/osm.el
@@ -654,7 +654,7 @@ Should be at least 7 days according to the server usage
policies."
(sx (if (< x0 x1) 1 -1))
(sy (if (< y0 y1) 1 -1))
(err (+ dx dy)))
- ;; Bresenham with "antialiasing"
+ ;; Bresenham
(while
(let ((ex (< (* err 2) dx))
(ey (> (* err 2) dy))
@@ -663,16 +663,6 @@ Should be at least 7 days according to the server usage
policies."
(push p0 (gethash key segs)))
(push p1 (gethash key segs))
(unless (and (= x0 x1) (= y0 y1))
- ;; "Antialiasing"
- (when (and ey ex)
- (setq key (cons (+ x0 sx) y0))
- (unless (equal (gethash key segs) p0)
- (push p0 (gethash key segs)))
- (push p1 (gethash key segs))
- (setq key (cons x0 (+ y0 sy)))
- (unless (equal (gethash key segs) p0)
- (push p0 (gethash key segs)))
- (push p1 (gethash key segs)))
(when ey
(cl-incf err dy)
(cl-incf x0 sx))
- [elpa] externals/osm updated (6b7014c4a9 -> 02a00fcd5c), ELPA Syncer, 2022/03/10
- [elpa] externals/osm 3bab32bb2f 1/7: Simplify,
ELPA Syncer <=
- [elpa] externals/osm 4d8016f41a 3/7: Fix gpx track artifacts, ELPA Syncer, 2022/03/10
- [elpa] externals/osm 2dd0885fc1 4/7: Minor optimization, ELPA Syncer, 2022/03/10
- [elpa] externals/osm 4d044d3400 2/7: Simplify2, ELPA Syncer, 2022/03/10
- [elpa] externals/osm 02a00fcd5c 7/7: Minor cleanup, ELPA Syncer, 2022/03/10
- [elpa] externals/osm e39aaf48e1 6/7: Configurable track style, ELPA Syncer, 2022/03/10
- [elpa] externals/osm 757e5f1627 5/7: Improve track drawing, ELPA Syncer, 2022/03/10