[Fai-commit] r3368 - trunk/bin

[fai-repository at svn.debian.org]

Author: lange
Date: 2006-04-03 13:11:54 +0000 (Mon, 03 Apr 2006)
New Revision: 3368

Modified:
   trunk/bin/fcopy
Log:
fix minor error


Modified: trunk/bin/fcopy
===================================================================
--- trunk/bin/fcopy	2006-04-03 11:29:40 UTC (rev 3367)
+++ trunk/bin/fcopy	2006-04-03 13:11:54 UTC (rev 3368)
@@ -27,7 +27,7 @@
 # 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 #*********************************************************************
 
-my $version = "Version 2.2.5, 2-april-2006";
+my $version = "Version 2.2.5, 3-april-2006";
 
 use strict;
 use File::Copy;
@@ -86,7 +86,7 @@
   warn "copy_one: source: $source: ps: $ps tpath: $tpath\n" if $debdry;
 
   # $prefix/$source must be a directory
-  unless (-f $ps) { ewarn("$ps is a file, but must be a directory containing templates.");return }
+  if (-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/$_"; }