diff options
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/sysinfo_dg.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/sysinfo_dg.pl b/scripts/sysinfo_dg.pl index 208e4aa..360a916 100644 --- a/scripts/sysinfo_dg.pl +++ b/scripts/sysinfo_dg.pl @@ -2,7 +2,7 @@ use strict; use Irssi 20011210.0250 (); use vars qw($VERSION %IRSSI); -$VERSION = "1.2"; +$VERSION = "1.3"; %IRSSI = ( authors => 'David Leadbeater', contact => 'dgl@dgl.cx', @@ -294,12 +294,12 @@ sub cpuinfo{ sub pciinfo{ my($videocard,$ethernet); - open(PCI, "<", "/proc/pci") or return undef; + open(PCI, "-|", "/sbin/lspci") or return undef; while(<PCI>){ chomp; if(/VGA compatible controller: (.*?)$/){ $videocard .= "${1}+ "; - }elsif(/Ethernet controller: (.*?)$/){ + }elsif(/(Ethernet|Network) controller: (.*?)$/){ $ethernet = $1; } } |
