mirror of https://github.com/xemu-project/xemu.git
Merge pull request #6 from LukeUsher/fix-build-on-new-perl
Fix compilation with perl > 5.22
This commit is contained in:
commit
2d97e837b9
|
@ -317,7 +317,7 @@ while(<$inf>) {
|
||||||
@columns = ();
|
@columns = ();
|
||||||
for $column (split (/\s*\@tab\s*/, $1)) {
|
for $column (split (/\s*\@tab\s*/, $1)) {
|
||||||
# @strong{...} is used a @headitem work-alike
|
# @strong{...} is used a @headitem work-alike
|
||||||
$column =~ s/^\@strong{(.*)}$/$1/;
|
$column =~ s/^\@strong\{(.*)\}$/$1/;
|
||||||
push @columns, $column;
|
push @columns, $column;
|
||||||
}
|
}
|
||||||
$_ = "\n=item ".join (" : ", @columns)."\n";
|
$_ = "\n=item ".join (" : ", @columns)."\n";
|
||||||
|
|
Loading…
Reference in New Issue