From ae584b4f8f8cdc361046fe189a1d514fa5ef02f0 Mon Sep 17 00:00:00 2001
From: "Yann Esposito (Yogsototh)" <yann.esposito@gmail.com>
Date: Sun, 1 Sep 2019 23:03:24 +0200
Subject: [PATCH] fixed rss, made it faster, but less awesome

---
 project.el     |  23 ++++++-----------------
 project.el.sig | Bin 586 -> 586 bytes
 src/index.org  |   4 ++++
 3 files changed, 10 insertions(+), 17 deletions(-)

diff --git a/project.el b/project.el
index 7363e87..3eab1af 100644
--- a/project.el
+++ b/project.el
@@ -7,6 +7,8 @@
 (defvar publish-assets-dir (concat publish-dir "/"))
 (defvar posts-dir (concat base-dir "/posts"))
 (defvar rss-title "Subscribe to articles")
+(defvar rss-url (concat domainname "/rss.xml"))
+(defvar rss-img (concat domainname "/img/FlatAvatar.png"))
 (defvar rss-description "her.esy.fun articles, mostly random personal thoughts")
 (defvar posts-descr "Articles")
 (defvar css-path "/css/minimalist.css")
@@ -45,21 +47,6 @@
    "</navigation>"))
 
 
-(defun str-time-to-year-float (date-str)
-  (/ (float-time
-      (apply 'encode-time
-             (mapcar (lambda (x) (if (null x) 0 x))
-                     (parse-time-string date-str))))
-     (* 365.25 24 60 60)))
-
-(defvar blog-creation-date "2019-07-01")
-
-(defun y-date (date-str)
-  "Number of year since the begining of this blog"
-  (let ((y (- (str-time-to-year-float date-str)
-              (str-time-to-year-float blog-creation-date))))
-    (format "∆t=%.2f" y)))
-
 (defun get-from-info (info k)
   (let ((i (car (plist-get info k))))
     (when (and i (stringp i))
@@ -261,7 +248,9 @@ Return output file name."
          :publishing-directory ,publish-dir
          :publishing-function y/org-rss-publish-to-rss
          :rss-extension "xml"
-         :rss-image-url "https://her.esy.fun/img/FlatAvatar.png"
+         :rss-image-url ,rss-img
+         :rss-feed-url ,rss-url
+         :html-link-home ,rss-url
          :auto-sitemap t
          :sitemap-filename "rss.org"
          :sitemap-title "her.esy.fun"
@@ -277,7 +266,7 @@ Return output file name."
          :publishing-function org-blog-publish-attachment
          :recursive t)
 
-        ("blog" :components ("orgfiles" "assets"))))
+        ("blog" :components ("orgfiles" "assets" "rss"))))
 
 ;; 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 846034f34d305976063f243728148e07df50d3d0..06485eb970fa4ca0d1487af34898cedd29230837 100644
GIT binary patch
delta 534
zcmV+x0_pwA1j+=EBLi$Q36Ulse^xCJ0K-lMl<^I9+B5ZYnhOEr(dQ7vp5FbWgck*P
zC1VGa=Q;~QSX~}WGBjQ~996v8%oIT@CUxtadRfIv|DMIhr|d;(tcov`!qkXb9oSS4
zCEux(FPAO8ZEJji%wgd?J}`3jzF!okK>`yWej-X9QCy@lw8#|omjXjlf88wuYfH)M
z?vBBzqZy7Xv$zXHDgY_f(F<u?g;z)-_e;|9_cEskgcF>z3O_~+`b8Lbb76^BTmDPY
zTb78ucqf}IC6HN1#vuxZ&sfJex@60yYua(N{gcRRBIHW>>E#A=D@MPNAD%?#fET!c
z2djLeaV5sW6!LHe+=(cUe<_rhb$`~Vcm6}mFs}~WsW*U(KxLz>jWi<!a<>)ui%9I<
zwq45^`hTy1G#!f%wMty8<SkBy8%Vd=i$JHvM1Oyw7GLi>obE-SE|UFC2kXO*mz1bk
zsj94N<`6EmW1qCZYwbbXVEAB*D1}`Bv#(EhKpU+9G*#R~WrE9Be^1_FROo1(jg6aE
zjiW<S#R&ONh12bJU{;H4RSfRDL4FgaDzNEj9}<$K5-hgD_9W~YC%eCA{u0f$v>Bci
z?}EpyNzN=D6p$g&pWvs(1LLK~OW)#LWd{hi%i@gAoybp=!ueQt1ukyNFlKfo1x0VV
Y$-gIVLLy8_u#N8|2<70CkNh<q1CIXv7XSbN

delta 534
zcmV+x0_pwA1j+=EBLiz{;E^UEf3->v{SZ`YJcPdw-~<eHYfeMz=7O;=JrZfg@fMS?
zwlBhFu^s%}gydn~IR@ic)W&VCVP`UtxQ>?9aqTJkJ9y)-`JVCec%0piJ4t6*Jt?XB
zMV)XisQ)brRDfm_8bD81F+bL4e=p;ami)Uy;{4!-^2PFAZb9OfoFU-}e;}N=$_XSr
zdSOC6Wc&E7+IoR6hH=X{#?l||38{U+*p64@<FFS^$B1p{H}7+n2z=hmJG4xzT$qH+
z0Td7vhFP&9@G?uQt_W2k$G)qWWm82I(!%lFQF2QbdD3;Oc0!yAzkIK3*%(3h<J#&(
z<<8rKC6~OADo+hdPjwuXe?`&<KyWsSF`=z&7|7FGUu_1s2PC*}bMjQ;v;hmCJ+8YD
z9*<b1YVzBhIQNHSioKS}Y!Z(cfsZ&aA9+0}|3Mzl1cA#kp6|(I`EA3C_+j!e2ay3~
zKrD1XR-%?XYhU??JYjj9^9V^Ow0H>?3U6(>qT=suz6zA)a@+QJe|29jF@21NO>kt3
zSk^>EwAI}Osbb`MZZj0PsvaU#txD3*B)Y8y+J8<v&wn?9mm~!IoMqeJVpq`E(MLq1
zl!Q%gtJ3UuxKXvQRMVrbPk-%5D#^?mX+UwX`ej;aivYe;-8->y-9|m7iwx-N9$u~0
Y4%LEs_78>rL_S<u2r5OUra5CE?sQ`Y>;M1&

diff --git a/src/index.org b/src/index.org
index 74d5029..bc963b3 100644
--- a/src/index.org
+++ b/src/index.org
@@ -36,3 +36,7 @@ priority:
    compressed one.
 
 I talk about more details [[file:./posts/new-blog.org][here]].
+
+#+begin_export html
+<a href="https://validator.w3.org/feed/check.cgi?url=https%3A%2F%2Fher.esy.fun%2Frss.xml">[Valid RSS]</a>
+#+end_export