Commit db07796b authored by Steffen Michels's avatar Steffen Michels

Merge branch 'html-placeholder-attr' into 'master'

Add PlaceholderAttr to Text.HTML

See merge request !200
parents 3d39d1cb 9408e411
Pipeline #14543 passed with stage
in 1 minute and 6 seconds
......@@ -205,6 +205,7 @@ import StdString, Data.Maybe
| OnselectAttr !String
| OnsubmitAttr !String
| OnunloadAttr !String
| PlaceholderAttr !String
| ProfileAttr !String
| PromptAttr !String
| ReadonlyAttr
......
......@@ -208,6 +208,7 @@ attrSize (OnresetAttr a) = 11 + (escapedSize a)
attrSize (OnselectAttr a) = 12 + (escapedSize a)
attrSize (OnsubmitAttr a) = 12 + (escapedSize a)
attrSize (OnunloadAttr a) = 12 + (escapedSize a)
attrSize (PlaceholderAttr a) = 15 + (escapedSize a)
attrSize (ProfileAttr a) = 11 + (escapedSize a)
attrSize (PromptAttr a) = 10 + (escapedSize a)
attrSize (ReadonlyAttr) = 20
......@@ -457,6 +458,7 @@ serializeAttr (OnresetAttr a) s i = writeAttr "onreset" a s i
serializeAttr (OnselectAttr a) s i = writeAttr "onselect" a s i
serializeAttr (OnsubmitAttr a) s i = writeAttr "onsubmit" a s i
serializeAttr (OnunloadAttr a) s i = writeAttr "onunload" a s i
serializeAttr (PlaceholderAttr a) s i = writeAttr "placeholder" a s i
serializeAttr (ProfileAttr a) s i = writeAttr "profile" a s i
serializeAttr (PromptAttr a) s i = writeAttr "prompt" a s i
serializeAttr (ReadonlyAttr) s i = writeAttr "readonly" "readonly" s i
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment