Mercurial > emacs
comparison lisp/progmodes/ada-mode.el @ 90188:01137c1fdbe9
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-57
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 324-352)
- Merge from gnus--rel--5.10
- Update from CVS
- etc/emacs-buffer.gdb: Remove RCS keywords
* gnus--rel--5.10 (patch 70-79)
- Update from CVS
- Merge from emacs--cvs-trunk--0
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Mon, 06 Jun 2005 02:39:45 +0000 |
| parents | 62afea0771d8 f2892faa87d4 |
| children | a1b34dec1104 |
comparison
equal
deleted
inserted
replaced
| 90187:587ea1490d70 | 90188:01137c1fdbe9 |
|---|---|
| 1367 (set (make-local-variable 'skeleton-further-elements) | 1367 (set (make-local-variable 'skeleton-further-elements) |
| 1368 '((< '(backward-delete-char-untabify | 1368 '((< '(backward-delete-char-untabify |
| 1369 (min ada-indent (current-column)))))) | 1369 (min ada-indent (current-column)))))) |
| 1370 (add-hook 'skeleton-end-hook 'ada-adjust-case-skeleton nil t) | 1370 (add-hook 'skeleton-end-hook 'ada-adjust-case-skeleton nil t) |
| 1371 | 1371 |
| 1372 (run-hooks 'ada-mode-hook) | 1372 (run-mode-hooks 'ada-mode-hook) |
| 1373 | 1373 |
| 1374 ;; To be run after the hook, in case the user modified | 1374 ;; To be run after the hook, in case the user modified |
| 1375 ;; ada-fill-comment-prefix | 1375 ;; ada-fill-comment-prefix |
| 1376 (make-local-variable 'comment-start) | 1376 (make-local-variable 'comment-start) |
| 1377 (if ada-fill-comment-prefix | 1377 (if ada-fill-comment-prefix |