X-Git-Url: https://git.p6c8.net/devedit.git/blobdiff_plain/6cbef69555b48386fee70b73bac2c3df4d15ff6a..ce10babcb8d07587e9bf95496e22e9b4e801f207:/modules/Command.pm

diff --git a/modules/Command.pm b/modules/Command.pm
index d910bda..5105c3b 100644
--- a/modules/Command.pm
+++ b/modules/Command.pm
@@ -581,6 +581,7 @@ sub exec_copy($$)
  my $new_physical   = $data->{'new_physical'};
 
  return error($config->{'errors'}->{'link_copy'},$dir) if(-l $physical);
+ return error($config->{'errors'}->{'no_copy'},$dir)   unless(-r $physical);
 
  if($new_physical)
  {