diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2015-02-04 17:31:37 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2015-02-04 17:31:37 +0200 |
| commit | d825f66db83501588f1c84aa4d78e644e0d5f896 (patch) | |
| tree | 36275f94ba23aa241908dd18e007dbc34c71c431 | |
| parent | 4779a4bbcc2ce7599a546cc61aab6106376680fa (diff) | |
| download | emacs-d825f66db83501588f1c84aa4d78e644e0d5f896.tar.gz | |
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.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/textmodes/artist.el | 2 |
2 files changed, 7 insertions, 1 deletions
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 <eliz@gnu.org> + + * 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 <nicolas@petton.fr> * 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)) |