diff options
| author | Joris | 2017-11-15 23:50:44 +0100 |
|---|---|---|
| committer | Joris | 2017-11-16 09:55:55 +0100 |
| commit | 42e94a45e26f40edc3ad71b1e77a4bf47c13fd3d (patch) | |
| tree | 012045906e4404c64a8914d60be75fcf809609c7 /client/src/View/Header.hs | |
| parent | 5a63f7be9375e3ab888e4232dd7ef72c2f1ffae1 (diff) | |
| download | budget-42e94a45e26f40edc3ad71b1e77a4bf47c13fd3d.tar.gz budget-42e94a45e26f40edc3ad71b1e77a4bf47c13fd3d.tar.bz2 budget-42e94a45e26f40edc3ad71b1e77a4bf47c13fd3d.zip | |
Add dynamic pages
Diffstat (limited to 'client/src/View/Header.hs')
| -rw-r--r-- | client/src/View/Header.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/View/Header.hs b/client/src/View/Header.hs index 711ba80..7afd9bd 100644 --- a/client/src/View/Header.hs +++ b/client/src/View/Header.hs @@ -65,7 +65,7 @@ signOutButton :: forall t m. MonadWidget t m => m (Event t ()) signOutButton = do rec signOut <- Component.button $ ButtonIn - { Component._buttonIn_class = "signOut item" + { Component._buttonIn_class = R.constDyn "signOut item" , Component._buttonIn_content = Icon.signOut , Component._buttonIn_waiting = waiting } |