summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2021-10-03 09:31:32 +0200
committerYorhel <git@yorhel.nl>2021-10-03 09:31:32 +0200
commitb10dc978a01f07890e53322e04beffb525a9ac4a (patch)
treed6c427768977c0f76455d262e5114e1fbc8d323f
parent0d8c3915720f12fea32af99f9f4281e0464d8ca2 (diff)
StaffEdit: Fix clearing of Pixiv ID with backspace
-rw-r--r--elm/StaffEdit.elm2
1 files changed, 1 insertions, 1 deletions
diff --git a/elm/StaffEdit.elm b/elm/StaffEdit.elm
index 14dd1abb..a0c09c53 100644
--- a/elm/StaffEdit.elm
+++ b/elm/StaffEdit.elm
@@ -119,7 +119,7 @@ update msg model =
LWikidata n-> ({ model | l_wikidata= n }, Cmd.none)
LTwitter s -> ({ model | l_twitter = s }, Cmd.none)
LAnidb s -> ({ model | l_anidb = if s == "" then Nothing else String.toInt s }, Cmd.none)
- LPixiv s -> ({ model | l_pixiv = Maybe.withDefault model.l_pixiv (String.toInt s) }, Cmd.none)
+ LPixiv s -> ({ model | l_pixiv = Maybe.withDefault 0 (String.toInt s) }, Cmd.none)
Desc m -> let (nm,nc) = TP.update m model.desc in ({ model | desc = nm }, Cmd.map Desc nc)
AliasDel i -> (validate { model | alias = delidx i model.alias }, Cmd.none)