Home Explore Help
Sign In
compsci-industry
/
TechEmpower.FrameworkBenchmarks
mirror of https://github.com/TechEmpower/FrameworkBenchmarks.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* screwed up with defaultLayout. Let’s see if the benchmark accepts this.

Saurabh Nanda 9 years ago
parent
5439a1c3f5
commit
f2c4af738c
1 changed files with 0 additions and 5 deletions
Split View Show Diff Stats
  1. 0 5
      frameworks/Haskell/yesod-postgres/bench/src/Main.hs

+ 0 - 5
frameworks/Haskell/yesod-postgres/bench/src/Main.hs
View File 

@@ -174,11 +174,6 @@ getFortunesR = do
 
   fortunesFromDb <- runPg $ selectList [] []
 
   let fortunes = sortBy (compare `on` fortuneMessage . entityVal) $ (Entity (toSqlKey 0) Fortune{fortuneMessage="Additional fortune added at request time."}):fortunesFromDb
 
   defaultLayout [whamlet|
 
-                  $doctype 5
 
-                  <html>
 
-                    <head>
 
-                      <title>Fortunes 
-                    <body>
 
                       <table>
 
                         <tr>
 
                           <th>id