diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-08-27 16:07:43 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-09-12 23:11:58 +0200 |
| commit | e83253c9db241591f587b8d83e1503528df1f49e (patch) | |
| tree | f914bbbafc8b12bfe5bf23a325063358c76d8aab /URPM/Build.pm | |
| parent | ed6bc6d37bf2a353fbba2c7235b7fab523a8f350 (diff) | |
| download | perl-URPM-e83253c9db241591f587b8d83e1503528df1f49e.tar perl-URPM-e83253c9db241591f587b8d83e1503528df1f49e.tar.gz perl-URPM-e83253c9db241591f587b8d83e1503528df1f49e.tar.bz2 perl-URPM-e83253c9db241591f587b8d83e1503528df1f49e.tar.xz perl-URPM-e83253c9db241591f587b8d83e1503528df1f49e.zip | |
add support for generating recommends in synthesis
aka having @recommends@ lines instead of @suggests@ ones
Diffstat (limited to 'URPM/Build.pm')
| -rw-r--r-- | URPM/Build.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/URPM/Build.pm b/URPM/Build.pm index acf8335..3ac41a8 100644 --- a/URPM/Build.pm +++ b/URPM/Build.pm @@ -415,6 +415,7 @@ sub build_hdlist { #- start : index of first package (defaults to first index of depslist). #- end : index of last package (defaults to last index of depslist). #- idlist : id list of rpm to compute (defaults is start .. end) +#- recommends: output recommends instead of suggest #- ratio : compression ratio (default 9). #- filter : program to filter through (default is 'gzip -$ratio'). #- returns true on success @@ -449,7 +450,7 @@ sub build_synthesis { delete @files{$pkg->provides_nosense}; } - $pkg->build_info($options{synthesis} ? fileno $fh : $options{fd}, join('@', keys %files)); + $pkg->build_info($options{synthesis} ? fileno $fh : $options{fd}, join('@', keys %files), $options{recommends}); } close $fh; # returns true on success } |