summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/modules/wsgi/atomutil.py
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/wsgi/atomutil.py
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/wsgi/atomutil.py')
-rw-r--r--sca-cpp/trunk/modules/wsgi/atomutil.py10
1 files changed, 5 insertions, 5 deletions
diff --git a/sca-cpp/trunk/modules/wsgi/atomutil.py b/sca-cpp/trunk/modules/wsgi/atomutil.py
index 6c0a7c9a81..1e6a7c31b5 100644
--- a/sca-cpp/trunk/modules/wsgi/atomutil.py
+++ b/sca-cpp/trunk/modules/wsgi/atomutil.py
@@ -50,11 +50,9 @@ def entryValue(e):
# Return true if a list of strings represents an ATOM feed
def isATOMFeed(l):
- if isNil(l):
- return False
- if car(l)[0:5] != "<?xml":
+ if not isXML(l):
return False
- return contains(car(l), "<feed")
+ return contains(car(l), "<feed") and contains(car(l), "=\"http://www.w3.org/2005/Atom\"")
# Convert a list of strings to a list of values representing an ATOM feed
def readATOMFeed(l):
@@ -107,7 +105,9 @@ def writeATOMFeed(l):
# Convert an ATOM entry containing a value to an ATOM entry containing an item element
def entryValuesToElements(v):
- return cons(car(v), cons(cadr(v), valuesToElements((cons("'item", caddr(v)),))))
+ if isList(caddr(v)):
+ return cons(car(v), cons(cadr(v), valuesToElements((cons("'item", caddr(v)),))))
+ return cons(car(v), cons(cadr(v), valuesToElements((("'item", caddr(v)),))))
# Convert an ATOM feed containing values to an ATOM feed containing elements
def feedValuesToElementsLoop(v):