Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

* binding to replaceWith

  • Loading branch information...
commit 457363e50985b4255afdf6145a304befd4fe6c46 1 parent 51ba75a
@spockz authored
Showing with 8 additions and 0 deletions.
  1. +8 −0 uhc-jscript/src/Language/UHC/JScript/JQuery/JQuery.hs
View
8 uhc-jscript/src/Language/UHC/JScript/JQuery/JQuery.hs
@@ -215,6 +215,14 @@ appendString jq str = do jq' <- jQuery str
foreign import jscript "%1.append(%*)"
_append :: JQuery -> JQuery -> IO ()
+replaceWith :: JQuery -> JQuery -> IO ()
+replaceWith = _replaceWith
+
+foreign import jscript "%1.replaceWith(%2)"
+ _replaceWith :: JQuery -> JQuery -> IO ()
+
+replaceWithString :: JQuery -> String -> IO ()
+replaceWithString jq s = jQuery s >>= replaceWith jq
-------------------------------------------------------------------------------
-- Dynamic loading
Please sign in to comment.
Something went wrong with that request. Please try again.