hide time signature in markup command

[Marc Mouries]

i use a shorthand mark up command to insert music snippets into text. 

See below definition "WriteScore"

I'd like to add a command to hide the time signature

\override Staff.TimeSignature #'stencil = ##f 

In scheme the command should be something like this : 

      (make-music 'OverrideProperty

            'pop-first           #t

            'grob-value          #f

            'grob-property-path  (list (quote stencil))

            'symbol              'TimeSignature

Where can this be inserted?

%============================================= 
% WRITE SCORE 
% 
%============================================= 
#(define-markup-command (writeScore layout props music) (ly:music?) 
   (let ((score (ly:make-score music)) 
         (score-layout (ly:output-def-clone $defaultlayout))) 
     ;; possibly, change some settings in the \layout block 
     %(ly:output-def-set-variable! score-layout 'indent 0) 
     ;; add the \layout block to the score 
     (ly:score-add-output-def! score score-layout) 
     (interpret-markup layout props (markup #:score score) ) 
     )) 


snippet = { c d e}

\markup { 
  "Example:" \writeScore \snippet
} 

--

-- Marc