+13 -4

src/Applications/Brain/User/State.elm

reviewed

··· 146 146 ----------------------------------------- 147 147 -- z. Data 148 148 ----------------------------------------- 149 149 + SaveAllHypaethralData -> 150 150 + saveAllHypaethralData 151 151 + 149 152 SaveHypaethralDataSlowly a -> 150 153 saveHypaethralDataSlowly a 151 154 ··· 731 734 732 735 733 736 removeEncryptionKey : Manager 734 734 - removeEncryptionKey model = 735 735 - Alien.AuthSecretKey 737 737 + removeEncryptionKey = 738 738 + [ Alien.AuthSecretKey 736 739 |> Alien.trigger 737 740 |> Ports.removeCache 738 738 - |> return model 739 739 - |> andThen saveAllHypaethralData 741 741 + 742 742 + -- 743 743 + , SaveAllHypaethralData 744 744 + |> UserMsg 745 745 + |> do 746 746 + ] 747 747 + |> Cmd.batch 748 748 + |> Return.communicate 740 749 741 750 742 751 secretKeyFabricated : Manager

+1

src/Applications/Brain/User/Types.elm

reviewed

··· 50 50 ----------------------------------------- 51 51 -- z. Data 52 52 ----------------------------------------- 53 53 + | SaveAllHypaethralData 53 54 | SaveHypaethralDataBits (List HypaethralBit) 54 55 | SaveHypaethralDataSlowly (Debouncer.Msg HypaethralBit) 55 56 | SaveNextHypaethralBit