From 1c3677639b4ab67c3b9a85073295064ff7a0f2d3 Mon Sep 17 00:00:00 2001
From: saturn <saturn@glxl.net>
Date: Wed, 1 May 2024 16:59:42 -0500
Subject: [PATCH] Add todo note.

---
 src/colors.lisp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/colors.lisp b/src/colors.lisp
index b25f33bd..f54ce9ef 100644
--- a/src/colors.lisp
+++ b/src/colors.lisp
@@ -47,6 +47,7 @@
 	1.0d0)))
 
 (defun decode-css-color (color-string)
+  ;; TODO: handle CSS variables
   (regex-case color-string
 	      ("#[0-9a-fA-F]{3}\\s*$" (values* (parse-multi-hex color-string 3 1 :start 1 :key (lambda (x) (declare (type (integer 0 15) x)) (/ (+ x (* x 16)) 255.0d0))) 1.0d0))
 	      ("#[0-9a-fA-F]{4}\\s*$" (parse-multi-hex color-string 4 1 :start 1 :key (lambda (x) (declare (type (integer 0 15) x)) (/ (+ x (* x 16)) 255.0d0))))
-- 
2.11.4.GIT