mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-27 00:40:18 +02:00
* Add s/ssl to checkoptions
git-svn-id: trunk@61448 -
This commit is contained in:
parent
e1307dcab1
commit
7c45e4c090
@ -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);
|
||||
|
Loading…
Reference in New Issue
Block a user