diff --git a/audio-player.rkt b/audio-player.rkt
index eb0d572..4733e4e 100644
--- a/audio-player.rkt
+++ b/audio-player.rkt
@@ -274,10 +274,10 @@
 
 (define/contract (audio-play! handle audio-file)
   (->  audio-play? path-string? number?)
-  (let ((r (ap-rpc handle 'play audio-file)))
+  (let ((r (ap-rpc handle 'open audio-file)))
     (if (eq? (car r) 'ok)
         (cadr r)
-        (raise-audio-error 'audio-error "audio-player: unexpected return value from 'play command: ~a" r))))
+        (raise-audio-error 'audio-error "audio-play!: unexpected return value from 'open command: ~a" r))))
 
 (define/contract (audio-pause! handle paused)
   (-> audio-play? boolean? symbol?)