From: Glenn Morris <rgm@gnu.org>
Date: Wed, 1 Jul 2009 02:58:52 +0000 (+0000)
Subject: Evangelos Evangelou  <vangelis at email.unc.edu>  (tiny change)
X-Git-Tag: emacs-pretest-23.1.90~2372
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b0d5b05b13bce863dbc278127baf36162e2dbebd;p=emacs.git

Evangelos Evangelou  <vangelis at email.unc.edu>  (tiny change)

(f90-no-break-re): Add "(/" and "/)".  (Bug#3730)
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bd1e3beef14..36f43c87e25 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-07-01  Evangelos Evangelou  <vangelis@email.unc.edu>  (tiny change)
+
+	* progmodes/f90.el (f90-no-break-re): Add "(/" and "/)".  (Bug#3730)
+
 2009-06-30  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-do-copy-or-rename-file-directly): Handle
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 9048b7b490c..bc57db13fda 100644
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -823,7 +823,7 @@ Can be overridden by the value of `font-lock-maximum-decoration'.")
   "Regexp matching a CLASS/TYPE IS statement.")
 
 (defconst f90-no-break-re
-  (regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=") 'paren)
+  (regexp-opt '("**" "//" "=>" ">=" "<=" "==" "/=" "(/" "/)") 'paren)
   "Regexp specifying where not to break lines when filling.
 This regexp matches certain tokens comprised entirely of
 characters matching the regexp `f90-break-delimiters' that should