From b49aa55ec3eb58b8b0aab3c5e202e0fadd610e6c Mon Sep 17 00:00:00 2001
From: Chris Cochrun <chris@cochrun.xyz>
Date: Wed, 20 Nov 2024 09:57:17 -0600
Subject: [PATCH] fixing value comparison

---
 src/core/slide.rs | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/src/core/slide.rs b/src/core/slide.rs
index 0769bb8..bafbbc4 100644
--- a/src/core/slide.rs
+++ b/src/core/slide.rs
@@ -219,9 +219,13 @@ fn lisp_to_background(lisp: &Value) -> Background {
     match lisp {
         Value::List(list) => {
             if let Some(source) = list.iter().position(|v| {
-                v == Value::Keyword(Keyword::from("source"))
+                v == &Value::Keyword(Keyword::from("source"))
             }) {
-                let path = list[source + 1];
+                let source = list[source + 1];
+                match source {
+                    Value::String(s) =>
+                }
+
                 Background::try_from(&path)
             } else {
                 Background::default()