(let ((modes (list
     '("\\.php\\'"                                               . html-mode)
     '("\\.bal\\'"                                               . balance-mode)
     '("\\.gpi\\'"                                               . gnuplot-mode)
     '("\\.\\(glsl\\|oil\\|ssc\\|dfy\\)\\'"                      . c-mode)
     '("\\.lu\\'"                                                . lua-mode)
     '("keys\\'"                                                 . conf-mode)
     '("\\.\\(service\\|list\\|theme\\|mailrc\\|sed\\|inc\\)\\'" . conf-mode)
     '("\\.pic\\'"                                               . nroff-mode)
     '("\\.xr\\'"                                                . conf-xdefaults-mode)
     '("inputrc\\'"                                              . conf-colon-mode)
     '("README\\'"                                               . text-mode)
     '("\\.service\\'"                                           . emacs)
     )))
  (setf auto-mode-alist (nconc modes auto-mode-alist)) )

(setq magic-mode-alist '(("/\\* cpp \\*/" . c++-mode)))