diff options
-rw-r--r-- | sly/render/context.scm | 4 |
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))) |