summaryrefslogtreecommitdiffstats
path: root/perl-install/fs.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/fs.pm')
-rw-r--r--perl-install/fs.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index a19b498d0..88ffb1171 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -214,6 +214,7 @@ sub write($$$$) {
my $i = $::i ? $::i + 1 : '';
mkdir "$prefix/mnt/cdrom$i", 0755 or log::l("failed to mkdir $prefix/mnt/cdrom$i: $!");
symlinkf $_->{device}, "$prefix/dev/cdrom$i" or log::l("failed to symlink $prefix/dev/cdrom$i: $!");
+ chown 0, 12, "$prefix/dev/$_->{device}";
$useSupermount ?
[ "/mnt/cdrom$i", "/mnt/cdrom$i", "supermount", "fs=iso9660,dev=/dev/cdrom$i", 0, 0 ] :
[ "/dev/cdrom$i", "/mnt/cdrom$i", "auto", "user,noauto,nosuid,exec,nodev,ro", 0, 0 ];