window(window-make): Minor refactor.

atlas-engineer · Dec 6, 2023 · b378c1f · b378c1f
1 parent 86c5372
commit b378c1f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/source/window.lisp b/source/window.lisp
@@ -159,7 +159,7 @@ The handlers take the window as argument."))
 (export-always 'window-make)
 (defun window-make (browser)
   "Create a new window in BROWSER."
-  (let* ((window (ffi-window-make browser)))
+  (let ((window (ffi-window-make browser)))
     (setf (gethash (id window) (windows browser)) window)
     (unless (slot-value browser 'last-active-window)
       (setf (slot-value browser 'last-active-window) window))