[Fai-commit] r3365 - trunk/bin

[fai-repository at svn.debian.org]

Author: lange
Date: 2006-04-02 14:49:12 +0000 (Sun, 02 Apr 2006)
New Revision: 3365

Modified:
   trunk/bin/fcopy
Log:
change error message


Modified: trunk/bin/fcopy
===================================================================
--- trunk/bin/fcopy	2006-04-01 22:15:57 UTC (rev 3364)
+++ trunk/bin/fcopy	2006-04-02 14:49:12 UTC (rev 3365)
@@ -27,7 +27,7 @@
 # 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 #*********************************************************************
 
-my $version = "Version 2.2.4, 1-april-2006";
+my $version = "Version 2.2.5, 2-april-2006";
 
 use strict;
 use File::Copy;
@@ -86,7 +86,8 @@
   warn "copy_one: source: $source: ps: $ps tpath: $tpath\n" if $debdry;
 
   # $prefix/$source must be a directory
-  unless (-d $ps) { ewarn("No directory $ps found. No files copied.");return }
+  unless (-f $ps) { ewarn("$ps is a file, but must be a directory containing templates.");return }
+  unless (-d $ps) { ewarn("Nonexisting directory $ps. No files copied.");return }
   # use the last class for which a file exists
   foreach (@classes) { $class = $_,last if -f "$ps/$_"; }
   $destfile = "$target/$source";