Christian/Johnny
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Removed some unneeded spaces

Browse Source
This commit is contained in:
Christian 2022-05-04 11:45:49 +02:00
parent bf2d2e4256
commit b41f999323
2 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/Main.elm
View File

@ -25,8 +25,8 @@ import File.Download as Download
-- PC Stuff
import PC.Types exposing (..)
import PC.PC as PC
import PC.Json
import PC.PC as PC
import PC.Json
import PC.Helpers exposing (..)
-- Note that general Stuff is at the end of the document
@ -287,7 +287,7 @@ cmd_up_lStorage_n_Scroller model =
Cmd.batch
[ cmd_up_lStorage model
, cmd_scoller model
]
]
-- ###############################################################################
-- ###############################################################################
@ -329,15 +329,15 @@ doDecodeModel jText =
_ -> Nothing
in
jText
|> JD.decodeString modelDecoder
|> JD.decodeString modelDecoder
|> error2maybe
modelDecoder : JD.Decoder Model
modelDecoder =
modelDecoder =
let
mainDecoder : String -> JD.Decoder Model
mainDecoder version =
if (version == pcModelVersion) then
if (version == "4" || version == "3") then
JD.map2
(\a b -> Model a b [] False Waiting Waiting initDragDrop False )
( JD.field "pc_model" PC.Json.pcModelDecoder )

4
src/PC/Update.elm
View File

@ -11,9 +11,9 @@ import PC.Helpers exposing (..)
pc_update : PC_Msg -> PC_Model -> (PC_Model, PC_AfterUpdateAction)
pc_update msg model =
case msg of
PM_B_UCycleStep ->
PM_B_UCycleStep ->
let (new_model, reqAlert) = uStepPC model
in
in
( new_model
, if reqAlert == True then PUA_Alert
else if model.pc.uCounter == 0 then PUA_Storage_And_Scroller