diff options
| author | Juanma Barranquero | 2007-01-14 03:46:56 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-01-14 03:46:56 +0000 |
| commit | f0b43df7a5e9683f5d413fb266a02f389ec5d58e (patch) | |
| tree | e48865fe323df7b164f60a45facc87d8de53a6ac | |
| parent | 429ab54e011ed79b3a0418eb8bd7691b50ce5b15 (diff) | |
| download | emacs-f0b43df7a5e9683f5d413fb266a02f389ec5d58e.tar.gz emacs-f0b43df7a5e9683f5d413fb266a02f389ec5d58e.zip | |
(antlr-indent-at-bol-alist): Fix typo in docstring.
| -rw-r--r-- | lisp/progmodes/antlr-mode.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/antlr-mode.el b/lisp/progmodes/antlr-mode.el index e31a94030c3..3b7a2015af5 100644 --- a/lisp/progmodes/antlr-mode.el +++ b/lisp/progmodes/antlr-mode.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; antlr-mode.el --- major mode for ANTLR grammar files | 1 | ;;; antlr-mode.el --- major mode for ANTLR grammar files |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006 | 3 | ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 |
| 4 | ;; Free Software Foundation, Inc. | 4 | ;; Free Software Foundation, Inc. |
| 5 | ;; | 5 | ;; |
| 6 | ;; Author: Christoph.Wedler@sap.com | 6 | ;; Author: Christoph.Wedler@sap.com |
| @@ -319,7 +319,7 @@ function and REGEXP is a regular expression. | |||
| 319 | 319 | ||
| 320 | If `antlr-language' equals to a MODE, the line starting at the first | 320 | If `antlr-language' equals to a MODE, the line starting at the first |
| 321 | non-whitespace is matched by the corresponding REGEXP, and the line is | 321 | non-whitespace is matched by the corresponding REGEXP, and the line is |
| 322 | part of an header action, indent the line at column 0 instead according | 322 | part of a header action, indent the line at column 0 instead according |
| 323 | to the normal rules of `antlr-indent-line'." | 323 | to the normal rules of `antlr-indent-line'." |
| 324 | :group 'antlr | 324 | :group 'antlr |
| 325 | :type '(repeat (cons (function :tag "Major mode") regexp))) | 325 | :type '(repeat (cons (function :tag "Major mode") regexp))) |
| @@ -1659,7 +1659,7 @@ Return \(LEVEL OPTION LOCATION)." | |||
| 1659 | :active active)) | 1659 | :active active)) |
| 1660 | (sort (mapcar 'car (elt antlr-options-alists (1- level))) | 1660 | (sort (mapcar 'car (elt antlr-options-alists (1- level))) |
| 1661 | 'string-lessp)))) | 1661 | 'string-lessp)))) |
| 1662 | 1662 | ||
| 1663 | 1663 | ||
| 1664 | ;;;=========================================================================== | 1664 | ;;;=========================================================================== |
| 1665 | ;;; Insert option: determine section-kind | 1665 | ;;; Insert option: determine section-kind |
| @@ -1936,7 +1936,7 @@ For OLD, see `antlr-insert-option-do'." | |||
| 1936 | ;; stuff (no =, {, } or /) at point is not followed by ";" | 1936 | ;; stuff (no =, {, } or /) at point is not followed by ";" |
| 1937 | (insert ";") | 1937 | (insert ";") |
| 1938 | (backward-char))) | 1938 | (backward-char))) |
| 1939 | 1939 | ||
| 1940 | (defun antlr-insert-option-space (area old) | 1940 | (defun antlr-insert-option-space (area old) |
| 1941 | "Find appropriate place to insert option, insert newlines/spaces. | 1941 | "Find appropriate place to insert option, insert newlines/spaces. |
| 1942 | For AREA and OLD, see `antlr-insert-option-do'." | 1942 | For AREA and OLD, see `antlr-insert-option-do'." |
| @@ -1956,7 +1956,7 @@ For AREA and OLD, see `antlr-insert-option-do'." | |||
| 1956 | (setq orig (point)) | 1956 | (setq orig (point)) |
| 1957 | (goto-char orig))) | 1957 | (goto-char orig))) |
| 1958 | (skip-chars-forward " \t") | 1958 | (skip-chars-forward " \t") |
| 1959 | 1959 | ||
| 1960 | (if (looking-at "$\\|//") | 1960 | (if (looking-at "$\\|//") |
| 1961 | ;; just comment after point => skip (+ lines w/ same col comment) | 1961 | ;; just comment after point => skip (+ lines w/ same col comment) |
| 1962 | (let ((same (if (> (match-end 0) (match-beginning 0)) | 1962 | (let ((same (if (> (match-end 0) (match-beginning 0)) |