···201201 Return.singleton model
202202203203 toProcess ->
204204- processSpecific toProcess model
204204+ if model.isOnline then
205205+ processSpecific toProcess model
206206+207207+ else
208208+ toProcess
209209+ |> List.filter Sources.worksOffline
210210+ |> (\s ->
211211+ case s of
212212+ [] ->
213213+ Return.singleton model
214214+215215+ _ ->
216216+ processSpecific s model
217217+ )
205218206219207220processSpecific : List Source -> Manager