;; Poor man's paredit-mode for Delphi.
(add-hook 'pascal-mode-hook
          (lambda ()
            (setq skeleton-pair t)
            (mapcar (lambda (c) (local-set-key (eval `(kbd ,c))
                                               'skeleton-pair-insert-maybe))
                    '("[" "(" "{" "'"))))

(setq auto-mode-alist
      (append
	'(("\\.dpr\\'" . pascal-mode))
	auto-mode-alist))

(provide 'pmg-pascal)