zone: Use cl-launch.

[zone] / zone

diff --git a/zone b/zone
index de68201a85c670eae277f652870034188193e148..be7ac0deec67aa72f98298d61bab5e8388b3d073 100755 (executable)
--- a/zone
+++ b/zone
@@ -1,6 +1,2 @@
-#! /usr/local/bin/runlisp
-;;; -*-lisp-*-
-
-(clc:clc-require "mdw")
-(clc:clc-require "zone")
-(zone.frontend:main)
+#! /bin/sh
+exec cl-launch -s zone -i '(zone.frontend:main)' -- "$0" "$@"