diff options
| author | Glenn Morris | 2009-07-01 07:13:55 +0000 |
|---|---|---|
| committer | Glenn Morris | 2009-07-01 07:13:55 +0000 |
| commit | 3f150a6009fb53d650921d77288b578401a79b61 (patch) | |
| tree | 2d787687eee147c4c84bc505ac72718d2528b9f5 | |
| parent | b0d5b05b13bce863dbc278127baf36162e2dbebd (diff) | |
| download | emacs-3f150a6009fb53d650921d77288b578401a79b61.tar.gz emacs-3f150a6009fb53d650921d77288b578401a79b61.zip | |
(f90-break-delimiters, f90-no-break-re): Doc fixes.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/progmodes/f90.el | 18 |
2 files changed, 14 insertions, 8 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 36f43c87e25..b8b356ac3d5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2009-07-01 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * progmodes/f90.el (f90-break-delimiters, f90-no-break-re): Doc fixes. | ||
| 4 | |||
| 1 | 2009-07-01 Evangelos Evangelou <vangelis@email.unc.edu> (tiny change) | 5 | 2009-07-01 Evangelos Evangelou <vangelis@email.unc.edu> (tiny change) |
| 2 | 6 | ||
| 3 | * progmodes/f90.el (f90-no-break-re): Add "(/" and "/)". (Bug#3730) | 7 | * progmodes/f90.el (f90-no-break-re): Add "(/" and "/)". (Bug#3730) |
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el index bc57db13fda..0b011af9eb5 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el | |||
| @@ -254,9 +254,10 @@ additionally blinks the cursor to the start of the block." | |||
| 254 | 254 | ||
| 255 | (defcustom f90-break-delimiters "[-+\\*/><=,% \t]" | 255 | (defcustom f90-break-delimiters "[-+\\*/><=,% \t]" |
| 256 | "Regexp matching delimiter characters at which lines may be broken. | 256 | "Regexp matching delimiter characters at which lines may be broken. |
| 257 | There are certain tokens comprised entirely of characters | 257 | There are some common two-character tokens where one or more of |
| 258 | matching this regexp that should not be split, and these are | 258 | the members matches this regexp. Although Fortran allows breaks |
| 259 | specified by the constant `f90-no-break-re'." | 259 | within lexical tokens (provided the next line has a beginning ampersand), |
| 260 | the constant `f90-no-break-re' ensures that such tokens are not split." | ||
| 260 | :type 'regexp | 261 | :type 'regexp |
| 261 | :group 'f90) | 262 | :group 'f90) |
| 262 | (put 'f90-break-delimiters 'safe-local-variable 'stringp) | 263 | (put 'f90-break-delimiters 'safe-local-variable 'stringp) |
| @@ -824,11 +825,12 @@ Can be overridden by the value of `font-lock-maximum-decoration'.") | |||
| 824 | 825 | ||
| 825 | (defconst f90-no-break-re | 826 | (defconst f90-no-break-re |
| 826 | (regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=" "(/" "/)") 'paren) | 827 | (regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=" "(/" "/)") 'paren) |
| 827 | "Regexp specifying where not to break lines when filling. | 828 | "Regexp specifying two-character tokens not to split when breaking lines. |
| 828 | This regexp matches certain tokens comprised entirely of | 829 | Each token has one or more of the characters from `f90-break-delimiters'. |
| 829 | characters matching the regexp `f90-break-delimiters' that should | 830 | Note that if only one of the characters is from that variable, |
| 830 | not be split by filling. Each element is assumed to be two | 831 | then the presence of the token here allows a line-break before or |
| 831 | characters long.") | 832 | after the other character, where a break would not normally be |
| 833 | allowed. This minor issue currently only affects \"(/\" and \"/)\".") | ||
| 832 | 834 | ||
| 833 | (defvar f90-cache-position nil | 835 | (defvar f90-cache-position nil |
| 834 | "Temporary position used to speed up region operations.") | 836 | "Temporary position used to speed up region operations.") |