\version "2.1.8"

\header {
  title      =  "Drums bug"
  instrument =  "Drums v1"
  tagline   =   "Transcribed using LilyPond (www.lilypond.org)"
}

\include "drums.ly"

drh = \notes { 

 <<
 \context Voice=VA {\voiceOne }
 \context Voice=VB {\voiceTwo 
    <<tomml4 tomfh4>> tomml4 tomfh4 <tomfh tomml>4
 }
 >>

}

\score { 
  \context Staff=drumst \notes <<
    \property Staff.NoteHead
     \set #'font-name = #"feta11"
    \property Staff.instrument="Drums"
    \clef "percussion"
    \apply #(drums->paper 'mydrums) <<
     \drh
    >>
 >>
 \paper {
   \translator {
      \StaffContext
      \consists Instrument_name_engraver
      Script \override #'padding = #0.5
   }
 }
}