]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/translation-functions.scm
* po/de.po: new po courtesy translation team.
[lilypond.git] / scm / translation-functions.scm
index 0eab4fe5dea74b27df27eadd649e5b1a42551a80..eab413f5ce8a1cd7ba220b5025dcb073889b58c6 100644 (file)
        
 
   ;;; body.
-
   (set! specified-frets
        (filter identity (map
                      (lambda (note)
                                       (note-string note) tunings)
                            #f))
                      notes)))
-  (set! free-strings (map 1+ (iota (length tunings))))
 
-  
+
+  (set! free-strings (map 1+ (iota (length tunings))))
     
   (for-each (lambda (note)
              (del-string (note-string note)))
                           
               )))
    (sort notes note-pitch<?))
-  
-  
 
-    string-fret-fingering-tuples)
+  string-fret-fingering-tuples)