В Emacs добавил себе column-marker
(add-to-list 'load-path (expand-file-name "~/emacs/column-marker")) (require 'column-marker) (add-hook 'ada-mode-hook (lambda () (interactive) (column-marker-3 79)))
Теперь, если в в Адском коде длина строки превышает 79 символом, Emacs подсвечивает часть строки красненьким.
P.S. Заодно проверю, есть ли реклама в Фиде. Вроде с горем пополам я ее отключил.
Можно обойтись и whitespace-mode
ОтветитьУдалить(defun my-ada-mode-hook ()
(set-face-foreground 'whitespace-line "red")
(set-face-background 'whitespace-line nil)
(setq whitespace-style '(face lines-tail))
(setq whitespace-line-column 79)
(whitespace-mode))
(add-hook 'ada-mode-hook 'my-ada-mode-hook)
Спасибо, попробую.
ОтветитьУдалитьЕсть еще whitespace-mode который кроме всего умеет подкрашивать слишком длинные строки.
ОтветитьУдалить$eix develock
ОтветитьУдалить[I] app-emacs/develock
Available versions: 0.39
Installed versions: 0.39(05:28:32 PM 01/04/2012)
Homepage: http://www.jpl.org/ftp/pub/elisp/
Description: An Emacs minor mode for highlighting broken formatting rules
;; Develock is a minor mode which provides the ability to make font-
;; lock highlight leading and trailing whitespace, long lines and
;; oddities in the file buffer for Lisp modes, ChangeLog mode, Texinfo
;; mode, C modes, Java mode, Jde-mode , CPerl mode, Perl mode, HTML
;; modes, some Mail modes, Tcl mode and Ruby mode.
Ada not supported... yet ;-)