diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-08-21 22:08:34 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-08-21 22:08:34 +0000 |
| commit | 6a8c70cc4efe0f67d3bb9a6841a32c8bdba2b66e (patch) | |
| tree | 814b4f05b89a03c9d9d25acf44f859d16b875adf /convert | |
| parent | a450c76528940c3d5f3f77c4fc8ec431534632a7 (diff) | |
| download | ldetect-lst-6a8c70cc4efe0f67d3bb9a6841a32c8bdba2b66e.tar ldetect-lst-6a8c70cc4efe0f67d3bb9a6841a32c8bdba2b66e.tar.gz ldetect-lst-6a8c70cc4efe0f67d3bb9a6841a32c8bdba2b66e.tar.bz2 ldetect-lst-6a8c70cc4efe0f67d3bb9a6841a32c8bdba2b66e.tar.xz ldetect-lst-6a8c70cc4efe0f67d3bb9a6841a32c8bdba2b66e.zip | |
*** empty log message ***
Diffstat (limited to 'convert')
| -rwxr-xr-x | convert/merge2pcitable.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/convert/merge2pcitable.pl b/convert/merge2pcitable.pl index 071b58da..120e45c3 100755 --- a/convert/merge2pcitable.pl +++ b/convert/merge2pcitable.pl @@ -53,7 +53,7 @@ sub read_pcitable { if (my ($id1, $id2, @l) = split /\t+/) { my ($subid1, $subid2) = ('ffff', 'ffff'); ($subid1, $subid2, @l) = @l if @l == 4; - @l == 2 or die "$f $line: bad number of fields (in $_)\n"; + @l == 2 or die "$f $line: bad number of fields " . (int @l) . " (in $_)\n"; my ($module, $text) = @l; my $class = $text =~ /(.*?)|/; |