From 750a09a7de63c92868cff41a3151eac320c77fa0 Mon Sep 17 00:00:00 2001 From: Johannes Schindelin Date: Wed, 19 Oct 2005 00:01:02 -0700 Subject: [PATCH] Fix cvsimport warning when called without --no-cvs-direct Perl was warning that $opt_p was undefined in that case. Signed-off-by: Johannes Schindelin Signed-off-by: Junio C Hamano --- git-cvsimport.perl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/git-cvsimport.perl b/git-cvsimport.perl index f7c3a5159..f00f7596b 100755 --- a/git-cvsimport.perl +++ b/git-cvsimport.perl @@ -487,7 +487,7 @@ unless($pid) { my @opt; @opt = split(/,/,$opt_p) if defined $opt_p; unshift @opt, '-z', $opt_z if defined $opt_z; - unless ($opt_p =~ m/--no-cvs-direct/) { + unless (defined($opt_p) && $opt_p =~ m/--no-cvs-direct/) { push @opt, '--cvs-direct'; } exec("cvsps",@opt,"-u","-A",'--root',$opt_d,$cvs_tree); -- 2.30.2