chore: migrate conditional bindings for Emacs 31

2026-08-26 00:10:07 +08:00 · 2026-08-26 00:10:07 +08:00 · 0566f549dd
commit 0566f549dd
parent 021bb3c700
1 changed files with 1 additions and 1 deletions
--- a/etaf-sqlite.el
+++ b/etaf-sqlite.el
@ -264,7 +264,7 @@ validated once and never comes from a runtime query."
                        (etaf-sqlite--table-columns table)))
         (table-name (etaf-sqlite--physical-name
                      (etaf-sqlite--table-id table) "table"))
-         (order (when-let ((primary (etaf-sqlite--table-primary-key table)))
+         (order (when-let* ((primary (etaf-sqlite--table-primary-key table)))
                  (format " ORDER BY %s"
                          (etaf-sqlite--identifier
                           (etaf-sqlite--column-sql-name