lili/qt5
1
0
Fork 0
mirror of git://code.qt.io/qt/qt5.git synced 2026-02-01 11:26:04 +08:00
Code Issues Packages Projects Releases Wiki Activity

don't use GetOptionsFromArray, to restore msysgit perl compatibility

Browse Source 
Change-Id: Ic02a5d8b5a8a813a23bed1c0b45bcb8ee47e3edb
Reviewed-by: Simon Hausmann <simon.hausmann@theqtcompany.com>
This commit is contained in:
Oswald Buddenhagen
2015-08-17 17:03:39 +02:00
committed by Simon Hausmann
parent 43135d6e33
commit c3e404fffd
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
init-repository
View File

@@ -180,7 +180,7 @@ missing modules will fall back to the canonical URLs.
use Carp qw( confess );
use English qw( -no_match_vars );
use Getopt::Long qw( GetOptionsFromArray );
use Getopt::Long qw( GetOptions );
use Pod::Usage qw( pod2usage );
use Cwd qw( getcwd );
@@ -222,7 +222,7 @@ sub exe
sub parse_arguments
{
my ($self, @args) = @_;
my ($self) = @_;
%{$self} = (%{$self},
'alternates' => "",
@@ -237,7 +237,7 @@ sub parse_arguments
'module-subset' => "default",
);
GetOptionsFromArray(\@args,
GetOptions(
'alternates=s' => \$self->{qw{ alternates }},
'branch' => \$self->{qw{ branch }},
'codereview-username=s' => \$self->{qw{ codereview-username }},
@@ -563,5 +563,5 @@ sub run
#==============================================================================
Qt::InitRepository->new(@ARGV)->run if (!caller);
Qt::InitRepository->new()->run if (!caller);
1;