+ ;; slightly spaghetti-ish: deciding what to load where
+ ;; is smeared out.
+ (font-loader (lambda (name)
+ (cond
+ ((ly:get-option 'gs-load-fonts)
+ (load-font-via-GS name))
+ ((ly:get-option 'gs-load-lily-fonts)
+ (if (or
+ (string-contains (caddr name) (ly:get-option 'datadir))
+ (internal-font? (caddr name)))
+
+ (load-font-via-GS name)
+ (load-font name)))
+ (else (load-font name)))))