Changeset 1155

Show
Ignore:
Timestamp:
11/05/07 19:26:33 (7 years ago)
Author:
jknaoya
Message:

lang/haskell/blosxkel/head.html,
lang/haskell/blosxkel/blosxkel.hs:

ちゃんとソートするようにしました

Location:
lang/haskell/blosxkel
Files:
2 modified

Legend:

Unmodified
Added
Removed
  • lang/haskell/blosxkel/blosxkel.hs

    r1152 r1155  
    8787    ; ct <- liftIO $ fillFlavour "content_type" "html" [] 
    8888    ; ch <- liftIO $ fillFlavour "head"  "html" [("title", "hogehoge")] 
    89     ; cs <- liftIO $ mapM applyStory entries 
     89    ; cs <- liftIO $ mapM applyStory $ take 7 $ reverse $ sortBy (\a b -> compare (time a) (time b)) entries 
    9090    ; cf <- liftIO $ fillFlavour "foot"  "html" [("title", "hogehoge")] 
    9191    ; setHeader "Content-Type" ct 
  • lang/haskell/blosxkel/head.html

    r1152 r1155  
    11<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> 
    22<html xmlns="http://www.w3.org/1999/xhtml"> 
    3         <head> 
    4                 <title>$title</title> 
    5                  
    6                 <link rel="stylesheet" type="text/css" href="/base.css" media="screen,tv"/> 
    7                 <link rel="stylesheet" type="text/css" href="/site.css" media="screen,tv,projection" title="site"/> 
    8                 <link rel="meta" type="application/rdf+xml" title="FOAF" href="http://lowreal.net/cho45/foaf"/> 
     3    <head> 
     4        <title>$title</title> 
    95 
    10                 <link rev="made" href="mailto:cho45@lowreal.net"/> 
    11                 <link rel="shortcut icon" href="/favicon.ico" type="image/x-icon"/> 
     6        <style type="text/css"> 
     7            body { 
     8                background: #fff; 
     9                color: #555; 
     10                padding: 0 10%; 
     11                line-height: 1.75; 
     12            } 
    1213 
    13                 <!-- <script type="text/javascript" src="/site-script.js"></script> --> 
    14         </head> 
    15         <body> 
    16                 <div id="whole"> 
    17                         <h1 id="top"><a href="/"></a></h1> 
     14            var { 
     15                text-decoration: underline; 
     16                color: #666; 
     17            } 
    1818 
    19                         <div id="content"> 
     19            hr { 
     20                border-style: solid; 
     21                border-width: 1px 0 0; 
     22                border-color: #eee; 
     23                height: 1px; 
     24                margin: 1em 0; 
     25            } 
     26 
     27            .all { 
     28                width: 45em; 
     29            } 
     30 
     31            a:link { 
     32                color: #d06c6b; 
     33            } 
     34 
     35            a:visited { 
     36                color: #b44e4d; 
     37            } 
     38 
     39            a:hover { 
     40                text-decoration: none; 
     41            } 
     42 
     43            h1, h2, h3 { 
     44                font-weight: normal; 
     45            } 
     46 
     47            .hentry { 
     48                border-top: 1px solid #ddd; 
     49                padding: 1em 0; 
     50            } 
     51 
     52            h3 { 
     53                color: #d06c6b; 
     54                margin: 0 0 1em 0; 
     55            } 
     56 
     57            dl.information { 
     58                margin: 0; 
     59                color: #ccc; 
     60                font-size: 80%; 
     61                text-align: right; 
     62                line-height: 1.33; 
     63            } 
     64 
     65            dt { 
     66                margin: 0 13em 0 0; 
     67                padding: 0; 
     68            } 
     69 
     70            dd { 
     71                overflow: hidden; 
     72                white-space: nowrap; 
     73                padding: 0; 
     74                margin: -1.33em 0 0 0; 
     75            } 
     76 
     77            #top a:link, 
     78            #top a:visited, 
     79            #top a:hover, 
     80            #top a { 
     81                text-decoration: none; 
     82            } 
     83 
     84            #footer { 
     85                font-size: 80%; 
     86                color: #999; 
     87                text-align: center; 
     88            } 
     89        </style> 
     90    </head> 
     91    <body> 
     92        <div class="all"> 
     93            <h1 id="top"><a href="/">$title</a></h1> 
     94 
     95            <div id="content">