@@ -5,7 +5,8 @@ import Prelude
55import Data.Maybe (Maybe (..))
66import Data.Monoid (guard )
77import Data.Nullable (notNull , null )
8- import Lumi.Components.Button (button , secondary )
8+ import Lumi.Components.Button as Button
9+ import Lumi.Components.Button (ButtonState (..), button , secondary )
910import Lumi.Components.Column (column_ )
1011import Lumi.Components.Modal (dialog , errorModal , modal )
1112import Lumi.Components.Size (Size (..))
@@ -53,7 +54,7 @@ docs = unit # make component
5354 , onRequestClose: self.setState _ { modalId = Nothing }
5455 , onActionButtonClick: notNull $ self.setState \state -> state { clicks = state.clicks + 1 }
5556 , actionButtonTitle: " Add clicks"
56- , actionButtonDisabled: false
57+ , actionButtonDisabled: Button.Enabled
5758 , size: Small
5859 , title: " Modal title -- Small"
5960 , variant: " "
@@ -78,7 +79,7 @@ docs = unit # make component
7879 , onRequestClose: self.setState _ { modalId = Nothing }
7980 , onActionButtonClick: notNull $ self.setState \state -> state { clicks = state.clicks + 1 }
8081 , actionButtonTitle: " Add clicks"
81- , actionButtonDisabled: true
82+ , actionButtonDisabled: Button.Disabled
8283 , size: Medium
8384 , title: " Modal title -- Medium"
8485 , variant: " "
@@ -100,7 +101,7 @@ docs = unit # make component
100101 , onRequestClose: self.setState _ { modalId = Nothing }
101102 , onActionButtonClick: notNull $ self.setState \state -> state { clicks = state.clicks + 1 }
102103 , actionButtonTitle: " Add clicks"
103- , actionButtonDisabled: false
104+ , actionButtonDisabled: Button.Enabled
104105 , size: Large
105106 , title: " Modal title -- Large"
106107 , variant: " "
@@ -129,7 +130,7 @@ docs = unit # make component
129130 , onRequestClose: self.setState _ { modalId = Nothing }
130131 , onActionButtonClick: notNull $ self.setState \state -> state { clicks = state.clicks + 1 }
131132 , actionButtonTitle: " Add clicks"
132- , actionButtonDisabled: false
133+ , actionButtonDisabled: Button.Enabled
133134 , size: ExtraLarge
134135 , title: " Modal title -- Extra Large"
135136 , variant: " "
@@ -175,7 +176,7 @@ docs = unit # make component
175176 , onRequestClose: self.setState _ { modalId = Nothing }
176177 , onActionButtonClick: notNull $ self.setState \state -> state { clicks = state.clicks + 1 }
177178 , actionButtonTitle: " Add clicks"
178- , actionButtonDisabled: false
179+ , actionButtonDisabled: Button.Enabled
179180 , size: Small
180181 , title: " Modal title -- Small"
181182 , variant: " "
@@ -200,7 +201,7 @@ docs = unit # make component
200201 , onRequestClose: self.setState _ { modalId = Nothing }
201202 , onActionButtonClick: notNull $ self.setState \state -> state { clicks = state.clicks + 1 }
202203 , actionButtonTitle: " Add clicks"
203- , actionButtonDisabled: false
204+ , actionButtonDisabled: Button.Enabled
204205 , size: Large
205206 , title: " Modal title -- Internall scrolling content"
206207 , variant: " internal-scrolling"
0 commit comments