add license querying to Build::Rpmmd

openSUSE · Aug 2, 2021 · 8a43c8d · 8a43c8d
1 parent 74f42e9
commit 8a43c8d
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Build/Rpmmd.pm b/Build/Rpmmd.pm
@@ -129,6 +129,7 @@ my $primaryparser = {
         'rpm:enhances' =>    { 'rpm:entry' => { _start => \&primary_handle_dep , _tag => 'enhances' }, },
         'rpm:obsoletes' =>   { 'rpm:entry' => { _start => \&primary_handle_dep , _tag => 'obsoletes' }, },
         'rpm:buildhost' => { _text => 1, _end => \&generic_store_text, _tag => 'buildhost' },
+        'rpm:license' => { _text => 1, _end => \&generic_store_text, _tag => 'license' },
         'rpm:sourcerpm' => { _text => 1, _end => \&primary_handle_sourcerpm , _tag => 'source' },
 ### currently commented out, as we ignore file provides in expanddeps
 #       file => { _text => 1, _end => \&primary_handle_file_end, _tag => 'provides' },
@@ -208,6 +209,7 @@ sub primary_add_result {
     }
   }
   delete $data->{'checksum'} unless $options->{'withchecksum'};
+  delete $data->{'license'} unless $options->{'withlicense'};
   return generic_add_result(@_);
 }