From 218b22da76f5ebc2d954813246c8822c38685ed4 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 28 Oct 2008 20:24:15 +0000 Subject: move get_builddir and get_system_root as methods in MDV::Draklive::Live object --- lib/MDV/Draklive/Live.pm | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'lib/MDV/Draklive/Live.pm') diff --git a/lib/MDV/Draklive/Live.pm b/lib/MDV/Draklive/Live.pm index 7d5a3fd..25ec4c2 100644 --- a/lib/MDV/Draklive/Live.pm +++ b/lib/MDV/Draklive/Live.pm @@ -12,4 +12,14 @@ sub get_name { join('-', grep { $_ } @{$live->{settings}}{qw(name product version desktop region media arch)}); } +sub get_builddir { + my ($live) = @_; + $live->{settings}{builddir} . '/' . $live->get_name; +} + +sub get_system_root { + my ($live) = @_; + $live->{settings}{chroot} . '/' . $live->get_name; +} + 1; -- cgit v1.2.1