scm/translation-functions, determine-frets, typo

A variable name-change from 70a6151a missed one spot

diff --git a/scm/translation-functions.scm b/scm/translation-functions.scm
index ca9bf7d11589f58a88702a481f6ff56df51c2b67..2d9d456067cc1954e8584a66a12c96cdb2b6416c 100644 (file)
--- a/scm/translation-functions.scm
+++ b/scm/translation-functions.scm
@@ -348,7 +348,7 @@ the current tuning?"
                                  tuning)))
        (if (< this-fret 0)
          (ly:warning (_ "Negative fret for pitch ~a on string ~a")
-                     (note-pitch note) string))
+                     (car pitch-entry) string))
        (delete-free-string string)
         (set! specified-frets (cons this-fret specified-frets))
         (list-set! string-fret-fingers