mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-03 11:33:37 +00:00
Code Issues Releases Activity

(f90-break-delimiters, f90-no-break-re): Doc fixes.

Browse Source
This commit is contained in:
Glenn Morris 2009-07-01 07:13:55 +00:00
parent b0d5b05b13
commit 3f150a6009
2 changed files with 14 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2009-07-01 Glenn Morris <rgm@gnu.org>
* progmodes/f90.el (f90-break-delimiters, f90-no-break-re): Doc fixes.
2009-07-01 Evangelos Evangelou <vangelis@email.unc.edu> (tiny change) 2009-07-01 Evangelos Evangelou <vangelis@email.unc.edu> (tiny change)
* progmodes/f90.el (f90-no-break-re): Add "(/" and "/)". (Bug#3730) * progmodes/f90.el (f90-no-break-re): Add "(/" and "/)". (Bug#3730)

18
lisp/progmodes/f90.el
View File

@ -254,9 +254,10 @@ additionally blinks the cursor to the start of the block."
(defcustom f90-break-delimiters "[-+\\*/><=,% \t]" (defcustom f90-break-delimiters "[-+\\*/><=,% \t]"
"Regexp matching delimiter characters at which lines may be broken. "Regexp matching delimiter characters at which lines may be broken.
There are certain tokens comprised entirely of characters There are some common two-character tokens where one or more of
matching this regexp that should not be split, and these are the members matches this regexp. Although Fortran allows breaks
specified by the constant `f90-no-break-re'." within lexical tokens (provided the next line has a beginning ampersand),
the constant `f90-no-break-re' ensures that such tokens are not split."
:type 'regexp :type 'regexp
:group 'f90) :group 'f90)
(put 'f90-break-delimiters 'safe-local-variable 'stringp) (put 'f90-break-delimiters 'safe-local-variable 'stringp)
@ -824,11 +825,12 @@ Can be overridden by the value of `font-lock-maximum-decoration'.")
(defconst f90-no-break-re (defconst f90-no-break-re
(regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=" "(/" "/)") 'paren) (regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=" "(/" "/)") 'paren)
"Regexp specifying where not to break lines when filling. "Regexp specifying two-character tokens not to split when breaking lines.
This regexp matches certain tokens comprised entirely of Each token has one or more of the characters from `f90-break-delimiters'.
characters matching the regexp `f90-break-delimiters' that should Note that if only one of the characters is from that variable,
not be split by filling. Each element is assumed to be two then the presence of the token here allows a line-break before or
characters long.") after the other character, where a break would not normally be
allowed. This minor issue currently only affects \"(/\" and \"/)\".")
(defvar f90-cache-position nil (defvar f90-cache-position nil
"Temporary position used to speed up region operations.") "Temporary position used to speed up region operations.")