index 0317ad9127b374a9ded536e6fb2c825a3b13828c..fb1e92a7664f77aa5ca4ca30b4711bafaf155466 100755 (executable)
IMMEDIATE => 1,
HEADER => $status_head, },
@mods);
- return if (!$it);
+ patch_update_file($it->{VALUE}) if ($it);
+}
+sub patch_update_file {
my ($ix, $num);
- my $path = $it->{VALUE};
+ my $path = shift;
my ($head, @hunk) = parse_diff($path);
for (@{$head->{TEXT}}) {
print;