···1313import Return exposing (andThen, return)
1414import Return.Ext as Return exposing (communicate)
1515import Task
1616+import UI.Authentication.Common
1617import UI.Backdrop as Backdrop
1718import UI.Common.State as Common exposing (showNotification)
1819import UI.Demo as Demo
···122123123124 else
124125 Return.singleton m
126126+ )
127127+ |> andThen
128128+ (\m ->
129129+ let
130130+ notification =
131131+ Notifications.stickyWarning
132132+ """
133133+ Blockstack and Textile support will be removed in v3, please migrate to a different data-storage service (by exporting and then importing). v3 will add support for storing your data on [Fission](https://fission.codes).
134134+ """
135135+ in
136136+ case UI.Authentication.Common.extractMethod m.authentication of
137137+ Just Blockstack ->
138138+ Common.showNotificationWithModel m notification
139139+140140+ Just (Textile _) ->
141141+ Common.showNotificationWithModel m notification
142142+143143+ _ ->
144144+ Return.singleton m
125145 )
126146 |> andThen
127147 (\m ->