From 520a0579683328dd8bc0771298ae6ea203353479 Mon Sep 17 00:00:00 2001
From: glyn <glyn@8kb.co.uk>
Date: Wed, 7 Jan 2015 13:39:26 +0000
Subject: [PATCH] Fix indentation

---
 pg_controldata.plperlu | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/pg_controldata.plperlu b/pg_controldata.plperlu
index 844e74c..2a8bf3f 100755
--- a/pg_controldata.plperlu
+++ b/pg_controldata.plperlu
@@ -17,7 +17,7 @@ $BODY$
     my $rv;
     my $data_dir;
     my $pg_controldata_bin = 'pg_controldata';
-	my @fields;
+    my @fields;
     
     $rv = spi_exec_query('SHOW data_directory', 1);
     $data_dir = $rv->{rows}[0]->{data_directory};
@@ -25,15 +25,14 @@ $BODY$
     open(FD,"$pg_controldata_bin $data_dir | ");
     
     while(<FD>) {
-		@fields = split(':', $_, 2);
-		$fields[0] =~ s/^\s+|\s+$//g;
-		$fields[1] =~ s/^\s+|\s+$//g;
-		return_next { name => $fields[0], setting => $fields[1]};
+        @fields = split(':', $_, 2);
+        $fields[0] =~ s/^\s+|\s+$//g;
+        $fields[1] =~ s/^\s+|\s+$//g;
+        return_next { name => $fields[0], setting => $fields[1]};
     }
     close (FD);
     
     return;    
-
 $BODY$
 LANGUAGE plperlu;
 
-- 
2.39.5