Browse code
Save work on new mvc system
fiddlerwoaroof authored on 23/05/2016 22:49:46
Showing 2 changed files
Showing 2 changed files
... | ... |
@@ -123,7 +123,7 @@ |
123 | 123 |
|
124 | 124 |
(define-view headlines (columns) ;#p"static/headlines.mustache.html" |
125 | 125 |
(let ((sub-len (length columns)) |
126 |
- (columns (mapcar #'submission-alist columns))) |
|
126 |
+ (columns (mapcar #'inangulis.links::submission-alist columns))) |
|
127 | 127 |
(render-mustache #p"static/headlines.mustache.html" |
128 | 128 |
`((:columns . (((:rows . ,(subseq columns 0 (floor sub-len 3)))) |
129 | 129 |
((:rows . ,(subseq columns (floor sub-len 3) (* 2 (floor sub-len 3)) ))) |