diff --git a/src/framework/mpas_io.F b/src/framework/mpas_io.F index e04e6bda33..d38f206024 100644 --- a/src/framework/mpas_io.F +++ b/src/framework/mpas_io.F @@ -4592,8 +4592,8 @@ subroutine MPAS_io_put_att_text(handle, attName, attValue, fieldname, syncVal, i trimmedVal = trim(attValue) if ( valLen > StrKind ) then - call mpas_log_write('Attribute ''' // trim(attName) // ''' has a value longer than StrKIND. " // & - "It will be cut to a length of $i', MPAS_LOG_WARN, intArgs=(/StrKIND/) ) + call mpas_log_write('Attribute ''' // trim(attName) // ''' has a value longer than StrKIND. ' // & + 'It will be cut to a length of $i', MPAS_LOG_WARN, intArgs=(/StrKIND/) ) attValueLocal = trimmedVal(1:StrKIND) else attValueLocal = trimmedVal