Turn down warning level a little
This commit is contained in:
@@ -85,7 +85,7 @@ app dbStructure conf reqBody req =
|
|||||||
then responseLBS status404 [] ""
|
then responseLBS status404 [] ""
|
||||||
else responseLBS status200 [contentTypeH] (cs body)
|
else responseLBS status200 [contentTypeH] (cs body)
|
||||||
else do
|
else do
|
||||||
let frm = toInteger $ rangeOffset range
|
let frm = rangeOffset range
|
||||||
to = frm + toInteger queryTotal - 1
|
to = frm + toInteger queryTotal - 1
|
||||||
contentRange = contentRangeH frm to (toInteger <$> tableTotal)
|
contentRange = contentRangeH frm to (toInteger <$> tableTotal)
|
||||||
status = rangeStatus frm to (toInteger <$> tableTotal)
|
status = rangeStatus frm to (toInteger <$> tableTotal)
|
||||||
|
|||||||
+1
-2
@@ -3,9 +3,8 @@ extra-deps:
|
|||||||
- hasql-0.19.3.3
|
- hasql-0.19.3.3
|
||||||
- Ranged-sets-0.3.0
|
- Ranged-sets-0.3.0
|
||||||
- packdeps-0.4.2.1
|
- packdeps-0.4.2.1
|
||||||
# Almost all warnings, plus minimal-imports for packunused
|
|
||||||
ghc-options:
|
ghc-options:
|
||||||
postgrest: -ddump-minimal-imports -Werror -Wall -fwarn-incomplete-uni-patterns -fwarn-incomplete-record-updates -fwarn-monomorphism-restriction -fwarn-auto-orphans -fwarn-missing-local-sigs -fwarn-missing-exported-sigs -fwarn-missing-import-lists -fwarn-identities
|
postgrest: -Werror -Wall -fwarn-monomorphism-restriction -fwarn-missing-exported-sigs -fwarn-identities
|
||||||
|
|
||||||
packages:
|
packages:
|
||||||
- '.'
|
- '.'
|
||||||
|
|||||||
Reference in New Issue
Block a user