aliens/tekuti
1
0
Fork 0
Code Activity

Fix a nodelist issue in admin edit page

Browse source
This commit is contained in:
Andy Wingo 2019-06-26 15:35:34 +02:00
parent 83c47a9185
commit bb11cb984e
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
tekuti/page-helpers.scm
View file

@ -38,6 +38,7 @@
#:use-module (tekuti comment)
#:use-module (tekuti request)
#:use-module (tekuti template)
#:use-module ((srfi srfi-1) #:select (append-map))
#:use-module (srfi srfi-19)
#:export (respond
relurl rellink
@ -417,7 +418,7 @@ present."
(value "Submit Comment"))))))
(define (comments-sxml-content-edit post)
(map
(append-map
(lambda (comment)
(let ((id (assq-ref comment 'key)))
`(,(comment-sxml-content comment)