summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xdraklive11
1 files changed, 10 insertions, 1 deletions
diff --git a/draklive b/draklive
index 4c119ef..a52c476 100755
--- a/draklive
+++ b/draklive
@@ -1666,13 +1666,22 @@ sub record_onthefly {
}
}
+sub need_compressed_image {
+ my ($live) = @_;
+ list_selected_loopbacks($live);
+}
+
sub get_disk_image_path {
my ($live) = @_;
- get_disk_master_path($live) . '.bz2';
+ get_disk_master_path($live) . if_(need_compressed_image($live), '.bz2');
}
sub create_disk_image {
my ($live) = @_;
+ if (!need_compressed_image($live)) {
+ warn "no loopback: skipping image creation";
+ return;
+ }
my $master = get_disk_master_path($live);
my $dest = get_disk_image_path($live);
mkdir_p(dirname($dest));