@@ -30,7 +30,7 @@ my %options = (
3030" excludes=s" => \$excludes ,
3131" indent=s" => \$indent ,
3232" build" => \$build ,);
33- GetOptions(%options ) ||die " bad command line argument" ;
33+ GetOptions(%options ) ||die " bad command line argument\n " ;
3434
3535run_build($code_base )if ($build );
3636
@@ -118,11 +118,11 @@ sub load_typedefs
118118if (-f " $tdtry /src/tools/pgindent/typedefs.list" );
119119$tdtry =" $tdtry /.." ;
120120}
121- die " cannot locate typedefs file\" $typedefs_file \" "
121+ die " cannot locate typedefs file\" $typedefs_file \"\n "
122122unless $typedefs_file &&-f $typedefs_file ;
123123
124124open (my $typedefs_fh ,' <' ,$typedefs_file )
125- ||die " cannot open typedefs file\" $typedefs_file \" :$! " ;
125+ ||die " cannot open typedefs file\" $typedefs_file \" :$! \n " ;
126126my @typedefs = <$typedefs_fh >;
127127close ($typedefs_fh );
128128
@@ -144,7 +144,7 @@ sub process_exclude
144144{
145145if ($excludes &&@files )
146146{
147- open (my $eh ,' <' ,$excludes ) ||die " cannot open exclude file\" $excludes \" " ;
147+ open (my $eh ,' <' ,$excludes ) ||die " cannot open exclude file\" $excludes \"\n " ;
148148while (my $line = <$eh >)
149149{
150150chomp $line ;
@@ -163,7 +163,7 @@ sub read_source
163163my $source ;
164164
165165open (my $src_fd ,' <' ,$source_filename )
166- ||die " cannot open file\" $source_filename \" :$! " ;
166+ ||die " cannot open file\" $source_filename \" :$! \n " ;
167167local ($/ ) =undef ;
168168$source = <$src_fd >;
169169close ($src_fd );
@@ -178,7 +178,7 @@ sub write_source
178178my $source_filename =shift ;
179179
180180open (my $src_fh ,' >' ,$source_filename )
181- ||die " cannot open file\" $source_filename \" :$! " ;
181+ ||die " cannot open file\" $source_filename \" :$! \n " ;
182182print $src_fh $source ;
183183close ($src_fh );
184184}
@@ -437,7 +437,7 @@ sub run_build
437437$code_base =" $code_base /.." ;
438438}
439439
440- die " cannot locate src/tools/pgindent directory in\" $code_base \" "
440+ die " cannot locate src/tools/pgindent directory in\" $code_base \"\n "
441441unless -d " $code_base /src/tools/pgindent" ;
442442
443443chdir " $code_base /src/tools/pgindent" ;
@@ -446,7 +446,7 @@ sub run_build
446446
447447my $rv = getstore($typedefs_list_url ," tmp_typedefs.list" );
448448
449- die " cannot fetch typedefs list from$typedefs_list_url " unless is_success($rv );
449+ die " cannot fetch typedefs list from$typedefs_list_url \n " unless is_success($rv );
450450
451451$ENV {PGTYPEDEFS } = abs_path(' tmp_typedefs.list' );
452452
@@ -455,7 +455,7 @@ sub run_build
455455
456456$rv = getstore($pg_bsd_indent_url ," pg_bsd_indent.tgz" );
457457
458- die " cannot fetch BSD indent tarfile from$pg_bsd_indent_url " unless is_success($rv );
458+ die " cannot fetch BSD indent tarfile from$pg_bsd_indent_url \n " unless is_success($rv );
459459
460460# XXX add error checking here
461461
@@ -485,7 +485,7 @@ sub build_clean
485485$code_base =" $code_base /.." ;
486486}
487487
488- die " cannot locate src/tools/pgindent directory in\" $code_base \" "
488+ die " cannot locate src/tools/pgindent directory in\" $code_base \"\n "
489489unless -d " $code_base /src/tools/pgindent" ;
490490
491491chdir " $code_base " ;