964 |
(if (consp file) (setq file (car file))) |
(if (consp file) (setq file (car file))) |
965 |
(if (consp line) (setq line (car line))) |
(if (consp line) (setq line (car line))) |
966 |
(if (consp col) (setq col (car col))) |
(if (consp col) (setq col (car col))) |
967 |
|
|
968 |
(when (not (functionp line)) |
(when (not (functionp line)) |
969 |
(setq converted-list (cons (list regexp file line col) converted-list))))) |
(setq converted-list (cons (list regexp file line col) converted-list))))) |
970 |
converted-list)) |
converted-list)) |
1508 |
"Minor mode to do on-the-fly syntax checking. |
"Minor mode to do on-the-fly syntax checking. |
1509 |
When called interactively, toggles the minor mode. |
When called interactively, toggles the minor mode. |
1510 |
With arg, turn Flymake mode on if and only if arg is positive." |
With arg, turn Flymake mode on if and only if arg is positive." |
1511 |
:lighter flymake-mode-line |
:group 'flymake :lighter flymake-mode-line |
1512 |
(if flymake-mode |
(if flymake-mode |
1513 |
(if (flymake-can-syntax-check-file (buffer-file-name)) |
(if (flymake-can-syntax-check-file (buffer-file-name)) |
1514 |
(flymake-mode-on) |
(flymake-mode-on) |