From 46b112bcd439f4413925a7300d66a3e6f148765e Mon Sep 17 00:00:00 2001
From: Yang Tse <yangsita@gmail.com>
Date: Tue, 16 Feb 2010 13:32:45 +0000
Subject: replaced tabs with spaces

---
 tests/libtest/test610.pl | 46 +++++++++++++++++++++++-----------------------
 1 file changed, 23 insertions(+), 23 deletions(-)

(limited to 'tests/libtest/test610.pl')

diff --git a/tests/libtest/test610.pl b/tests/libtest/test610.pl
index c9542ca51..a900d94b4 100755
--- a/tests/libtest/test610.pl
+++ b/tests/libtest/test610.pl
@@ -2,32 +2,32 @@
 # Perform simple file and directory manipulation in a portable way
 if ( $#ARGV <= 0 )
 {
-	print "Usage: $0 mkdir|rmdir|rm|move|gone path1 [path2] [more commands...]\n";
-	exit 1;
+    print "Usage: $0 mkdir|rmdir|rm|move|gone path1 [path2] [more commands...]\n";
+    exit 1;
 }
 
 use File::Copy;
 while(@ARGV) {
-	my $cmd = shift @ARGV;
-	my $arg = shift @ARGV;
-	if ($cmd eq "mkdir") {
-		mkdir $arg || die "$!";
-	}
-	elsif ($cmd eq "rmdir") {
-		rmdir $arg || die "$!";
-	}
-	elsif ($cmd eq "rm") {
-		unlink $arg || die "$!";
-	}
-	elsif ($cmd eq "move") {
-		my $arg2 = shift @ARGV;
-		move($arg,$arg2) || die "$!";
-	}
-	elsif ($cmd eq "gone") {
-		! -e $arg || die "Path $arg exists";
-	} else {
-		print "Unsupported command $cmd\n";
-		exit 1;
-	}
+    my $cmd = shift @ARGV;
+    my $arg = shift @ARGV;
+    if ($cmd eq "mkdir") {
+        mkdir $arg || die "$!";
+    }
+    elsif ($cmd eq "rmdir") {
+        rmdir $arg || die "$!";
+    }
+    elsif ($cmd eq "rm") {
+        unlink $arg || die "$!";
+    }
+    elsif ($cmd eq "move") {
+        my $arg2 = shift @ARGV;
+        move($arg,$arg2) || die "$!";
+    }
+    elsif ($cmd eq "gone") {
+        ! -e $arg || die "Path $arg exists";
+    } else {
+        print "Unsupported command $cmd\n";
+        exit 1;
+    }
 }
 exit 0;
-- 
cgit v1.2.3