marcuskammer/coleslaw
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tiny tweak to incremental plugin.

Browse source
This commit is contained in:
Brit Butler 2014-06-03 16:41:12 -04:00
parent bed63d2156
commit 3109a988c4
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
plugins/incremental.lisp
View file

@ -14,7 +14,8 @@
#:all-subclasses #:all-subclasses
#:do-subclasses #:do-subclasses
#:construct #:construct
#:rel-path) #:rel-path
#:update-content-metadata)
(:export #:enable)) (:export #:enable))
(in-package :coleslaw-incremental) (in-package :coleslaw-incremental)
@ -36,7 +37,7 @@
(setf coleslaw::*site* (cl-store:restore db-file)) (setf coleslaw::*site* (cl-store:restore db-file))
(loop for (status path) in (get-updated-files) (loop for (status path) in (get-updated-files)
do (update-content status path)) do (update-content status path))
(coleslaw::update-content-metadata) (update-content-metadata)
(do-subclasses (itype index) (do-subclasses (itype index)
;; Discover's before method will delete the possibly outdated indexes. ;; Discover's before method will delete the possibly outdated indexes.
(discover itype)) (discover itype))