Pre-beta mechanical code beautification.

Run pgindent, pgperltidy, and reformat-dat-files.

The pgindent part of this is pretty small, consisting mainly of
fixing up self-inflicted formatting damage from patches that
hadn't bothered to add their new typedefs to typedefs.list.
In order to keep it from making anything worse, I manually added
a dozen or so typedefs that appeared in the existing typedefs.list
but not in the buildfarm's list.  Perhaps we should formalize that,
or better find a way to get those typedefs into the automatic list.

pgperltidy is as opinionated as always, and reformat-dat-files too.

1 files changed, 12 insertions, 7 deletions

diff --git a/src/test/perl/PostgreSQL/Test/Kerberos.pm b/src/test/perl/PostgreSQL/Test/Kerberos.pm
index f7810da9c1d..f76d765368e 100644
--- a/src/test/perl/PostgreSQL/Test/Kerberos.pm
+++ b/src/test/perl/PostgreSQL/Test/Kerberos.pm
@@ -10,10 +10,12 @@ use strict;
 use warnings FATAL => 'all';
 use PostgreSQL::Test::Utils;
 
-our ($krb5_bin_dir, $krb5_sbin_dir, $krb5_config, $kinit, $klist,
-	 $kdb5_util, $kadmin_local, $krb5kdc,
-	 $krb5_conf, $kdc_conf, $krb5_cache, $krb5_log, $kdc_log,
-	 $kdc_port, $kdc_datadir, $kdc_pidfile, $keytab);
+our (
+	$krb5_bin_dir, $krb5_sbin_dir, $krb5_config, $kinit,
+	$klist, $kdb5_util, $kadmin_local, $krb5kdc,
+	$krb5_conf, $kdc_conf, $krb5_cache, $krb5_log,
+	$kdc_log, $kdc_port, $kdc_datadir, $kdc_pidfile,
+	$keytab);
 
 INIT
 {
@@ -178,7 +180,8 @@ $realm = {
     key_stash_file = $kdc_datadir/_k5.$realm
 }!);
 
-	mkdir $kdc_datadir or BAIL_OUT("could not create directory \"$kdc_datadir\"");
+	mkdir $kdc_datadir
+	  or BAIL_OUT("could not create directory \"$kdc_datadir\"");
 
 	# Ensure that we use test's config and cache files, not global ones.
 	$ENV{'KRB5_CONFIG'} = $krb5_conf;
@@ -189,7 +192,8 @@ $realm = {
 
 	system_or_bail $kdb5_util, 'create', '-s', '-P', 'secret0';
 
-	system_or_bail $kadmin_local, '-q', "addprinc -randkey $service_principal";
+	system_or_bail $kadmin_local, '-q',
+	  "addprinc -randkey $service_principal";
 	system_or_bail $kadmin_local, '-q', "ktadd -k $keytab $service_principal";
 
 	system_or_bail $krb5kdc, '-P', $kdc_pidfile;
@@ -226,7 +230,8 @@ END
 	# take care not to change the script's exit value
 	my $exit_code = $?;
 
-	kill 'INT', `cat $kdc_pidfile` if defined($kdc_pidfile) && -f $kdc_pidfile;
+	kill 'INT', `cat $kdc_pidfile`
+	  if defined($kdc_pidfile) && -f $kdc_pidfile;
 
 	$? = $exit_code;
 }