Browse code
fix: handle alambda better
Edward Langley authored on 05/05/2023 06:20:33Showing 1 changed files
| ... | ... |
@@ -75,5 +75,5 @@ |
| 75 | 75 |
,@(loop for (slot _ tag-name . rest) in slots |
| 76 | 76 |
collect `(lazy-load-slot ,name ,doc-slot ,root-el ,slot ,tag-name ,@rest)) |
| 77 | 77 |
(defmethod %all-slots ((self ,name) format) |
| 78 |
- (pairlis (list ,@(mapcar (fw.lu::alambda (cadr it)) slots)) |
|
| 78 |
+ (pairlis (list ,@(mapcar (fw.lu::alambda (cadr fw.lu::it)) slots)) |
|
| 79 | 79 |
(list ,@(loop for (slot) in slots collect `(,slot self))))))))) |