summaryrefslogtreecommitdiff
path: root/deps/wse/src/wse_demo.erl
blob: 3f0c40ba316610cb85f5d6299322812bb025c86a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
%%%---- BEGIN COPYRIGHT -------------------------------------------------------
%%%
%%% Copyright (C) 2007 - 2014, Rogvall Invest AB, <tony@rogvall.se>
%%%
%%% This software is licensed as described in the file COPYRIGHT, which
%%% you should have received as part of this distribution. The terms
%%% are also available at http://www.rogvall.se/docs/copyright.txt.
%%%
%%% You may opt to use, copy, modify, merge, publish, distribute and/or sell
%%% copies of the Software, and permit persons to whom the Software is
%%% furnished to do so, under the terms of the COPYRIGHT file.
%%%
%%% This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
%%% KIND, either express or implied.
%%%
%%%---- END COPYRIGHT ---------------------------------------------------------
-module(wse_demo).
-export([run/2]).

run(Ws, Where) ->
    ElemNode = wse:createElement(Ws, "p"),
    TextNode = wse:createTextNode(Ws, "Hello world"),
    wse:appendChild(Ws, ElemNode, TextNode),
    wse:appendChild(Ws, wse:id(Where), ElemNode).