* lily/translator-scheme.cc (ly:translator-property): Remove.

[lilypond.git] / scm / auto-beam.scm

diff --git a/scm/auto-beam.scm b/scm/auto-beam.scm
index 806287d1717e45c4a0a56c1794a5e0b878cae5c9..e3369a4346c32a0dd81f10925001c92f813c611e 100644 (file)
--- a/scm/auto-beam.scm
+++ b/scm/auto-beam.scm
@@ -185,12 +185,12 @@ a fresh copy of the list-head is made."
 ;;  4. exceptions for specific time signature
 ;;  5. easy catch-all rule for non-specified measure types
 
-(define-public (default-auto-beam-check translator dir test)
+(define-public (default-auto-beam-check context dir test)
   (define (get name default)
-    (let ((value (ly:translator-property translator name)))
+    (let ((value (ly:context-property context name)))
       (if (not (null? value)) value default)))
 
-  (if (!= (ly:moment-grace-numerator (ly:translator-now translator)) 0)
+  (if (!= (ly:moment-grace-numerator (ly:context-now context)) 0)
       ;; No auto beaming for grace notes
       #f
       (let* ((beat-length (get 'beatLength (ly:make-moment 1 1)))