summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--starling/node-2d.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/starling/node-2d.scm b/starling/node-2d.scm
index b9d5e2b..c71d4e8 100644
--- a/starling/node-2d.scm
+++ b/starling/node-2d.scm
@@ -80,7 +80,7 @@
<sprite>
texture
texcoords
- rect
+ source-rect
blend-mode
tint
@@ -470,12 +470,12 @@
(define-method (texcoords (sprite <base-sprite>))
(texture-gl-tex-rect (asset-ref (texture sprite))))
-(define-method (rect (sprite <base-sprite>))
+(define-method (source-rect (sprite <base-sprite>))
(texture-gl-rect (asset-ref (texture sprite))))
(define-method (render (sprite <base-sprite>) alpha)
(let* ((tex (asset-ref (texture sprite)))
- (rect (rect sprite))
+ (rect (source-rect sprite))
(batch (batch sprite))
(tint (tint sprite))
(matrix (world-matrix sprite)))
@@ -495,14 +495,14 @@
(define-class <sprite> (<base-sprite>)
(texture #:accessor texture #:init-keyword #:texture)
(texcoords #:init-keyword #:texcoords #:init-form #f)
- (rect #:init-keyword #:rect #:init-form #f))
+ (source-rect #:init-keyword #:source-rect #:init-form #f))
(define-method (texcoords (sprite <sprite>))
(or (slot-ref sprite 'texcoords)
(next-method)))
-(define-method (rect (sprite <sprite>))
- (or (slot-ref sprite 'rect)
+(define-method (source-rect (sprite <sprite>))
+ (or (slot-ref sprite 'source-rect)
(next-method)))