Hello community, here is the log from the commit of package suseRegister checked in at Thu Mar 30 14:01:20 CEST 2006. -------- --- suseRegister/suseRegister.changes 2006-03-30 11:53:27.000000000 +0200 +++ suseRegister/suseRegister.changes 2006-03-30 12:54:54.000000000 +0200 @@ -1,0 +2,5 @@ +Thu Mar 30 12:54:23 CEST 2006 - mc@suse.de + +- adapt new output of query-pool + +------------------------------------------------------------------- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ suseRegister.spec ++++++ --- /var/tmp/diff_new_pack.4PFRAF/_old 2006-03-30 14:01:12.000000000 +0200 +++ /var/tmp/diff_new_pack.4PFRAF/_new 2006-03-30 14:01:12.000000000 +0200 @@ -12,7 +12,7 @@ Name: suseRegister Version: 1.0 -Release: 36 +Release: 37 Summary: Registration tool Group: Productivity/Other License: GPL @@ -57,6 +57,8 @@ %changelog -n suseRegister * Thu Mar 30 2006 - mc@suse.de +- adapt new output of query-pool +* Thu Mar 30 2006 - mc@suse.de - remove hack - use query-pool to get the products - remove rugProductArch ++++++ suseRegister-1.0.tar.bz2 ++++++ diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/suseRegister-1.0/suse_register new/suseRegister-1.0/suse_register --- old/suseRegister-1.0/suse_register 2006-03-30 11:52:25.000000000 +0200 +++ new/suseRegister-1.0/suse_register 2006-03-30 12:53:49.000000000 +0200 @@ -89,8 +89,6 @@ my $uname = "/bin/uname"; my $hwinfo = "/usr/sbin/hwinfo"; my $zmdInit = "/etc/init.d/novell-zmd"; -#my $xm = "/usr/sbin/xm"; -#my $xenstorelist = "/usr/bin/xenstore-list"; my $xenstoreread = "/usr/bin/xenstore-read"; my $xenstorewrite = "/usr/bin/xenstore-write"; @@ -1257,9 +1255,10 @@ my @p = split('\|', $line); my $installed = $p[0]; - my $product = $p[1]; - my $version = $p[2]; - my $arch = $p[3]; + my $type = $p[1]; + my $product = $p[2]; + my $version = $p[3]; + my $arch = $p[4]; if(!defined $arch || $arch eq "" || $arch eq "noarch") { @@ -1267,7 +1266,7 @@ chomp($arch); } - if($installed eq "i") + if($installed eq "i" && lc($type) eq lc("product")) { push @installedProducts, [$product, $version, $arch]; } ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun...