]> mj.ucw.cz Git - pciids.git/commitdiff
Fix export
authorMichal Vaner <vorner@ucw.cz>
Sat, 30 Aug 2008 14:45:51 +0000 (16:45 +0200)
committerMichal Vaner <vorner@ucw.cz>
Sat, 30 Aug 2008 14:45:51 +0000 (16:45 +0200)
scripts/export.pl
scripts/init

index ac55810cafa108b8333bb96033ca341f0a67123c..f8261b3f59a0a200982d0bf9b1632694bcaa2fde 100755 (executable)
@@ -21,11 +21,12 @@ foreach( @{$db->query( 'list', [] )} ) {
        s/\//\t/g;
        my $tabs = $_;
        $id =~ s/.*\///;
+       $id =~ s/([0-9a-f]{4})([0-9a-f]{4})/$1 $2/;
        print "$tabs$prefix$id  $name\n";
        if( defined( $description ) && ( $description ne '' ) ) {
                chomp $description;
                $description =~ s/\n/\n$tabs#/g;
-               print "$tabs#$description\n";
+               print "$tabs# $description\n";
        }
 }
 
index 6bc8df3f1e9b3b04f16ed9614c76caa0da8f4147..39e3152418e3d270e8a6e949721566fde8283ddc 100755 (executable)
@@ -2,6 +2,6 @@
 ./scripts/feeddb.pl pci.ids
 #./scripts/transfer.pl pciidsold
 #./scripts/importlog.pl iii.log
-./scripts/importil.pl ~/iii.out
+./scripts/importil.pl iii.out
 echo 'Database is prepared, but it does not contain admins. Add them manually, please.'
 echo 'Just register like ordinary user and run ./scripts/rights.pl + username validate'