$other .= ',J';
}
if ($num > 1) {
- $other .= '/g';
+ $other .= ',g';
}
for ($i = 0; $i < $num; $i++) {
if (!defined $hunk[$i]{USE}) {
}
print "go to which hunk$extra? ";
$response = <STDIN>;
+ if (!defined $response) {
+ $response = '';
+ }
chomp $response;
}
if ($response !~ /^\s*\d+\s*$/) {