diff --git a/lisp/org-fold-core.el b/lisp/org-fold-core.el
index e6a9d5a2b..79a99e850 100644
--- a/lisp/org-fold-core.el
+++ b/lisp/org-fold-core.el
@@ -424,7 +424,7 @@ Return nil when there is no matching folding spec."
     (unless org-fold-core--spec-symbols
       (dolist (spec (org-fold-core-folding-spec-list))
         (push (cons spec spec) org-fold-core--spec-symbols)
-        (dolist (alias (assq :alias (assq spec org-fold-core--specs)))
+        (dolist (alias (cdr (assq :alias (assq spec org-fold-core--specs))))
           (push (cons alias spec) org-fold-core--spec-symbols))))
     (alist-get spec-or-alias org-fold-core--spec-symbols)))