tadad/blog
1
1
Fork 0
mirror of https://github.com/tadad/blog.git synced 2024-08-17 08:40:20 +03:00
Code Issues Packages Projects Releases Wiki Activity

fix: indent

Browse Source
This commit is contained in:
morelazers 2023-04-26 17:34:52 +02:00
parent a6b100bb99
commit 459e188965
1 changed files with 26 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

52
ted/import.hoon
View File

@ -32,35 +32,35 @@
dra=*(map path md=@t)
thm=*(map @tas css=@t)
=. imp
|-
?: =(all-files ~) imp
%. (rear all-files)
|= [=path content=*]
%= ^$
all-files (snip all-files)
imp
?+ (rear path) imp
%md
=+ content=(of-wain:format ((list cord) content))
?: ?=(%published (snag 0 path))
|-
?: =(all-files ~) imp
%. (rear all-files)
|= [=path content=*]
%= ^$
all-files (snip all-files)
imp
?+ (rear path) imp
%md
=+ content=(of-wain:format ((list cord) content))
?: ?=(%published (snag 0 path))
=/ file-name (oust [0 2] (snip path))
=/ file (~(gut by pub.imp) file-name [html='' md='' theme=%default])
imp(pub (~(put by pub.imp) file-name file(md content)))
=/ draft-name (oust [0 1] (snip path))
=/ draft (~(gut by dra.imp) draft-name [md=''])
imp(dra (~(put by dra.imp) draft-name draft(md content)))
::
%css
=/ theme-name (@tas (rear (oust [0 1] (snip path))))
=/ theme (~(gut by thm.imp) theme-name [css=''])
imp(thm (~(put by thm.imp) theme-name theme(css (@t (@tas content)))))
::
%html
=/ file-name (oust [0 2] (snip path))
=/ file (~(gut by pub.imp) file-name [html='' md='' theme=%default])
imp(pub (~(put by pub.imp) file-name file(md content)))
=/ draft-name (oust [0 1] (snip path))
=/ draft (~(gut by dra.imp) draft-name [md=''])
imp(dra (~(put by dra.imp) draft-name draft(md content)))
::
%css
=/ theme-name (@tas (rear (oust [0 1] (snip path))))
=/ theme (~(gut by thm.imp) theme-name [css=''])
imp(thm (~(put by thm.imp) theme-name theme(css (@t (@tas content)))))
::
%html
=/ file-name (oust [0 2] (snip path))
=/ file (~(gut by pub.imp) file-name [html='' md='' theme=%default])
imp(pub (~(put by pub.imp) file-name file(html (@t (@tas content)))))
imp(pub (~(put by pub.imp) file-name file(html (@t (@tas content)))))
==
==
==
=| cards=(list card:agent:gall)
=/ thm-map ;; (map path @tas)
.^(noun %cx /(scot %p our)/blog/(scot %da now)/import/published/meta/noun)