]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/les-nereides.ly
release: 1.3.138
[lilypond.git] / input / les-nereides.ly
index 1ec8d19574c1d6995087be5bb702f14c130c0c26..dc4e04f823d5794507b1d567e1bc184132f82953 100644 (file)
@@ -25,8 +25,8 @@ cpp -P -traditional -o l-fake.ly  -DFAKE_GRACE les-nereides.ly
  #(define (make-text-checker text)
   (lambda (elt)
      ;; huh, string-match undefined?
-     ;; (string-match text (ly-get-elt-property elt 'text))
-     (equal? text (ly-get-elt-property elt 'text))
+     ;; (string-match text (ly-get-grob-property elt 'text))
+     (equal? text (ly-get-grob-property elt 'text))
     ))