From 034a96bcc91d1648f3514c6ed9d1e9d5ae274ff5 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Sat, 21 Jun 2014 06:48:12 -0400 Subject: [PATCH] skip config --- main.rkt | 3 +++ 1 file changed, 3 insertions(+) diff --git a/main.rkt b/main.rkt index d76871f..3013dd2 100644 --- a/main.rkt +++ b/main.rkt @@ -22,6 +22,9 @@ (spawn (lambda (e s) #f) (void) (match (gethostname) + ["skip" + (gestalt-union (pub (gateway-route (bytes 0 0 0 0) 0 (bytes 192 168 1 1) "en0")) + (pub (host-route (bytes 192 168 1 222) 24 "en0")))] ["hop" (gestalt-union (pub (gateway-route (bytes 0 0 0 0) 0 (bytes 192 168 1 1) "wlan0")) (pub (host-route (bytes 192 168 1 222) 24 "wlan0")))]