fix cabal dependencies for the web command
This commit is contained in:
		
							parent
							
								
									cf0243201f
								
							
						
					
					
						commit
						2d42279cd3
					
				| @ -10,10 +10,10 @@ import Data.Time.Clock | ||||
| import Data.Time.Format | ||||
| import System.Locale | ||||
| import Control.Concurrent | ||||
| import qualified Text.StringTemplate as T | ||||
| import Codec.Compression.GZip (compress) | ||||
| import qualified Data.ByteString.Lazy.Char8 as B | ||||
| import Data.ByteString.UTF8 (fromString, toString) | ||||
| -- import qualified Text.StringTemplate as T | ||||
| -- import Codec.Compression.GZip (compress) | ||||
| -- import Data.ByteString.UTF8 (fromString) | ||||
| import HAppS.Server | ||||
| import System.Cmd (system) | ||||
| import System.Info (os) | ||||
| @ -124,9 +124,9 @@ setContentType = setHeader "Content-Type" | ||||
| setFilename :: String -> Response -> Response | ||||
| setFilename = setHeader "Content-Disposition" . \fname -> "attachment: filename=\"" ++ fname ++ "\"" | ||||
| 
 | ||||
| gzipBinary :: Response -> Response | ||||
| gzipBinary r@(Response {rsBody = b}) =  setHeader "Content-Encoding" "gzip" $ r {rsBody = compress b} | ||||
| -- gzipBinary :: Response -> Response | ||||
| -- gzipBinary r@(Response {rsBody = b}) =  setHeader "Content-Encoding" "gzip" $ r {rsBody = compress b} | ||||
| 
 | ||||
| acceptsZip :: Request -> Bool | ||||
| acceptsZip req = isJust $ M.lookup (fromString "accept-encoding") (rqHeaders req) | ||||
| -- acceptsZip :: Request -> Bool | ||||
| -- acceptsZip req = isJust $ M.lookup (fromString "accept-encoding") (rqHeaders req) | ||||
| 
 | ||||
|  | ||||
| @ -33,7 +33,7 @@ Executable hledger | ||||
| 
 | ||||
|   Build-Depends:  base, containers, haskell98, directory, parsec, | ||||
|                   regex-compat, regexpr>=0.5.1, old-locale, time, | ||||
|                   HUnit, mtl, bytestring, filepath | ||||
|                   HUnit, mtl, bytestring, filepath, process | ||||
| 
 | ||||
|   Other-Modules:  BalanceCommand | ||||
|                   Options | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user