diff options
| author | Alexey Shchepin <alexey@process-one.net> | 2003-01-01 19:54:44 +0000 |
|---|---|---|
| committer | Alexey Shchepin <alexey@process-one.net> | 2003-01-01 19:54:44 +0000 |
| commit | 201b4c602f241f7633be4f1b7f9dce0dabb1820c (patch) | |
| tree | dbbe876124e3b29589ddd07a544d80f7b96518a4 /src/xml.erl | |
| parent | *** empty log message *** (diff) | |
*** empty log message ***
SVN Revision: 24
Diffstat (limited to 'src/xml.erl')
| -rw-r--r-- | src/xml.erl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/xml.erl b/src/xml.erl index 3bdcb62f7..171607361 100644 --- a/src/xml.erl +++ b/src/xml.erl @@ -12,7 +12,8 @@ -export([element_to_string/1, crypt/1, remove_cdata/1, get_cdata/1, get_tag_cdata/1, - get_attr/2, get_attr_s/2]). + get_attr/2, get_attr_s/2, + get_tag_attr/2, get_tag_attr_s/2]). element_to_string(El) -> case El of @@ -93,4 +94,9 @@ get_attr_s(AttrName, Attrs) -> "" end. +get_tag_attr(AttrName, {xmlelement, Name, Attrs, Els}) -> + get_attr(AttrName, Attrs). + +get_tag_attr_s(AttrName, {xmlelement, Name, Attrs, Els}) -> + get_attr_s(AttrName, Attrs). |