ref: 2178c49affd1819165ac3054f5be6f211efff19b
parent: 55b73ae9d6016819d0f17a3b0ac4b10d0f34ee80
author: Sigrid Solveig Haflínudóttir <sigrid@ftrv.se>
date: Thu Apr 17 17:35:09 EDT 2025
lsd: use map 'vec instead of the removed vec-map
--- a/src/plan9/lsd.sl
+++ b/src/plan9/lsd.sl
@@ -181,7 +181,7 @@
(io-seek coref loc)
(str-trim (io-readuntil coref 0) "" "\x00"))
(if n
- (vec-map readstr (c-ptr (@ loc) n))
+ (map 'vec readstr (c-ptr (@ loc) n))
(readstr (c-ptr (@ loc)))))
(def (@ loc)