diff options
author | Olivier Blin <oblin@mandriva.com> | 2009-12-18 10:07:14 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2009-12-18 10:07:14 +0000 |
commit | d6023583aab3508d2f3eea891bd8d37bc6746dd6 (patch) | |
tree | f983aa14b4090211f18ac62a47e331a07926ef26 /lib | |
parent | 5671c368441f77724b7d277c5b2c4ca798d3b9c3 (diff) | |
download | drakiso-d6023583aab3508d2f3eea891bd8d37bc6746dd6.tar drakiso-d6023583aab3508d2f3eea891bd8d37bc6746dd6.tar.gz drakiso-d6023583aab3508d2f3eea891bd8d37bc6746dd6.tar.bz2 drakiso-d6023583aab3508d2f3eea891bd8d37bc6746dd6.tar.xz drakiso-d6023583aab3508d2f3eea891bd8d37bc6746dd6.zip |
allow to select which settings fields are used to build name (in live->{name_fields})
Diffstat (limited to 'lib')
-rw-r--r-- | lib/MDV/Draklive/Live.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/MDV/Draklive/Live.pm b/lib/MDV/Draklive/Live.pm index f356b33..c8618ee 100644 --- a/lib/MDV/Draklive/Live.pm +++ b/lib/MDV/Draklive/Live.pm @@ -9,7 +9,8 @@ sub new { sub get_name { my ($live) = @_; - join('-', grep { $_ } @{$live->{settings}}{qw(name product version desktop region media arch)}); + my $fields = $live->{name_fields} || [ qw(name product version desktop region media arch) ]; + join('-', grep { $_ } @{$live->{settings}}{@$fields}); } sub get_builddir { |