From e77dca0692684c7379ac7cd448be176d2eca1b02 Mon Sep 17 00:00:00 2001
From: Nicolas Perriault <nicolas@perriault.net>
Date: Thu, 27 Apr 2017 19:48:35 +0200
Subject: [PATCH] Fix #76: Update current view when using timeline option.

---
 src/Model.elm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/Model.elm b/src/Model.elm
index 5633f94..8924437 100644
--- a/src/Model.elm
+++ b/src/Model.elm
@@ -740,7 +740,11 @@ update msg model =
                         []
 
         UseGlobalTimeline flag ->
-            { model | useGlobalTimeline = flag } ! []
+            let
+                newModel =
+                    { model | useGlobalTimeline = flag }
+            in
+                { model | currentView = preferredTimeline newModel } ! []
 
         ClearOpenedAccount ->
             { model | currentView = preferredTimeline model } ! []