* Add s/ssl to checkoptions

git-svn-id: trunk@61448 -
This commit is contained in:
michael 2019-06-22 22:39:38 +00:00
parent e1307dcab1
commit 7c45e4c090

View File

@ -44,7 +44,7 @@ Var
begin
Application.Title:='restserver';
S:=CheckOptions('hb:c:i:p:vqf::',['help','base:','connection:','ini:','quiet','verbose','port:','file::']);
S:=CheckOptions('hb:c:i:p:vqf::s',['help','base:','connection:','ini:','quiet','verbose','port:','file::','ssl']);
if (S<>'') or HasOption('h','help') then
begin
Usage(S);