[investment-lots] tidier cons instead of append

(append (list new-item) (map...)) is more succinctly formed as (cons new-item (map...))
Gnucash · Dec 24, 2022 · c21aecc · c21aecc
1 parent d928ed4
commit c21aecc
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/gnucash/report/reports/standard/investment-lots.scm b/gnucash/report/reports/standard/investment-lots.scm
@@ -1396,10 +1396,8 @@
                             unassigned-split-count)))
 
                   ((list)
-                    (append
-                      (list
-                        (format #f (G_ "Warning: The following ~a split(s) are not assigned to a lot. Do lots need to be scrubbed?")
-                            unassigned-split-count))
+                   (cons
+                    (format #f (G_ "Warning: The following ~a split(s) are not assigned to a lot. Do lots need to be scrubbed?") unassigned-split-count)
 
                       ;; Also list out the unassigned splits.
                       (map (lambda (split)