[blog] Add inline class on headers
This commit is contained in:
		
							parent
							
								
									28b00ef3d4
								
							
						
					
					
						commit
						80b6f2ca1f
					
				
					 1 changed files with 2 additions and 2 deletions
				
			
		| 
						 | 
				
			
			@ -72,7 +72,7 @@ renderEntries :: Bool -> [Entry] -> Maybe Html -> Html
 | 
			
		|||
renderEntries showAll entries pageLinks = [shamlet|
 | 
			
		||||
$forall entry <- toDisplay
 | 
			
		||||
  <article>
 | 
			
		||||
    <h2>
 | 
			
		||||
    <h2 .inline>
 | 
			
		||||
      <a href=#{linkElems entry} .unstyled-link>
 | 
			
		||||
        #{title entry}
 | 
			
		||||
    <aside .date>
 | 
			
		||||
| 
						 | 
				
			
			@ -115,7 +115,7 @@ showLinks Nothing lang = [shamlet|
 | 
			
		|||
renderEntry :: Entry -> Html
 | 
			
		||||
renderEntry e@Entry{..} = [shamlet|
 | 
			
		||||
<article>
 | 
			
		||||
  <h2>
 | 
			
		||||
  <h2 .inline>
 | 
			
		||||
    #{title}
 | 
			
		||||
  <aside .date>
 | 
			
		||||
    #{pack $ formatTime defaultTimeLocale "%Y-%m-%d" edate}
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue