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

---
 perl/contrib/formfind | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl/contrib/formfind')

diff --git a/perl/contrib/formfind b/perl/contrib/formfind
index 6d291ddd6..c080f7416 100755
--- a/perl/contrib/formfind
+++ b/perl/contrib/formfind
@@ -74,7 +74,7 @@ while(<STDIN>) {
 while($in =~ /[^<]*(<[^>]+>)/g ) {
     # we have a tag in $1
     $tag = $1;
-	
+
     if($tag =~ /^<!--/) {
         # this is a comment tag, ignore it
     }
@@ -99,7 +99,7 @@ while($in =~ /[^<]*(<[^>]+>)/g ) {
 
                 if($enctype eq "multipart/form-data") {
                     $enctype="multipart form upload [use -F]"
-		    }
+                }
                 $enctype = "\n--- type: $enctype";
             }
             else {
@@ -134,7 +134,7 @@ while($in =~ /[^<]*(<[^>]+>)/g ) {
             $mtag = $1;
 
             ($name, $value)=namevalue($tag);
-		
+
             if($mtag =~ /select/i) {
                 print "Select: NAME=\"$name\"\n";
                 push @vars, "$name";
-- 
cgit v1.2.3