Update export-existence-tests.lisp

sunava · Jun 21, 2023 · 7932edb · 7932edb
1 parent f15417f
commit 7932edb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cram_core/cram_task_tree_export/tests/export-existence-tests.lisp b/cram_core/cram_task_tree_export/tests/export-existence-tests.lisp
@@ -42,7 +42,7 @@
 (defun node-tree->formatted-tree (node &optional (depth 2))
   "`depth' can be set to -1 to generate the whole tree."
   (when node
-    (list (tt-export::format-node (tt-export::node->designator node))
+    (list (tt-export::format-node node)
           (unless (= depth 0)
             (mapcar (alexandria:rcurry #'node-tree->formatted-tree (- depth 1))
                     (tt-export::node-children node))))))