]> git.vpit.fr Git - perl/modules/Test-Valgrind.git/commitdiff
Reindent a few lines
authorVincent Pit <perl@profvince.com>
Mon, 16 Nov 2015 14:28:39 +0000 (12:28 -0200)
committerVincent Pit <perl@profvince.com>
Mon, 16 Nov 2015 14:28:39 +0000 (12:28 -0200)
Whitespace-only change.

t/lib/Test/Valgrind/FakeValgrind.pm

index 0d13a0d50fdf226fdd30410dbafc9c7861767956..ad7abfd347e61b96094a3a9080762885827e4500 100644 (file)
@@ -61,9 +61,9 @@ sub new {
   if (length $exe_ext and $exe_name !~ /\Q$exe_ext\E$/) {
    $exe_name .= $exe_ext;
   }
-  $self->{tmp_dir_obj}  = File::Temp->newdir(CLEANUP => 1);
-  $self->{tmp_dir}      = $self->{tmp_dir_obj}->dirname;
-  $self->{tmp_file}     = File::Spec->catfile($self->{tmp_dir}, $exe_name);
+  $self->{tmp_dir_obj} = File::Temp->newdir(CLEANUP => 1);
+  $self->{tmp_dir}     = $self->{tmp_dir_obj}->dirname;
+  $self->{tmp_file}    = File::Spec->catfile($self->{tmp_dir}, $exe_name);
  } else {
   # Can't use the OO interface if we don't wan't the file to be opened by
   # default, but then we have to deal with cleanup ourselves.
@@ -78,9 +78,9 @@ sub new {
    local $^W = 0;
    (File::Temp::tempfile(%args))[1]
   };
-  $self->{tmp_file}     = $tmp_file;
-  my ($vol, $dir)       = File::Spec->splitpath($self->{tmp_file});
-  $self->{tmp_dir}      = File::Spec->catpath($vol, $dir, '');
+  $self->{tmp_file} = $tmp_file;
+  my ($vol, $dir)   = File::Spec->splitpath($self->{tmp_file});
+  $self->{tmp_dir}  = File::Spec->catpath($vol, $dir, '');
  }
 
  my $code = _dummy_valgrind_code($version, $body);