diff options
| author | David Thompson <dthompson2@worcester.edu> | 2015-12-22 09:12:07 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2015-12-22 09:12:07 -0500 |
| commit | 241918b1deb38feb824a9d6a3c5d303e47857d73 (patch) | |
| tree | e4dd74e6d7a6f077691da7f125f21a3758b29da4 | |
| parent | 8e8fe4275a0db47e31422324c144b2cebee5df63 (diff) | |
surface: Fix convert-surface-format.
Was trying to wrap the wrong thing. -_-
* sdl2/surface.scm (convert-surface-format): Wrap the new pointer, not
the old surface object. Oops.
| -rw-r--r-- | sdl2/surface.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sdl2/surface.scm b/sdl2/surface.scm index 98ddf70..24846c2 100644 --- a/sdl2/surface.scm +++ b/sdl2/surface.scm @@ -195,4 +195,4 @@ Valid format types are: 0))) (if (null-pointer? ptr) (sdl-error "convert-surface-format" "failed to convert surface format") - (wrap-surface surface)))) + (wrap-surface ptr)))) |