(setq auto-mode-alist
(append
(list
'("\\.fo$" . xsl-mode)
'("\\.fo\\'" . xsl-mode)
'("\\.xsl" . xsl-mode))
'("\\.xsl\\'" . xsl-mode))
auto-mode-alist))