aboutsummaryrefslogtreecommitdiff
path: root/stack-core.el
diff options
context:
space:
mode:
Diffstat (limited to 'stack-core.el')
-rw-r--r--stack-core.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/stack-core.el b/stack-core.el
index be385c3..ef0dc9f 100644
--- a/stack-core.el
+++ b/stack-core.el
@@ -220,8 +220,11 @@ entire response as a complex alist."
nil
(mapcar (lambda (cons-cell)
(when (member (car cons-cell) desired-tree)
- (if (sequencep (cdr cons-cell))
- (stack-core-filter-data ))
+ (if (and (sequencep (cdr cons-cell))
+ (sequencep (elt (cdr cons-cell) 0)))
+ (stack-core-filter-data
+ (cdr cons-cell)
+ (cdr (assoc (car cons-cell) desired-tree))))
cons-cell))
data))))