?

Shirakumo · Dec 9, 2024 · eeb669f · eeb669f
1 parent edc14bb
commit eeb669f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/renderers/opengl/renderer.lisp b/renderers/opengl/renderer.lisp
@@ -555,7 +555,7 @@
                (simple:translate renderer extent)
                (setf (uniform shader "transform") (simple:transform-matrix renderer)))
              (setf (uniform shader "size") extent)
-             (let ((min (* 0.5 (min (alloy:pxw extent) (alloy:pxh extent)))))
+             (let ((min (* 0.5 (min (abs (alloy:pxw extent)) (abs (alloy:pxh extent))))))
                (setf (uniform shader "corner_radius[0]") 0.0)
                (setf (uniform shader "corner_radius[1]") (if round-p (min min (alloy:to-px (aref corner-radii 0))) 0.0))
                (setf (uniform shader "corner_radius[2]") (if round-p (min min (alloy:to-px (aref corner-radii 1))) 0.0))