From 06be22d92c4fbd422306da66d94f2a0958bf1b09 Mon Sep 17 00:00:00 2001 From: "Yann Esposito (Yogsototh)" Date: Sat, 22 Feb 2020 17:11:49 +0000 Subject: [PATCH] mess a bit with the CSS --- .gitignore | 4 +-- project.el | 36 ++++++++++++++++++++++++++- project.el.sig | Bin 586 -> 586 bytes src/css/mk.css | 22 +++++++--------- src/posts/0010-Haskell-Now/index.org | 11 +++++--- 5 files changed, 53 insertions(+), 20 deletions(-) diff --git a/.gitignore b/.gitignore index 88e7194..120c4f5 100644 --- a/.gitignore +++ b/.gitignore @@ -1,4 +1,2 @@ -_cache -_site -_optim +_* src/archive.org diff --git a/project.el b/project.el index 11aca53..4d99053 100644 --- a/project.el +++ b/project.el @@ -4,8 +4,10 @@ (defvar root-dir (projectile-project-root)) (defvar base-dir (concat root-dir "src")) (defvar publish-dir (concat root-dir "_site")) +(defvar draft-publish-dir (concat root-dir "_full")) (defvar assets-dir (concat base-dir "/")) (defvar publish-assets-dir (concat publish-dir "/")) +(defvar draft-publish-assets-dir (concat publish-drafts-dir "/")) (defvar posts-dir (concat base-dir "/posts")) (defvar rss-title "Subscribe to articles") (defvar posts-descr "Articles") @@ -264,6 +266,7 @@ Return output file name." :sitemap-format-entry date-format-entry :sitemap-function org-blog-posts-sitemap-fn) + ("assets" :base-directory ,assets-dir :base-extension ".*" @@ -272,7 +275,38 @@ Return output file name." :publishing-function org-blog-publish-attachment :recursive t) - ("blog" :components ("orgfiles" "assets")))) + + ("draft-org-files" + :base-directory ,base-dir + :base-extension "org" + :publishing-directory ,draft-publish-dir + :recursive t + :preparation-function org-blog-prepare + :publishing-function org-blog-publish-to-html + :with-toc nil + :with-title nil + :with-date t + :section-numbers nil + :html-doctype "html5" + :html-html5-fancy t + :html-head-include-default-style nil + :html-head-include-scripts nil + :htmlized-source t + :html-head-extra ,org-blog-head + :html-preamble org-blog-preamble + :html-postamble org-blog-postamble + + ) + ("draft-assets" + :base-directory ,assets-dir + :base-extension ".*" + :exclude ".*\.org$" + :publishing-directory ,draft-publish-assets-dir + :publishing-function org-blog-publish-attachment + :recursive t) + + ("blog" :components ("orgfiles" "assets")) + ("draft" :components ("draft-org-files" "draft-assets")))) ;; add target=_blank and rel="noopener noreferrer" to all links by default (defun my-org-export-add-target-blank-to-http-links (text backend info) diff --git a/project.el.sig b/project.el.sig index acf584ac806633afdaf973b4cdddc208bfc3cd3c..f268435c3f51de6cad438746833af20134bdce7f 100644 GIT binary patch delta 534 zcmV+x0_pwA1j+=EBLh)cbCD(>e?Z6(0FbP79-$ULM5_Fadz8a7@&xR-vBF+&zSqf< zHiR7}u8c`hft0WMiOOuGkz$~##Xw~nBletB7c{==%*Nepzf#|rP%|y3NqC{^X}N)X zY;`(ZFU99NFg_P?d?c7-hU+yfo|4B0`wvUZ|?~?Bge=OHK1f2 zU5mZb#l=P4tIv2L)((ea3j)0*G?&x2(E#jauiC8n2jd`9RL6T delta 534 zcmV+x0_pwA1j+=EBLh#ce~~62e|Ojr0Ecl+BD&1X3;PP^3$-_Ifc*M6{tj-(?H4`i zI0cjpRD-k9O2#qVrSNv0^je2{X$L3~@gK;8=?>GCIaf29=#KB8hIDci`$S&|@ft=$ z_*Aww|G~z7IdzB%5i)t#F4w}FN6O3NmI-6nbtG&vUow?!bdBOdJB zPn{#>>*aRH_O_C#%tMRc;~yJEE`k8ZCmJK$z7yeuQO;b+XW-)w@M7Uq&hh8bw&`S(si;m_bCGK)+R9(|YaU zCe};ka;(SERx+9+2Ht#U$#w3U5Gup9{`55vTI>m0J%W6sUjTUTe~akAbks4AIEv>r zCnE{UGF+L;n?0?I9FPlz@+GKB`Hi$wY;y#g_;Hpqk-tf5Fnt&fc&SGQNfdPoQM<#e zFTKX$7w$>_(<9b#$n^JXMWxrJkGMbVozHq~sb>vA!A>Pk5Dq8h^>6<~O)afa84;nH YU#imsk9Yo2`}zj!2&O()5QH`6%4tvq`v3p{ diff --git a/src/css/mk.css b/src/css/mk.css index f2553c2..897e623 100644 --- a/src/css/mk.css +++ b/src/css/mk.css @@ -3,17 +3,17 @@ */ /* Fonts */ :root { - --lh: 26px; + --lh: 17px; } body { - font-size: 18px; - font-family: Palatino, Georgia, serif; + font-size: 15px; + font-family: "PT Sans","Trebuchet MS", Verdana, sans-serif; line-height: var(--lh); } code, pre, pre code { line-height: 1em; font-size: 14px; - font-family: Menlo, monospace; + font-family: "PT Mono", Menlo, monospace; } blockquote pre { line-height: var(--lh); @@ -71,16 +71,14 @@ table { max-width: 100%; border-collapse: collapse; overflow: scroll; - border-top: dashed 2px; - border-bottom: dashed 2px; + border-top: solid 2px; + border-bottom: solid 2px; } td, th { height: 1em; padding: 0 10px; text-align: left; vertical-align: middle; - border-left: dashed 2px; - border-right: dashed 2px; } sup { vertical-align: top; @@ -188,7 +186,7 @@ figure, .figure { margin: 1em 0; } #content,.content { - max-width: 48em; + max-width: 35em; margin: 0 auto; padding: 0 1em; } @@ -370,7 +368,8 @@ li .keywords { .main ol > li:before, ol > li:before, pre::after,pre::before,hr:after, -.main pre::after,.main pre::before,.main hr:after +.main pre::after,.main pre::before,.main hr:after, +blockquote:after, .main blockquote:after { color: var(--fg0); } @@ -415,9 +414,6 @@ table, td, th, code, .main code { background: var(--rbg); } -blockquote:after, .main blockquote:after { - color: var(--fg2); -} #preamble,#postamble,.main #preamble, .main #postamble { border-color: transparent; } diff --git a/src/posts/0010-Haskell-Now/index.org b/src/posts/0010-Haskell-Now/index.org index b05e387..47dd8e4 100644 --- a/src/posts/0010-Haskell-Now/index.org +++ b/src/posts/0010-Haskell-Now/index.org @@ -21,10 +21,15 @@ I took the time to read it again. In 2012, I really believed that every developer should learn Haskell. This is why I wrote my old article. -This is the end of 2019 and I still strongly believe that, yes, you must at -least be able to understand enough Haskell to write a simple tool. +This is the end of 2019 and I still strongly believe that. +I think you should at least be able to understand enough Haskell to write a +simple tool. +There are a few feature in Haskell that I really miss in most programming +languages and that would not appear to be difficult to provide. +Typically sum types. +A concept so simple yet so helpful. -But a few things have changed in the Haskell world. +Since I wrote my article a few things have changed in the Haskell world. 1. Project building has a few working solution. When I wrote this article I had a few web application that I can no longer build today.