web: more tweaks, style negative amounts
This commit is contained in:
		
							parent
							
								
									66b1ee9f11
								
							
						
					
					
						commit
						02f77415f0
					
				| @ -415,7 +415,9 @@ getLedgerPage = do | ||||
|   let args = appArgs app | ||||
|       fspec' = optsToFilterSpec opts args t | ||||
|       br = balanceReportAsHtml opts td $ balanceReport opts fspec' j | ||||
|       rr = registerReportAsHtml opts td $ registerReport opts fspec j | ||||
|       rr = if null a && null p | ||||
|             then nulltemplate | ||||
|             else registerReportAsHtml opts td $ registerReport opts fspec j | ||||
|       td = mktd{here=here, title="hledger", msg=msg, a=a, p=p} | ||||
|   hamletToRepHtml $ pageLayout td [$hamlet| | ||||
| %div.ledger | ||||
| @ -499,7 +501,10 @@ registerReportAsHtml _ td items = [$hamlet| | ||||
|        p' = if null p then "" else printf "&p=%s" p | ||||
| 
 | ||||
| --mixedAmountAsHtml = intercalate ", " . lines . show | ||||
| mixedAmountAsHtml = preEscapedString . intercalate "<br>" . lines . show | ||||
| mixedAmountAsHtml b = preEscapedString $ addclass $ intercalate "<br>" $ lines $ show b | ||||
|     where addclass = printf "<span class=\"%s\">%s</span>" c | ||||
|           c = case isNegativeMixedAmount b of Just True -> "negative amount" | ||||
|                                               _         -> "positive amount" | ||||
| 
 | ||||
| ---------------------------------------------------------------------- | ||||
| 
 | ||||
|  | ||||
| @ -12,7 +12,7 @@ body { margin:0; } | ||||
| .navlinkcurrent { font-weight:bold; } | ||||
| .nav2 { font-size:small; } | ||||
| #filterform { font-size:small; display:inline; margin-left:1em; } | ||||
| .filtering { background-color:#eee; font-weight:bold; } | ||||
| .filtering { background-color:#ddd; font-weight:bold; } | ||||
| #stopfilterlink { font-size:small; } | ||||
| .toprightlink { font-size:small; margin-left:1em; float:right; } | ||||
| #messages { color:red; background-color:#ffeeee; margin:0.5em;} | ||||
| @ -33,14 +33,15 @@ body { margin:0; } | ||||
| /* for -fweb610 */ | ||||
| /* #hledgerorglink, #helplink { float:right; margin-left:1em; } */ | ||||
| 
 | ||||
| .current { font-weight:bold; background-color:#eee; } | ||||
| .current { font-weight:bold; background-color:#ddd; } | ||||
| .description { padding-left:1em; } | ||||
| .account { white-space:nowrap; padding-left:1em; } | ||||
| .amount { white-space:nowrap; padding-left:1em; } | ||||
| .balance { white-space:nowrap; padding-left:1em; } | ||||
|  /* don't let fields get too small in emptyish reports */ | ||||
| .description { width:4em; } | ||||
| .account, .amount, .balance { width:2em; } | ||||
| .positive { } | ||||
| .negative { color:red; } | ||||
| /* .odd { background-color:#e8e8e8; } */ | ||||
| /* .even { background-color:#e8f8e8; } */ | ||||
| /* .even { background-color:#f0fff0; } */ | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user