Game properties.

[gacela.git] / src / events.scm

diff --git a/src/events.scm b/src/events.scm
index dfe9e60c8afde01c0d91b272b6b4632b9ef109d4..fb21d88f85985d3d911a30cfb33a70ad48a15c86 100644 (file)
--- a/src/events.scm
+++ b/src/events.scm
@@ -18,7 +18,7 @@
 (define-module (gacela events)
   #:use-module (gacela sdl)
   #:export (process-events
-           quit?
+           quit-signal?
            key?
            key-pressed?
            key-released?))
@@ -54,7 +54,7 @@
           (cond ((= (assoc-ref event 'type) SDL_QUIT) (set! quit-signal #t))))
         (process-screen-events (cdr events)))))
 
-(define (quit?)
+(define (quit-signal?)
   quit-signal)