diff --git a/CHANGELOG.md b/CHANGELOG.md index 8cd30b3..98c33b6 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -6,6 +6,9 @@ Notable changes to this project are documented in this file. The format is based Breaking changes: - Move `getBoundingClientRect` to `purescript-web-dom` (#73 by @JordanMartinez) +- Drop duplicated `set/getClassName` and `classList` (#74 by @JordanMartinez) + + These three entities are already defined in `purescript-web-dom` New features: diff --git a/src/Web/HTML/HTMLElement.js b/src/Web/HTML/HTMLElement.js index 2349404..65e2431 100644 --- a/src/Web/HTML/HTMLElement.js +++ b/src/Web/HTML/HTMLElement.js @@ -57,28 +57,6 @@ export function setDir(dir) { // ---------------------------------------------------------------------------- -export function className(elt) { - return function () { - return elt.className; - }; -} - -export function setClassName(className) { - return function (elt) { - return function () { - elt.className = className; - }; - }; -} - -export function classList(element) { - return function () { - return element.classList; - }; -} - -// ---------------------------------------------------------------------------- - export function hidden(elt) { return function () { return elt.hidden; diff --git a/src/Web/HTML/HTMLElement.purs b/src/Web/HTML/HTMLElement.purs index d310cd3..0311f82 100644 --- a/src/Web/HTML/HTMLElement.purs +++ b/src/Web/HTML/HTMLElement.purs @@ -18,9 +18,6 @@ module Web.HTML.HTMLElement , setLang , dir , setDir - , className - , setClassName - , classList , hidden , setHidden , tabIndex @@ -50,7 +47,6 @@ import Data.Nullable (Nullable, toMaybe) import Effect (Effect) import Unsafe.Coerce (unsafeCoerce) import Web.DOM (ChildNode) -import Web.DOM.DOMTokenList (DOMTokenList) import Web.DOM.Element (Element) import Web.DOM.Internal.Types (Node) import Web.DOM.NonDocumentTypeChildNode (NonDocumentTypeChildNode) @@ -106,11 +102,6 @@ foreign import setLang :: String -> HTMLElement -> Effect Unit foreign import dir :: HTMLElement -> Effect String foreign import setDir :: String -> HTMLElement -> Effect Unit -foreign import className :: HTMLElement -> Effect String -foreign import setClassName :: String -> HTMLElement -> Effect Unit - -foreign import classList :: HTMLElement -> Effect DOMTokenList - foreign import hidden :: HTMLElement -> Effect Boolean foreign import setHidden :: Boolean -> HTMLElement -> Effect Unit