summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/render/context.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/sly/render/context.scm b/sly/render/context.scm
index 541661d..291e080 100644
--- a/sly/render/context.scm
+++ b/sly/render/context.scm
@@ -70,7 +70,9 @@
(define (set-render-context-blend-mode! context blend-mode)
(unless (equal? (render-context-blend-mode context) blend-mode)
(if blend-mode
- (apply-blend-mode blend-mode)
+ (begin
+ (gl-enable (enable-cap blend))
+ (apply-blend-mode blend-mode))
;; Turn off blending if there is no blend-mode specified.
(gl-disable (enable-cap blend)))
(%set-render-context-blend-mode! context blend-mode)))