directoryGroupRecursive.diff

From aff6dc832026aadc5645f47e443d223411a62de5 Mon Sep 17 00:00:00 2001
From: Deepak Jois <[email protected]>
Date: Thu, 31 Dec 2009 23:41:23 -0800
Subject: [PATCH] Changing function call to use directoryGroupRecursive instead of directoryGroup to enable better organisation of layouts and templates

---
 Yst/Render.hs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/Yst/Render.hs b/Yst/Render.hs
index 32057a3..a4159d3 100644
--- a/Yst/Render.hs
+++ b/Yst/Render.hs
@@ -100,7 +100,7 @@ renderPage site page = do
   let menuHtml = renderNav (pageUrl page) (navigation site)
   let layout = fromMaybe (defaultLayout site) $ layoutFile page
   srcDir <- canonicalizePath $ sourceDir site
-  g <- directoryGroup srcDir
+  g <- directoryGroupRecursive srcDir
   attrs <- forM (pageData page) $ \(k, v) -> getData site v >>= \n -> return (k,n)
   todaysDate <- liftM utctDay getCurrentTime
   rawContents <-
-- 
1.6.4.2