diff options
| -rw-r--r-- | MDK/Common/File.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MDK/Common/File.pm b/MDK/Common/File.pm index 4573fc4..bf4cd01 100644 --- a/MDK/Common/File.pm +++ b/MDK/Common/File.pm @@ -184,7 +184,7 @@ sub cp_with_option { } elsif ((-b $src || -c $src) && $keep_special) { my @stat = stat($src); require MDK::Common::System; - MDK::Common::System::syscall_('mknod', $dest, $stat[2], $stat[6]) or die "mknod failed (dev $_): $!"; + MDK::Common::System::syscall_('mknod', $dest, $stat[2], $stat[6]) or die "mknod failed (dev $dest): $!"; } else { local *F; open F, $src or die "can't open $src for reading: $!\n"; local *G; open G, "> $dest"; |