Commit 46bf9036 authored by Mart Lubbers's avatar Mart Lubbers

Destroy the pikaday object on removal (Closes #167)

parent 19a10804
......@@ -25,7 +25,11 @@ where
//Defer further action till after the field is created...
# (cb,world) = jsWrapFun (\a w -> (jsNull,initDOMEl me w)) world
# world = ((me .# "initDOMEl") .= cb) world
# (cb,world) = jsWrapFun (\a w -> (jsNull,beforeRemove me w)) world
# world = ((me .# "beforeRemove") .= cb) world
= world
beforeRemove me = snd o (me .# "picker" .# "destroy" .$ [])
initDOMEl me world
//Load javascript library first, then start
......
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