From 42cd1dadc3513f9f004a85579ea5ef33b466fc02 Mon Sep 17 00:00:00 2001
From: steve <none@none>
Date: Wed, 21 Dec 2005 02:47:41 +0000
Subject: [PATCH] 2005-12-21 02:47:41 by steve   Avoid extra newline when
 caching files from debootstrap to host,  and ensure the filenames are
 displayed in the copying loop.

---
 xen-create-image | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/xen-create-image b/xen-create-image
index 2d5dc65..fd57d1f 100755
--- a/xen-create-image
+++ b/xen-create-image
@@ -208,7 +208,7 @@ suffixed with either Mb, or Gb.
  --
  http://www.steve.org.uk/
 
- $Id: xen-create-image,v 1.43 2005-12-21 02:40:50 steve Exp $
+ $Id: xen-create-image,v 1.44 2005-12-21 02:47:41 steve Exp $
 
 =cut
 
@@ -469,14 +469,14 @@ runCommandWithProgress( $debootstrap );
 #
 #  Copy these files as a speed boost for the next run.
 #
-print "\n\nCaching debootstrap files upon the host system\n\n";
+print "\n\nCaching debootstrap files to the host system\n";
 @files =  glob( "$dir/var/cache/apt/archives/*.deb" );
 $count = 1;
 $total = $#files + 1;
 foreach my $file ( @files )
 {
     my $t = "\r[$count/$total] : ";
-    if ( $t =~ /(.*)\/(.*)/ )
+    if ( $file =~ /(.*)\/(.*)/ )
     {
 	$t .= $2;
     }