From d825f66db83501588f1c84aa4d78e644e0d5f896 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Wed, 4 Feb 2015 17:31:37 +0200 Subject: [PATCH] Fix filling circle/ellipse in Artist Mode (Bug#19763) lisp/textmodes/artist.el (artist-ellipse-compute-fill-info): Use mapcar, not mapc, to create the other half of fill-info. --- lisp/ChangeLog | 6 ++++++ lisp/textmodes/artist.el | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e52f9a35b47..e0c8815c648 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2015-02-04 Eli Zaretskii + + * textmodes/artist.el (artist-ellipse-compute-fill-info): Use + mapcar, not mapc, to create the other half of fill-info. + (Bug#19763) + 2015-02-04 Nicolas Petton * emacs-lisp/authors.el (authors-ignored-files) diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el index 85d9410868a..930c39c82cc 100644 --- a/lisp/textmodes/artist.el +++ b/lisp/textmodes/artist.el @@ -3372,7 +3372,7 @@ The POINT-LIST is expected to cover the first quadrant." ;; Create the other half by mirroring the first half. (setq both-halves (append first-half - (mapc + (mapcar (lambda (i) (artist-new-fill-item (artist-fill-item-get-x i) (- (artist-fill-item-get-y i)) -- 2.39.2