enable UTF-16 filter by default if relevant BOM is seen; various

cleanups (typos, misformatted code, and small bugs)

p4raw-id: //depot/perl@6399

1 files changed, 1 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index 1649cf4d2c..cb55181a83 100644
--- a/pp.c
+++ b/pp.c
@@ -4418,7 +4418,7 @@ PP(pp_pack)
 	    patcopy++;
 	    continue;
         }
-	if (datumtype == 'U' && pat==patcopy+1) 
+	if (datumtype == 'U' && pat == patcopy+1) 
 	    SvUTF8_on(cat);
 	if (datumtype == '#') {
 	    while (pat < patend && *pat != '\n')