7 files changed, 10 insertions, 10 deletions

diff --git a/doio.c b/doio.c
index 9bbf2a4c57..23aedfb342 100644
--- a/doio.c
+++ b/doio.c
@@ -774,7 +774,7 @@ Perl_do_open6(pTHX_ GV *gv, const char *oname, STRLEN len,
 			Perl_croak(aTHX_ "More than one argument to '>%c' open",IoTYPE_STD);
 		    }
 		}
-		else  {
+		else {
 		    if (num_svs) {
                         fp = PerlIO_openn(aTHX_ type,mode,-1,0,0,NULL,num_svs,svp);
                     }
diff --git a/op.h b/op.h
index 2f2b8ca816..e634eeaa97 100644
--- a/op.h
+++ b/op.h
@@ -181,7 +181,7 @@ Deprecated.  Use C<GIMME_V> instead.
 
 
 /* things that can be elements of op_aux */
-typedef union  {
+typedef union {
     PADOFFSET pad_offset;
     SV        *sv;
     IV        iv;
diff --git a/regcomp.c b/regcomp.c
index cbc4450a1a..731063ae88 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -6928,7 +6928,7 @@ S_concat_pat(pTHX_ RExC_state_t * const pRExC_state,
                 pRExC_state->code_blocks->count -= n;
             n = 0;
         }
-        else  {
+        else {
             /* ... or failing that, try "" overload */
             while (SvAMAGIC(msv)
                     && (sv = AMG_CALLunary(msv, string_amg))
diff --git a/sv.c b/sv.c
index cb02219af7..7e82b84ea2 100644
--- a/sv.c
+++ b/sv.c
@@ -2411,7 +2411,7 @@ S_sv_2iuv_common(pTHX_ SV *const sv)
 	    SvFLAGS(sv) &= ~(SVf_IOK|SVf_NOK);
 	}
     }
-    else  {
+    else {
 	if (isGV_with_GP(sv))
 	    return glob_2number(MUTABLE_GV(sv));
 
@@ -2806,7 +2806,7 @@ Perl_sv_2nv_flags(pTHX_ SV *const sv, const I32 flags)
 	    SvFLAGS(sv) &= ~(SVf_IOK|SVf_NOK);
 #endif /* NV_PRESERVES_UV */
     }
-    else  {
+    else {
 	if (isGV_with_GP(sv)) {
 	    glob_2number(MUTABLE_GV(sv));
 	    return 0.0;
@@ -16582,7 +16582,7 @@ S_find_uninit_var(pTHX_ const OP *const obase, const SV *const uninit_sv,
 		    negate ? - SvIV(cSVOPx_sv(kid)) : SvIV(cSVOPx_sv(kid)),
 		    FUV_SUBSCRIPT_ARRAY);
 	}
-	else  {
+	else {
 	    /* index is an expression;
 	     * attempt to find a match within the aggregate */
 	    if (obase->op_type == OP_HELEM) {
@@ -16794,7 +16794,7 @@ S_find_uninit_var(pTHX_ const OP *const obase, const SV *const uninit_sv,
 		: varname(agg_gv, '@', agg_targ,
                                 NULL, index_const_iv, FUV_SUBSCRIPT_ARRAY);
 	}
-	else  {
+	else {
 	    /* index is an var */
 	    if (is_hv) {
 		SV * const keysv = find_hash_subscript((const HV*)sv, uninit_sv);
diff --git a/toke.c b/toke.c
index 953877e1c1..f03c827305 100644
--- a/toke.c
+++ b/toke.c
@@ -4259,7 +4259,7 @@ S_scan_const(pTHX_ char *start)
 	    } else if (PL_lex_inpat && SvIVX(PL_linestr) == '\'') {
 		type = "q";
 		typelen = 1;
-	    } else  {
+	    } else {
 		type = "qq";
 		typelen = 2;
 	    }
diff --git a/vms/vms.c b/vms/vms.c
index 805c916fa1..b31aa97c18 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -3311,7 +3311,7 @@ pipe_tochild1_ast(pPipe p)
             p->shut_on_empty = TRUE;
             b->eof     = TRUE;
             _ckvmssts_noperl(sys$dassgn(p->chan_in));
-        } else  {
+        } else {
             _ckvmssts_noperl(iss);
         }
 
diff --git a/win32/win32.c b/win32/win32.c
index 7f5482b65e..2a4ff3924b 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -3913,7 +3913,7 @@ RETRY:
 	w32_child_pids[w32_num_children] = (DWORD)ret;
 	++w32_num_children;
     }
-    else  {
+    else {
 	DWORD status;
 	win32_msgwait(aTHX_ 1, &ProcessInformation.hProcess, INFINITE, NULL);
 	/* FIXME: if msgwait returned due to message perhaps forward the