summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/hosting/server/util.py
diff options
context:
space:
mode:
Diffstat (limited to 'sca-cpp/trunk/hosting/server/util.py')
-rw-r--r--sca-cpp/trunk/hosting/server/util.py3
1 files changed, 2 insertions, 1 deletions
diff --git a/sca-cpp/trunk/hosting/server/util.py b/sca-cpp/trunk/hosting/server/util.py
index bd37eb11af..c7892093c6 100644
--- a/sca-cpp/trunk/hosting/server/util.py
+++ b/sca-cpp/trunk/hosting/server/util.py
@@ -132,7 +132,8 @@ def cons_stream(car, cdr):
def assoc(k, l):
if l == ():
return ()
- if k == car(car(l)):
+ a = car(l)
+ if isTaggedList(a, k):
return car(l)
return assoc(k, cdr(l))