diff options
| -rwxr-xr-x | make-points.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/make-points.scm b/make-points.scm index 56c711f..abbdaba 100755 --- a/make-points.scm +++ b/make-points.scm @@ -133,7 +133,9 @@ Copyright (C) 2023 Wojtek Kosior <koszko@koszko.org> (loop position* command (cons position* path-points) rest)))))) (define point-coords - (parse-path point-coords-text)) + ((if (option-ref %options 'reverse-order #f) + reverse identity) + (parse-path point-coords-text))) (define points-count (length point-coords)) |