freckle-app 1.6.0.1 → 1.6.0.2
raw patch · 4 files changed
+9/−4 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGELOG.md +5/−1
- freckle-app.cabal +1/−1
- library/Freckle/App/Bugsnag.hs +2/−1
- package.yaml +1/−1
CHANGELOG.md view
@@ -1,4 +1,8 @@-## [_Unreleased_](https://github.com/freckle/freckle-app/compare/v1.6.0.1...main)+## [_Unreleased_](https://github.com/freckle/freckle-app/compare/v1.6.0.2...main)++## [v1.6.0.2](https://github.com/freckle/freckle-app/compare/v1.6.0.1...v1.6.0.2)++- Strip query string from URLs used to group timeout exceptions in Bugsnag. ## [v1.6.0.1](https://github.com/freckle/freckle-app/compare/v1.6.0.0...v1.6.0.1)
freckle-app.cabal view
@@ -1,6 +1,6 @@ cabal-version: 1.18 name: freckle-app-version: 1.6.0.1+version: 1.6.0.2 license: MIT license-file: LICENSE maintainer: Freckle Education
library/Freckle/App/Bugsnag.hs view
@@ -29,6 +29,7 @@ import Data.Bugsnag.Settings import qualified Data.ByteString.Char8 as BS8 import Data.List (isInfixOf)+import qualified Data.Text as T import Database.PostgreSQL.Simple (SqlError(..)) import Database.PostgreSQL.Simple.Errors import qualified Freckle.App.Env as Env@@ -113,7 +114,7 @@ guard $ sqlState == "57014" req <- event_request event url <- request_url req- pure $ "SQL-Timeout-In-" <> url+ pure $ "SQL-Timeout-In-" <> T.takeWhile (/= '?') url sqlErrorGroupingHash :: SqlError -> Maybe Text sqlErrorGroupingHash err = do
package.yaml view
@@ -1,6 +1,6 @@ --- name: freckle-app-version: 1.6.0.1+version: 1.6.0.2 maintainer: Freckle Education category: Utils github: freckle/freckle-app