New lookup-reloadable-entry-point interface.
This commit is contained in:
parent
f3e297d1da
commit
d6ce78e728
|
@ -32,10 +32,10 @@
|
||||||
(poll-signal "../signals/.fetchindex"
|
(poll-signal "../signals/.fetchindex"
|
||||||
"Index refresh signal received"
|
"Index refresh signal received"
|
||||||
(reloadable-entry-point->procedure
|
(reloadable-entry-point->procedure
|
||||||
(lookup-reloadable-entry-point 'refresh-packages!)))
|
(lookup-reloadable-entry-point 'refresh-packages! "packages.rkt")))
|
||||||
(poll-signal "../signals/.rerender"
|
(poll-signal "../signals/.rerender"
|
||||||
"Static rerender request received"
|
"Static rerender request received"
|
||||||
(reloadable-entry-point->procedure
|
(reloadable-entry-point->procedure
|
||||||
(lookup-reloadable-entry-point 'rerender-all!)))
|
(lookup-reloadable-entry-point 'rerender-all! "site.rkt")))
|
||||||
(sleep 0.5)
|
(sleep 0.5)
|
||||||
(loop)))))
|
(loop)))))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user