From: pcanterino <>
Date: Wed, 6 Jul 2005 19:47:14 +0000 (+0000)
Subject: Whoops...
X-Git-Tag: version_3_0~11
X-Git-Url: https://git.p6c8.net/devedit.git/commitdiff_plain/9f3101dfe2af7b176b0d191dd75d3d3d14ee2c34

Whoops...
---

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)
  {