From bea7c74a2b05cd73e75f0ce5e5f23b5bb099db73 Mon Sep 17 00:00:00 2001 From: Mustafa Date: Thu, 12 Jun 2014 09:19:16 -0700 Subject: [PATCH] fixed osx link --- oregano/system.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/oregano/system.rkt b/oregano/system.rkt index 14760d6..77d3660 100644 --- a/oregano/system.rkt +++ b/oregano/system.rkt @@ -9,7 +9,7 @@ (define (get-scsynth-path/osx) - (define path1 "/Applications/SuperCollider/SuperCollider/SuperCollider.app/Contents/Resources/scsynth") + (define path1 "/Applications/SuperCollider/SuperCollider.app/Contents/Resources/scsynth") (define path2 "/Volumes/SuperCollider/SuperCollider/SuperCollider.app/Contents/Resources/scsynth") (cond [(file-exists? path1) path1] [(file-exists? path2) path2] @@ -24,7 +24,7 @@ (begin (display "Starting SuperCollider...") (process "./start_server_linux.sh") - (sleep 0.5) + (sleep 1) (if (sc-running/unix?) (display "OK\n") (display "Error\n"))))) @@ -51,4 +51,4 @@ ('windows 1) (else 1))) -(run-super-collider) \ No newline at end of file +(run-super-collider)