(custom-set-variables
 '(delete-key-deletes-forward t)
 '(prolog-program-name "pl"))
(custom-set-faces)
(global-set-key [f9] 'dabbrev-expand)

(autoload 'prolog-mode "prolog" "Major mode for editing Prolog programs." t)
(setq auto-mode-alist (append
                       (list
                        (cons "\\.pl$" 'prolog-mode))
                       auto-mode-alist))

(add-hook 'prolog-mode-hook 'turn-on-font-lock)

(add-hook 'prolog-mode-hook '(lambda () (line-number-mode 1)))