mirror of
https://github.com/roswell/roswell.git
synced 2026-09-10 07:16:17 -04:00
21 lines
576 B
Common Lisp
21 lines
576 B
Common Lisp
#!/bin/sh
|
|
#|-*- mode:lisp -*-|#
|
|
#|Creates a new ros script, optionally based on a template.
|
|
exec ros +Q -m roswell -N roswell -- $0 "$@"
|
|
|#
|
|
(progn
|
|
(ros:ensure-asdf)
|
|
(roswell:include "util-main"))
|
|
|
|
(defpackage :ros.script.init.3672012201
|
|
(:use :cl :roswell.util.main))
|
|
(in-package :ros.script.init.3672012201)
|
|
|
|
(defun main (&rest r)
|
|
(module-main r :default (or (when (equal (roswell:opt "init.use-checkout") "true")
|
|
(roswell:opt "init.default"))
|
|
"default"))
|
|
;; show usage ?
|
|
)
|
|
;;; vim: set ft=lisp lisp:
|