From b7c57fd1b66e030fe82b52a7cc8d243df833cf73 Mon Sep 17 00:00:00 2001
From: "Nicolas Schoemaeker (nschoe)" <ns.schoe@gmail.com>
Date: Sat, 20 Dec 2014 19:14:12 +0100
Subject: [PATCH] Added favicon and RSS feed

---
 css/default.css                             |   2 +-
 favicon.gif                                 | Bin 0 -> 2187 bytes
 messages/2014-12-19-nschoes_labs_opening.md |   7 +++
 site.hs                                     |  47 ++++++++++----------
 templates/default.html                      |   2 +
 5 files changed, 33 insertions(+), 25 deletions(-)
 create mode 100644 favicon.gif
 create mode 100644 messages/2014-12-19-nschoes_labs_opening.md

diff --git a/css/default.css b/css/default.css
index f56c351..fba59de 100644
--- a/css/default.css
+++ b/css/default.css
@@ -176,7 +176,7 @@ h4:before {
 #last_messages h3 {
     background: url("/images/envelope.png") no-repeat;
     background-size: contain;
-    padding-left: 50px;
+    padding-left: 60px;
 }
 
 .recent_article, .article {
diff --git a/favicon.gif b/favicon.gif
new file mode 100644
index 0000000000000000000000000000000000000000..811826824323ce6a9b1f7c5a7cd5d09dde8f829a
GIT binary patch
literal 2187
zcmeIx`9Bkk1Hf@J$B>+J%sot#q?9I-ZP?~&Qaz4G59O?sqH?6~+;bnBm?QIK(}s95
z#`ATXV@kAAjC}Es`@Zkz`}`B%pT6%u;q!WZFgP28sTV<jATUi7_%8qeASfsZ1OkPG
zgoK5KMMOkIMMXg%kc5Q9$&)9gq@-kIWMpM!<>ch#<>kR(u!4euqN1Xbl9IBrG6Vuq
zQBhG-Q&U%0*U-?=($a!Lq1xKoIyySKy1FnJOixcwUtj;yrAr6|!pzLf+}!-il`9q&
z7M7NlNF)-4LZQ)UD=RB&Yik=D8w>`6#bR+doSmJWqod=sYuB8eop0Q@ar5R)S65dz
zH#c{8cTZ1GZ*T9=(9p23u$M1i5(tE-sHo`Z=-AlUxVX6Z`1pi`1R{}`n3$NFnwplD
zmY$xTnVCr<k;r6nc6N47P7Z}a$;->j&(Eh)sl~;`OeV9uyu6~Kg2iIh)YR10*0R~`
zhK7d5#>S?mrsn46*4Eaxwzl^6b`FQr)z#JA-Oc54dwY97efreb*T>`WzJC2WFfj1#
z+qa>iAwHi!JUl!)Iyyc+J~=r#H8nLeGc!9oJ2y8sKR>^)u&}texV*f)va+(ey1KTu
zw!Xf;v9Ynaxw*Hux4*xCaBy&VczASlbo_t+lLA`1LI81rV*!JIPWa~u0nm}av6#FI
zjoKOmlGFdSyQ;W7L0TK7id`+@Br6%;8zKGy?Ml}~CwU`+O1Pv`XJzfV?|tl&4e$08
z;Hv4p`H0}T5pH#9Uy)^uxSB2N?dLaGlD<a|i}9rt|HigMc@h~T>Qa5LkvVWLMq0eo
zrMIW1?0dDOc?gARBuroj{nb-whAvL24_&YIEL%a2HU~)<IOPJ2#srZ&&=Yr*f<)r%
z#4mg@^QyQL^HA@viu|B>-v+p$#>T$sJI^-S6imTm3Nu%iE@v1f$v!`?PYL*rpP`r#
z8risJi^8g^<$>Ql_R~_0-ai^H4{rXMQgtbCtXyvgme!95oXk-^I-6iXF$ww1b6#Fr
z*xz2%=LZB|ojJT1+A$Gee064|!DnN!;unvI!9<1s1jT^Ak4C<j+UCC$+1%y>muvdf
zpNhI}yZN)#a``Vr267-V58$O5VSR_sDRE6+{u%KMa402612*_0nl0=!8gpvzxqCRR
z-bFfv#(k@lN&~kD-RpvL+Qr~ja33<>5l73uNzb5>-Q7%SnNqWe*AL9-HeM*aX8&j&
zJwRyE4|U549ia-11?GoBt7Ni@qFgeFw9Fa6>-%$z%oqmJB_q~1o(3ysDKlk~Ssl1Z
zzo+UUdL`|VlU`XSJa!?qfDU8Wz}B$zM}E)?9dC|kj?d;w0Bbf>RDLIaupAP}_j{`~
zk=sxG6LQNEOMFH52dBJx_8M8KAfZ&rs`W2>M1hdYSiw$ZGDUg2uENyute!x&c4F8B
zlT{OrXH9obRpcw)j!=6iAg@Vj+FdHEY(5ZFHEP-2GFxU31NKX+Kwe%Q?a~;7RgS##
zLKWDhfV|-M!DN4^I?3sBVPj<!SD}ssXJk|sWg@^mB(>I(^qe14D!IY$0@j?Z$g|}r
z{LVq)9fMN)SQJEhZVBn(Kfdt=k2$mX^?JUyap3t=A;414CA@&3=fBRF41!WTw!Zr$
zR6OGgUohgyEILr7<xrIY@7{GK-3U3lE38_G=g|y3`sJTa!+8U`_dN`9ho9taV=(fg
zxg%nq&n*5ZP*?pt+PRl1J=S4CofxY^F?Z3#uD3h&DP4PYHdY+TklCEmR^_v=Yo~XS
z)FO!|;1${M%V<W<tEVW_uKio{b?t`rUSw@~)>@QT)6aRu%(9^+kxj?L<yJ+e(`wQ9
zi29=SM6%wN^yb0HLb>dCB(+v0O=ddb@o)VHMY}Bv>jZ#?n3ZLVAS8$Yyx<8C4HZnu
zxMuuwT~h3J$mycGK66Xp*l!T3u+v3`9zQ?jh}m+rcPITS<YV&K!?hMJA>e*ffM!Hh
z4Qa5k@(G+HA*v|b)>&r{JK6!BNVG*z<hEumHj{7?D(h`q-5FXr(PIwK=jd1?KxE!f
zF*@8oSA(uY3`3sa@xK6xq4vf&d#<cxuz74thRL-TSa}ZwNdo%#p=rSf;N?>?hT=}J
zmj@rDhwpNT1&`04X1NLfn6XOz_{X`S^J3t0M7nv8b+WRU_w9ym8Ka**u~rZ4waz{1
z=B66z+!wN!(*<Q=AijQ(D0i^b9aFw%mUbRTLhtMZu7Qx10fp;sIGQ$Xu~s#?5e};E
z_1HA~wY2Pw-ZSW|5A_Q?twwUP(y_=#63CdqNx|wL%OVl)IoZq+q9h!C#jevQ55}P1
z3#a}2+@3FaG%&<3uuZJP7otO9xcb`m@8)1lVnI?a1e9VAKHh{{3<24pRBW9R3@-p*
zq$G+$_WF~qvjE}|=~#>{FDq}O<dg%$_Lm;st3NkrMyU*YKU?SAwi3FYtC*w1^{m1q
Tj<&@i);b(=BO9-yDPZ<D@%G(^

literal 0
HcmV?d00001

diff --git a/messages/2014-12-19-nschoes_labs_opening.md b/messages/2014-12-19-nschoes_labs_opening.md
new file mode 100644
index 0000000..b84980a
--- /dev/null
+++ b/messages/2014-12-19-nschoes_labs_opening.md
@@ -0,0 +1,7 @@
+---
+title: nschoe's labs opening!
+---
+
+Just to tell you that I finally have my own place on the Internet. I will try to share and explain as much as I can.  
+I will be talking primarily about Haskell, Artificial Intelligence and WebRTC.  
+Thanks for coming by! 
\ No newline at end of file
diff --git a/site.hs b/site.hs
index 7ff925f..de77c78 100644
--- a/site.hs
+++ b/site.hs
@@ -15,7 +15,11 @@ main = hakyll $ do
         route   idRoute
         compile compressCssCompiler
 
-    match (fromList ["about.md", "contact.markdown", "haskell.md", "ai.md", "webrtc.md"]) $ do
+    match "favicon.gif" $ do
+        route idRoute
+        compile copyFileCompiler
+
+    match (fromList ["about.md", "haskell.md", "ai.md", "webrtc.md"]) $ do
         route   $ setExtension "html"
         compile $ pandocCompiler
             >>= loadAndApplyTemplate "templates/default.html" defaultContext
@@ -25,6 +29,7 @@ main = hakyll $ do
             route $ setExtension "html"
             compile $ pandocCompiler
                 >>= loadAndApplyTemplate "templates/article.html" articleCtx
+                >>= saveSnapshot "renderedArticles"
                 >>= loadAndApplyTemplate "templates/default.html" articleCtx
                 >>= relativizeUrls
 
@@ -51,21 +56,6 @@ main = hakyll $ do
         compile $ getResourceBody
                 >>= relativizeUrls
 
-    -- create ["archive.html"] $ do
-    --     route idRoute
-    --     compile $ do
-    --         articles <- recentFirst =<< loadAll "articles/*"
-    --         let archiveCtx =
-    --                 listField "articles" articlesCtx (return articles) `mappend`
-    --                 constField "title" "Archives"            `mappend`
-    --                 defaultContext
-
-    --         makeItem ""
-    --             >>= loadAndApplyTemplate "templates/archive.html" archiveCtx
-    --             >>= loadAndApplyTemplate "templates/default.html" archiveCtx
-    --             >>= relativizeUrls
-
-
     match "index.html" $ do
         route idRoute
         compile $ do
@@ -80,6 +70,14 @@ main = hakyll $ do
                 >>= loadAndApplyTemplate "templates/default.html" indexCtx
                 >>= relativizeUrls
 
+    create ["rss.xml"] $ do
+        route idRoute
+        compile $ do
+            let feedCtx = articleCtx `mappend` bodyField "description"
+            articles <- fmap (take 10) . recentFirst =<<
+                loadAllSnapshots "articles/*" "renderedArticles"
+            renderRss nschoeslabsRSSConfig feedCtx articles
+
     match "templates/*" $ compile templateCompiler
 
 
@@ -89,12 +87,13 @@ articleCtx =
     dateField "date" "%B %e, %Y" `mappend`
     defaultContext
 
--- lastTwoArticlesCtx :: Context String
--- lastTwoArticlesCtx =
---     dateField "date" "%b %e, %Y" `mappend`
---     defaultContext
+--------------------------------------------------------------------------------
 
--- lastMessagesCtx :: Context String
--- lastMessagesCtx =
---     dateField "date" "%b %e, %Y" `mappend`
---     defaultContext
\ No newline at end of file
+nschoeslabsRSSConfig :: FeedConfiguration
+nschoeslabsRSSConfig = FeedConfiguration
+    { feedTitle       = "nschoe's labs"
+    , feedDescription = "Haskell, Artificial Intelligence and WebRTC."
+    , feedAuthorName  = "Nicolas SCHOEMAEKER"
+    , feedAuthorEmail = "ns.schoe@gmail.com"
+    , feedRoot        = "http://www.nschoeslabs.com"
+    }
\ No newline at end of file
diff --git a/templates/default.html b/templates/default.html
index 62bf5e5..cedae10 100644
--- a/templates/default.html
+++ b/templates/default.html
@@ -5,6 +5,8 @@
         <meta author="Nicolas SCHOEMAEKER (nschoe) <ns.schoe _at_ gmail _dot_ com">
         <meta description="My place on the Internet to share and explain what I know">
 
+        <link rel="icon" href="favicon.gif" type="image/gif" sizes="128x128"> 
+
         <title>nschoe's labs - $title$</title>
         <link href='http://fonts.googleapis.com/css?family=Source+Sans+Pro' rel='stylesheet' type='text/css'>
         <link href='http://fonts.googleapis.com/css?family=Dancing+Script' rel='stylesheet' type='text/css'>