From 2299d8656f6d9f833580977f27cddc98b0c67a17 Mon Sep 17 00:00:00 2001 From: Yukari Hafner Date: Thu, 2 Jan 2025 10:50:31 +0100 Subject: [PATCH] Only update camera if unset. --- scene.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/scene.lisp b/scene.lisp index f88d6934..2d7be9d3 100644 --- a/scene.lisp +++ b/scene.lisp @@ -9,7 +9,8 @@ (name-map :initform (make-hash-table :test 'equal) :accessor name-map))) (defmethod enter :after ((camera camera) (scene scene)) - (setf (camera scene) camera)) + (unless (camera scene) + (setf (camera scene) camera))) (defmethod unit (name (scene scene)) (gethash name (name-map scene)))