From 8eec4921c9f98db9c659d55cc04882e10b95cf0e Mon Sep 17 00:00:00 2001
From: SANO Masatoshi <snmsts@gmail.com>
Date: Tue, 28 Nov 2023 02:17:16 +0900
Subject: [PATCH] show help when NAME:   lisp script - maintain ros scripts

USAGE:
  lisp [global-options] script [<command>] [command-options] [arguments ...]

OPTIONS:
      --help  display usage information and exit

COMMANDS:
  impl       install script to run implementation
  init       Create a roswell script.
  install    Install roswell script to PATH.
  run        Run roswell script.
  uninstall  Uninstall roswell script package based installation

AUTHORS:
  SANO Masatoshi

LICENSE:
  MIT
---
 lib/script/main.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/script/main.lisp b/lib/script/main.lisp
index 979693a..eb2c65c 100644
--- a/lib/script/main.lisp
+++ b/lib/script/main.lisp
@@ -28,4 +28,5 @@
 
 (defun handler (cmd)
   "Handler for just evaluate options"
-  )
+  (unless (clingon:command-arguments cmd)
+    (clingon:run cmd '("--help"))))