-(autoload 'lilypond-mode "lilypond-mode" nil t)
-(setq auto-mode-alist (cons '("\\.ly$" . lilypond-mode) auto-mode-alist))
-(add-hook 'lilypond-mode-hook (lambda () (turn-on-font-lock)))
+(autoload 'LilyPond-mode "lilypond-mode" nil t)
+(setq auto-mode-alist (append '(("\\.ly$" . LilyPond-mode) auto-mode-alist)))
+(add-hook 'LilyPond-mode-hook (lambda () (turn-on-font-lock)))