Strip padding from base64

This commit is contained in:
Emi Simpson 2023-07-06 13:30:05 -04:00
parent 5e89527a0d
commit bc7227c5bd
Signed by: Emi
GPG key ID: A12F2C2FFDC3D847

View file

@ -28,7 +28,7 @@ import List.Extra exposing (elemIndex, getAt)
import Maybe exposing (andThen)
import Maybe.Extra exposing (isJust)
import Result exposing (toMaybe)
import String exposing (fromInt, isEmpty, toLower)
import String exposing (fromInt, isEmpty, replace, toLower)
import String.Extra exposing (isBlank)
import Svg exposing (path, Svg, svg)
import Svg.Attributes exposing (d, fill, height, stroke, viewBox, width)
@ -394,6 +394,7 @@ save model =
|> CE.encode
|> B64E.bytes
|> B64E.encode
|> replace "=" ""
|> (++) "#"
|> pushUrl model.browserKey