mirror of
https://github.com/tadad/blog.git
synced 2024-08-17 08:40:20 +03:00
feat: export via clay
This commit is contained in:
parent
d6e4299ec9
commit
3e60349ad6
@ -99,6 +99,26 @@
|
||||
%unpublish
|
||||
:_ this(files (~(del by files) path.act))
|
||||
[%pass /bind %arvo %e %disconnect `path.act]~
|
||||
::
|
||||
%export
|
||||
=/ soba-html
|
||||
%+ turn ~(tap by files)
|
||||
|= [=path html=@t md=@t theme=@tas]
|
||||
=/ t ?~(got=(~(get by themes) theme) '' u.got)
|
||||
[[%export %published (snoc path %html)] %ins %html !>((cat 3 html (add-style:blog-lib t)))]
|
||||
=/ soba-md
|
||||
%+ turn ~(tap by drafts)
|
||||
|= [=path md=@t]
|
||||
[[%export %drafts (snoc path %md)] %ins %md !>([md ~])]
|
||||
=/ soba-css
|
||||
%+ turn ~(tap by themes)
|
||||
|= [theme=@tas css=@t]
|
||||
[[%export %themes (snoc [theme]~ %css)] %ins %css !>(css)]
|
||||
:_ this
|
||||
:~ [%pass /info %arvo %c %info %blog %& soba-html]
|
||||
[%pass /info %arvo %c %info %blog %& soba-md]
|
||||
[%pass /info %arvo %c %info %blog %& soba-css]
|
||||
==
|
||||
::
|
||||
%save-draft `this(drafts (~(put by drafts) [path md]:act))
|
||||
%delete-draft `this(drafts (~(del by drafts) path.act))
|
||||
|
Loading…
Reference in New Issue
Block a user