From b749019d13617d78e0f45da7f88913429927d6fd Mon Sep 17 00:00:00 2001 From: Dietmar Maurer Date: Wed, 19 Oct 2011 06:22:30 +0200 Subject: [PATCH 1/1] allow to pass single '-' as argument. --- data/PVE/RESTHandler.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/data/PVE/RESTHandler.pm b/data/PVE/RESTHandler.pm index 7e0352c..e68db35 100644 --- a/data/PVE/RESTHandler.pm +++ b/data/PVE/RESTHandler.pm @@ -486,7 +486,7 @@ sub cli_handler { if ($arg_param) { if (ref($arg_param)) { foreach my $p (@$arg_param) { - $param->{$p} = shift @$args if $args->[0] && $args->[0] !~ m/^-/; + $param->{$p} = shift @$args if $args->[0] && $args->[0] !~ m/^-\S/; } } else { my $pd = $info->{parameters}->{properties}->{$arg_param}; -- 2.39.2