diff options
author | Joris | 2020-01-04 17:25:29 +0100 |
---|---|---|
committer | Joris | 2020-01-04 17:25:29 +0100 |
commit | 1dfb85d3fd56d163fc854a8b3cf659d0ac39f639 (patch) | |
tree | d5dcaa229f266626ce2f00850c642fb76cbee44d /server/src/Persistence/Util.hs | |
parent | 316bda10c6bec8b5ccc9e23f1f677c076205f046 (diff) | |
download | budget-1dfb85d3fd56d163fc854a8b3cf659d0ac39f639.tar.gz budget-1dfb85d3fd56d163fc854a8b3cf659d0ac39f639.tar.bz2 budget-1dfb85d3fd56d163fc854a8b3cf659d0ac39f639.zip |
Search payments by cost too
Diffstat (limited to 'server/src/Persistence/Util.hs')
-rw-r--r-- | server/src/Persistence/Util.hs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/server/src/Persistence/Util.hs b/server/src/Persistence/Util.hs new file mode 100644 index 0000000..b7496c6 --- /dev/null +++ b/server/src/Persistence/Util.hs @@ -0,0 +1,11 @@ +module Persistence.Util + ( formatKeyForSearch + ) where + +import Data.Text (Text) + +formatKeyForSearch :: Text -> Text +formatKeyForSearch key = + "replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(lower(" + <> key + <> "), 'à', 'a'), 'â', 'a'), 'ç', 'c'), 'è', 'e'), 'é', 'e'), 'ê', 'e'), 'ë', 'e'), 'î', 'i'), 'ï', 'i'), 'ô', 'o'), 'ù', 'u'), 'û', 'u'), 'ü', 'u')" |