extract record_cdrom_path

1 files changed, 8 insertions, 3 deletions

diff --git a/draklive b/draklive
index 1aae255..0e1c55a 100755
--- a/draklive
+++ b/draklive
@@ -910,14 +910,19 @@ sub format_device {
     }
 }
 
-sub record_cdrom_master {
-    my ($live, $opts) = @_;
+sub record_cdrom_path {
+    my ($live, $path, $opts) = @_;
     my $device = get_media_device($live, $opts)
       or die "no device defined in media configuration\n";
-    my $src = $opts->{onthefly} ? '-' : get_cdrom_master_path($live, $opts);
+    my $src = $opts->{onthefly} ? '-' : $path;
     run_('wodim', '-v', 'dev=' . $device, $src);
 }
 
+sub record_cdrom_master {
+    my ($live, $opts) = @_;
+    record_cdrom_path($live, get_cdrom_master_path($live, $opts), $opts);
+}
+
 sub rsync_delete_options {
     my ($opts) = @_;
     $opts->{keep_files} ? () : '--delete';