diff options
| author | Alexander Sulfrian <alexander@sulfrian.net> | 2010-01-13 06:25:15 +0100 |
|---|---|---|
| committer | Alexander Sulfrian <alexander@sulfrian.net> | 2010-01-13 06:25:15 +0100 |
| commit | d573b7413e267aae0c32e083cec45d583ccf0562 (patch) | |
| tree | 21210212934a70bdb84ebe2f6ca8fa7a0e6203d7 /emacs.d/lisp/delphi-mode-ench.el | |
| parent | f19dd70ece015509d52d0e9a7c113ccccad96e0e (diff) | |
| download | dotfiles-d573b7413e267aae0c32e083cec45d583ccf0562.tar.gz dotfiles-d573b7413e267aae0c32e083cec45d583ccf0562.tar.xz dotfiles-d573b7413e267aae0c32e083cec45d583ccf0562.zip | |
heavy update of emacs configs
Diffstat (limited to '')
| -rw-r--r-- | emacs.d/lisp/delphi-mode-ench.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/emacs.d/lisp/delphi-mode-ench.el b/emacs.d/lisp/delphi-mode-ench.el index 04e017a..fcbb3ae 100644 --- a/emacs.d/lisp/delphi-mode-ench.el +++ b/emacs.d/lisp/delphi-mode-ench.el @@ -1,4 +1,10 @@ ;;; delphi-mode-ench.el +(require 'compile) +(pushnew '("^\\([-a-zA-Z0-9\\.\\/_~]+\\)(\\([0-9]+\\),\\([0-9]+\\))\s\\([Ff]atal:\\|[Nn]ote:\\|[Ww]arning:\\|[Ee]rror:\\)\s\\(.*$\\)" 1 2 3) + compilation-error-regexp-alist) + +(setq auto-mode-alist (cons '("\\.pas" . delphi-mode) auto-mode-alist)) + (setq delphi-unit-sections '(implementation program library package)) @@ -55,7 +61,7 @@ (if pos (goto-char pos)) (re-search-forward "\\(begin\\|implementation\\)" nil t) (let ((match (match-string-no-properties 1))) - (if (or (equal match "implementation") (equal match "end")) 't 'nil))))) + (if (equal match "implementation") 't 'nil))))) (defun delphi-in-class-definition (&optional pos) (if pos (goto-char pos)) |