From 2c3aabbd3a7ec29356ea3336f7996f763ce92bc2 Mon Sep 17 00:00:00 2001
From: Michal Vaner <vorner@ucw.cz>
Date: Tue, 26 Aug 2008 21:49:10 +0200
Subject: [PATCH] Prefix is only with toplevel device classes

---
 scripts/export.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scripts/export.pl b/scripts/export.pl
index 9aafa20..1acf068 100755
--- a/scripts/export.pl
+++ b/scripts/export.pl
@@ -15,7 +15,7 @@ my $db = PciIds::DBQAny::new( connectDb(), {
 foreach( @{$db->query( 'list', [] )} ) {
 	my( $id, $name, $description ) = @{$_};
 	$_ = $id;
-	my $prefix = ( /^PC/ ) ? '' : 'C ';
+	my $prefix = ( /^PD\/..$/ ) ? 'C ' : '';
 	s/^P.\///;
 	s/[^\/]//g;
 	s/\//\t/g;
-- 
2.39.2