'(cond ((ts-active))) doesn't work

### OS/platform

Ubuntu 25.10

### Emacs version and provenance

GNU Emacs 30.1
apt-get install

### Emacs command

emacs --daemon

### Org version and provenance

Org mode version 9.7.39

### org-ql package version and provenance

4b8330a master origin/master replaced Merge pull request #491 from alhassy/master

### Actions taken

executed
(org-ql-select (org-agenda-files) '(cond ((ts-active))))

### Observed results

got error
(org-ql-select (org-agenda-files) '(cond ((ts)))) - no error
(org-ql-select (org-agenda-files) '(cond ((ts-inactive)))) - same error

### Expected results

same as (ts)

### Backtrace

```elisp
Debugger entered--Lisp error: (void-function ts-active)
ts-active()
#f(compiled-function () #)()
org-ql--select(:query (cond ((ts-active))) :preamble nil :preamble-case-fold t :predicate #f(compiled-function () #) :action #f(compiled-function (&rest _ignore) #) :narrow nil)
org-ql--select-cached(:query (cond ((ts-active))) :preamble nil :preamble-case-fold t :predicate #f(compiled-function () #) :action #f(compiled-function (&rest _ignore) #) :narrow nil)
(save-current-buffer (set-buffer it) (if (derived-mode-p 'org-mode) nil (display-warning 'org-ql-select (format "Not an Org buffer: %s" (buffer-name)) :error)) (org-ql--select-cached :query query :preamble preamble :preamble-case-fold preamble-case-fold :predicate predicate :action action :narrow narrow))
#f(lambda (it) [(action #f(compiled-function (&rest _ignore) #)) (predicate #f(compiled-function () #)) (preamble-case-fold t) (preamble nil) (query (cond ((ts-active)))) (narrow nil)] (ignore it) (save-current-buffer (set-buffer it) (if (derived-mode-p 'org-mode) nil (display-warning 'org-ql-select (format "Not an Org buffer: %s" (buffer-name)) :error)) (org-ql--select-cached :query query :preamble preamble :preamble-case-fold preamble-case-fold :predicate predicate :action action :narrow narrow)))(#)
...
```

### Etc.

_No response_