Add docstring to def-grace-function

diff --git a/scm/music-functions.scm b/scm/music-functions.scm
index f9599af572b51782c6d390608c21e3e8f730f843..d6de35852d42dea1f68c55f44f319f5b1c491110 100644 (file)
--- a/scm/music-functions.scm
+++ b/scm/music-functions.scm
@@ -720,8 +720,10 @@ SkipEvent. Useful for extracting parts from crowded scores"
 
 
 
-(defmacro-public def-grace-function (start stop)
+(defmacro-public def-grace-function (start stop . docstring)
+  "Helper macro for defining grace music"
   `(define-music-function (parser location music) (ly:music?)
+     ,@docstring
      (make-music 'GraceMusic
                 'origin location
                 'element (make-music 'SequentialMusic