closql-insert: No longer needlessly use when-let

magit · Jun 1, 2024 · c7deeaa · c7deeaa
1 parent c591e6b
commit c7deeaa
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/closql.el b/closql.el
@@ -363,7 +363,7 @@
   (let (alist)
     (dolist (slot (eieio-class-slots (eieio--object-class obj)))
       (setq  slot (cl--slot-descriptor-name slot))
-      (when-let ((table (closql--slot-table obj slot)))
+      (when (closql--slot-table obj slot)
         (push (cons slot (closql-oref obj slot)) alist)
         (closql--oset obj slot eieio--unbound)))
     (closql-with-transaction db