1 2
au BufNewFile,BufRead *.txr setf txr | set lisp au BufNewFile,BufRead *.tl,*.tlo setf tl | set lisp