diamond+default

[David Bobroff]

In the following one measure extract I need a diamond shaped notehead on
the f-sharp.  Adding \property Voice.NoteHead \set #'style = #'diamond
before the f-sharp and then reverting to \property Voice.NoteHead \set
#'style = #'default immediately after does not work.  Obviously I'm doing
something wrong.  How do I achieve this?

Thanks,

David Bobroff

\score {
  \context Staff <
  
 \clef "alto"
 \notes \relative c'' { 

\time 4/4
 <fis1 b,>
 
  }>
  \paper {
        papersize = "a4"
  }
  
}