kfg/winupd
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Extract InstallSource package attribute.

Browse source
This commit is contained in:
László Valkó 2018-05-26 12:21:05 +02:00
parent 3e62e5ad7e
commit 161cbfb85f
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
pkgtool.pm
View file

@ -767,6 +767,7 @@ sub read_packages ($$$$)
my $dispver = get_registry_value($sub->{'DisplayVersion'}); my $dispver = get_registry_value($sub->{'DisplayVersion'});
my $instdate = get_registry_value($sub->{'InstallDate'}); my $instdate = get_registry_value($sub->{'InstallDate'});
my $instloc = get_registry_value($sub->{'InstallLocation'}); my $instloc = get_registry_value($sub->{'InstallLocation'});
my $instsrc = get_registry_value($sub->{'InstallSource'});
my $syscomp = get_registry_value($sub->{'SystemComponent'}); my $syscomp = get_registry_value($sub->{'SystemComponent'});
my $parentkeyname = get_registry_value($sub->{'ParentKeyName'}); my $parentkeyname = get_registry_value($sub->{'ParentKeyName'});
my $wininst = get_registry_value($sub->{'WindowsInstaller'}); my $wininst = get_registry_value($sub->{'WindowsInstaller'});
@ -788,6 +789,7 @@ sub read_packages ($$$$)
DisplayVersion =>$dispver, DisplayVersion =>$dispver,
InstallDate => $instdate, InstallDate => $instdate,
InstallLocation => $instloc, InstallLocation => $instloc,
InstallSource => $instsrc,
SystemComponent => $syscomp, SystemComponent => $syscomp,
WindowsInstaller => $wininst, WindowsInstaller => $wininst,
ReleaseType => $reltype, ReleaseType => $reltype,