Skip to content

Commit dcd6b28

Browse files
author
Vandenplas, Jeremie
committed
logger: some formattig
1 parent 75fff34 commit dcd6b28

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

src/stdlib_logger.f90

+4-4
Original file line numberDiff line numberDiff line change
@@ -544,8 +544,8 @@ subroutine format_output_string( self, unit, string, procedure_name, &
544544

545545
subroutine format_first_line()
546546

547-
if ( self % max_width == 0 .or. &
548-
( length <= self % max_width .and. &
547+
if ( self % max_width == 0 .or. &
548+
( length <= self % max_width .and. &
549549
index( string(1:min(length, self % max_width)), new_line('a')) == 0 &
550550
)) then
551551
write( unit, '(a)', err=999, iostat=iostat, iomsg=iomsg ) &
@@ -630,7 +630,7 @@ subroutine indent_format_subsequent_line()
630630
return
631631
else
632632

633-
index_ = count + index( string(count+1: &
633+
index_ = count + index( string(count+1: &
634634
min ( length, count+self % max_width - indent_len) ), &
635635
new_line('a'))
636636
if(index_ == count) then
@@ -641,7 +641,7 @@ subroutine indent_format_subsequent_line()
641641

642642
if ( index_ == count ) then
643643
write( unit, '(a)', err=999, iostat=iostat, iomsg=iomsg ) &
644-
col_indent // &
644+
col_indent // &
645645
string(count+1:count+self % max_width-indent_len)
646646
count = count + self % max_width - indent_len
647647
remain = length - count

0 commit comments

Comments
 (0)