From c114ff90f5589e4c97738893d2477eed7bd10f94 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Fri, 29 Dec 2017 20:04:08 +0100
Subject: [PATCH] Remove flattr things.

---
 haunt.scm                                    |  10 ----------
 posts/2010-03-28-elephly.skr                 |   1 -
 posts/2010-04-05-deng-hou.skr                |   1 -
 posts/2010-08-17-tianshi.skr                 |   1 -
 posts/2010-10-14-chinese-tune-mda-epiano.skr |   1 -
 static/images/flattr.png                     | Bin 1124 -> 0 bytes
 6 files changed, 14 deletions(-)
 delete mode 100644 static/images/flattr.png

diff --git a/haunt.scm b/haunt.scm
index f5a7025..91e9e81 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -32,15 +32,6 @@
                  (src ,(string-append "/images/posts/" meta))))
         '())))
 
-(define (flattr-snippet post)
-  (let ((meta (post-ref post 'flattr)))
-    (if meta
-        `(a (@ (href ,(string-append "http://flattr.com/thing/" meta)))
-            (img (@ (title "Flattr this")
-                    (alt   "Flattr this")
-                    (src "http://api.flattr.com/button/flattr-badge-large.png"))))
-        '())))
-
 ;; TODO: use license
 (define (license-snippet post)
   (let ((meta (post-ref post 'license)))
@@ -229,7 +220,6 @@ in parentheses."
                      ,(date->string* (post-date post))))
              ,(photo-snippet post)
              ,(post-sxml post)
-             ,(flattr-snippet post)
              ,(license-snippet post)
              (p (@ (class "back"))
                 (a (@ (href "/posts"))
diff --git a/posts/2010-03-28-elephly.skr b/posts/2010-03-28-elephly.skr
index 1372f9d..ad48662 100644
--- a/posts/2010-03-28-elephly.skr
+++ b/posts/2010-03-28-elephly.skr
@@ -1,7 +1,6 @@
 (post
  :title "The Elephly"
  :date (string->date* "2010-03-28 00:00")
- :flattr "390348/The-Elephly"
  :license "by-sa"
  :tags '("weird")
 
diff --git a/posts/2010-04-05-deng-hou.skr b/posts/2010-04-05-deng-hou.skr
index 274db87..faf9396 100644
--- a/posts/2010-04-05-deng-hou.skr
+++ b/posts/2010-04-05-deng-hou.skr
@@ -1,7 +1,6 @@
 (post
  :title "Deng Hou"
  :date (string->date* "2010-04-05 00:00")
- :flattr "325437"
  :tags '("music" "chinese")
 
  (p [When we were told that during our appearance on “Jia Ting Yan Bo
diff --git a/posts/2010-08-17-tianshi.skr b/posts/2010-08-17-tianshi.skr
index fe31247..1404145 100644
--- a/posts/2010-08-17-tianshi.skr
+++ b/posts/2010-08-17-tianshi.skr
@@ -1,7 +1,6 @@
 (post
  :title "“Tianshi” on Alto Stick"
  :date (string->date* "2010-08-17 00:00")
- :flattr "472329/Tianshi-on-Alto-Stick"
  :tags '("music" "video" "chinese" "alto stick" "chapman stick")
 
  (p [When my colleague was in the middle of preparations for getting
diff --git a/posts/2010-10-14-chinese-tune-mda-epiano.skr b/posts/2010-10-14-chinese-tune-mda-epiano.skr
index 3be00ba..5a25737 100644
--- a/posts/2010-10-14-chinese-tune-mda-epiano.skr
+++ b/posts/2010-10-14-chinese-tune-mda-epiano.skr
@@ -2,7 +2,6 @@
  :title "Chinese Tune / The mdaEPiano"
  :date (string->date* "2010-10-14 00:00")
  :photo "mda-epiano-coding.jpg"
- :flattr "72898/LV2-port-of-the-mda-E-Piano-VSTi"
  :tags '("code" "music")
 
  (p [In the past two days (actually, mornings and evenings) I have
diff --git a/static/images/flattr.png b/static/images/flattr.png
deleted file mode 100644
index 99cf2fdc647fdf3542b3fd258454144562d2b22d..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 1124
zcmeAS@N?(olHy`uVBq!ia0vp^0w65F1|<EHm6d=LTavfC%YQK7jQD;BD8gCb5m^kR
zJ;2!QWVRgx1M?zJ7sn8f<7-3wGlG2u=HI-#<kuhJt+p-!`ASuvRwyiD7u^_k(W$j5
zflo;+S66MJkZYz+ZdWMF#paHs8cF<%RwlV_2-69Zf8-j#a&dFJ(Bgz|Z_m}V|DBha
z927F=^qVtp&gK7mt8it(`uO&C^ZdL_MggY6<9y3wcVGMX^t7yd%Y7vm#TlJSf=Vt&
za>^ba+FL!}=H<(uFBb&ts4Tv`OjMg;iOZg<tC`z#7#R}&+0KYhWRx*zV79Bb6U)w&
zlz#nYPvPUQuOA;bmedhxYctFHVl(~a<KypM{`y+a9=UAhft@ir*KS$a&GX~u`&H+D
zd}r}R4Z*<b-Ao(A6ecn#B$XX7HlC;V_s7E@yUX?V>&MU8lP7D;@TiHk<IEX`V;qe)
z?(eVo`0wxI$1lHZ&DM{Xv%GX&eW_tod07-ULx7G}TJns;a^dRFmix!H-nu38p`D+>
z<(wDGhiARkYvW`)1q8o-ufBJ%Sy*`Gm8sg3C%5yLms>vwId$tLr=Vt9a!1&@HGF^n
zS}&T?(RpN%Yv+;8>GJk%(^jrLJ>5KK#cF1UlzHa<91IQK({0{gSlHPal9iE>^X35K
zQZLoDTkmZ@FA+Y|>(_oJUf!$BKfZ7tka%`}zP4^@sbd1qqH9hZ7cVZHB5<bsecLxD
zM=ux6#evzqoYCQ`4D11?eV*iaS>7z=V>s}+Pp<Z(Qc2Bozo*_V*}aS#%)WeVXS9%A
zG^PGKXJ-#*)2Ag@cn)k$n8poswBNaTwO>~3jO^H1+{qv%eRoTL-?E_S?R@;xy&l?T
zuQfe3<K}eHMNBg+r$3C;RC;DvystLctE1@U-6`>VUbtmF_e+o7y6V!_YuDHgURoNY
z#3h(_&TH1JUrU*ScGavEWqNRJZN;9|*+rLT<a|5We0O)TWm<OUty_0iZ_n>!nBl#2
z-n^Q9D?K?}TpChO&zLz=KgOV~Lqlx!G~3U=zjs-3Fth}mYISTmG3WHv>+>xi|5o=;
zGy4AC-1KQt$F->0KGP1nvUD7eJ)3u*FExCoX?DkqnbUPv+QxP;{M<7sC|l|L<}i*U
zjg4(>_u}sRFW<e(%}q-B_pe146*id7<e7ay=Gzp>1^e!Ko;|zy?fHPm+f*42tPbz!
zaN^<9TFc1bH^1+Ab#<-%Y+tqacW>{jO;8ZJcxy)T@t($dkMr}rHCqJMu3hf;_Liwp
zkj}q37ruR~sk^;RSpC`g>$5Z_7v54>G4=eL5FM*`zx(WKG*}i1Twh;a{{E)1Rn$M-
z|BQ@BIo>x__TL6(Th$WRh?11Vl2ohYqEsNoU}RuusB2)UYiJf?WMpMxVP$NhZD3(#
kVDKx~_ZNzW-29Zxv`X9>x(&X%0W~mqy85}Sb4q9e0KldHB>(^b

-- 
2.31.1