link iso image with -<set> prefix if live->{settings}{set} is defined

1 files changed, 7 insertions, 0 deletions

diff --git a/draklive b/draklive
index 8e58d6b..cdfb826 100755
--- a/draklive
+++ b/draklive
@@ -746,6 +746,13 @@ sub build_iso_image {
         run_('mgaiso-addmd5', '>', '/dev/null', '2>', '/dev/null', $dest);
         run_({ chdir => $dir }, 'md5sum', '>', $dest . '.md5', $filename);
         run_({ chdir => $dir }, 'sha1sum', '>', $dest . '.sha1', $filename);
+	if (my $suffix = $live->get_set_suffix) {
+	    if (my ($prefix, $ext) = $dest =~ /(.*)(\.[^.]+)$/) {
+		my $link = $prefix . $suffix . $ext;
+		linkf($dest, $link);
+		print "linked as $link\n";
+	    }
+	}
     }
 }