fix import-posts pass through 'since' as nil
adds a conditional to the invocation of import-post in import-posts loop there needs to be a guard around 'since' in the loop: if import posts tries to pass it's optional 'since' parameter through to import-post it will prevent any posts from being output , because every post will be compared against a timestamp of nil
This commit is contained in:
parent
7cd51a1334
commit
054621ab13
1 changed files with 2 additions and 1 deletions
|
@ -58,7 +58,8 @@
|
||||||
(ensure-directories-exist (or output (repo *config*)))
|
(ensure-directories-exist (or output (repo *config*)))
|
||||||
(let* ((xml (cxml:parse-file filepath (cxml-dom:make-dom-builder)))
|
(let* ((xml (cxml:parse-file filepath (cxml-dom:make-dom-builder)))
|
||||||
(posts (dom:get-elements-by-tag-name xml "item")))
|
(posts (dom:get-elements-by-tag-name xml "item")))
|
||||||
(loop for post across posts do (import-post post output since))
|
(loop for post across posts do (if since (import-post post output since)
|
||||||
|
(import-post post output)))
|
||||||
(delete-file filepath))))
|
(delete-file filepath))))
|
||||||
|
|
||||||
(defun enable (&key filepath output)
|
(defun enable (&key filepath output)
|
||||||
|
|
Loading…
Add table
Reference in a new issue