From 6121051718cc848b2899ee33a0a27e7edd038526 Mon Sep 17 00:00:00 2001 From: Carl Sorensen Date: Wed, 17 Nov 2010 21:22:36 -0700 Subject: [PATCH] Fix typo/thinko in determining frets from fretboards. --- 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 ece0031b78..5380d67054 100644 --- a/scm/translation-functions.scm +++ b/scm/translation-functions.scm @@ -229,7 +229,7 @@ dot placement entries." (define (placement-list->string-frets placement-list) "Convert @var{placement-list} to string-fret list." (map (lambda (x) (cdr x)) - (filter (lambda (l) (eq? (cdr l) 'place-fret) placement-list)))) + (filter (lambda (l) (eq? (car l) 'place-fret)) placement-list))) (define (get-predefined-fretboard predefined-fret-table tuning pitches) -- 2.39.2