From 05e324057407031d2b0ce872db809e055bac359f Mon Sep 17 00:00:00 2001
From: Keith OHara <k-ohara5a5a@oco.net>
Date: Wed, 25 May 2011 20:19:19 -0700
Subject: [PATCH] scm/translation-functions, determine-frets, typo

A variable name-change from 70a6151a missed one spot
---
 scm/translation-functions.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scm/translation-functions.scm b/scm/translation-functions.scm
index ca9bf7d115..2d9d456067 100644
--- 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
-- 
2.39.5