summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/modules/js/htdocs/atomutil.js
diff options
context:
space:
mode:
authorjsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68>2010-12-24 04:35:53 +0000
committerjsdelfino <jsdelfino@13f79535-47bb-0310-9956-ffa450edef68>2010-12-24 04:35:53 +0000
commit86fa951ba99a04edf6a41b04751a1ad679dc2d36 (patch)
treec366d8560cf95210f8c2400fdec76652142950f9 /sca-cpp/trunk/modules/js/htdocs/atomutil.js
parent150feb74a6f2897d860be360cedf641e004f5ca8 (diff)
Apply roundtripping fixes from SVN r1052432 to Python and Javascript scripts.
git-svn-id: http://svn.us.apache.org/repos/asf/tuscany@1052445 13f79535-47bb-0310-9956-ffa450edef68
Diffstat (limited to 'sca-cpp/trunk/modules/js/htdocs/atomutil.js')
-rw-r--r--sca-cpp/trunk/modules/js/htdocs/atomutil.js10
1 files changed, 5 insertions, 5 deletions
diff --git a/sca-cpp/trunk/modules/js/htdocs/atomutil.js b/sca-cpp/trunk/modules/js/htdocs/atomutil.js
index 3499948083..6b998dceda 100644
--- a/sca-cpp/trunk/modules/js/htdocs/atomutil.js
+++ b/sca-cpp/trunk/modules/js/htdocs/atomutil.js
@@ -65,11 +65,9 @@ atom.entryValue = function(e) {
* Return true if a list of strings represents an ATOM feed.
*/
atom.isATOMFeed = function(l) {
- if (isNil(l))
- return false;
- if (car(l).substring(0, 5) != "<?xml")
+ if (!isXML(l))
return false;
- return car(l).match("<feed") != null;
+ return car(l).match('<feed') != null && car(l).match('="http://www.w3.org/2005/Atom"') != null;
};
/**
@@ -151,7 +149,9 @@ atom.writeATOMFeed = function(l) {
* Convert an ATOM entry containing a value to an ATOM entry containing an item element.
*/
atom.entryValuesToElements = function(v) {
- return cons(car(v), cons(cadr(v), valuesToElements(mklist(cons("'item", caddr(v))))));
+ if (isList(caddr(v)))
+ return cons(car(v), cons(cadr(v), valuesToElements(mklist(cons("'item", caddr(v))))));
+ return cons(car(v), cons(cadr(v), valuesToElements(mklist(mklist("'item", caddr(v))))));
};
/**