diff options
Diffstat (limited to 'favorites.f90')
-rw-r--r-- | favorites.f90 | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/favorites.f90 b/favorites.f90 index f51a753..f83d026 100644 --- a/favorites.f90 +++ b/favorites.f90 @@ -219,7 +219,8 @@ contains integer, intent(in)::unit_number type(favorite), intent(in)::f - write(unit_number, *) "=> "//trim(f%link)//" "//f%name + write(unit_number, '(A3)', advance='no') "=> " + write(unit_number, *) trim(f%link)//" "//f%name end subroutine write_favorite @@ -232,7 +233,7 @@ contains integer::i character(8)::n_text - write(unit_number, *) "Favorites" + write(unit_number, '(A11)') "# Favorites" write(unit_number, *) write(n_text, '(I8)') size(faves) |