* misc/ruby-mode.el (ruby-font-lock-maybe-here-docs): should not

search delimiter forward if found in backward.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4510 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,8 @@
+Fri Sep  5 15:32:04 2003  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* misc/ruby-mode.el (ruby-font-lock-maybe-here-docs): should not
+	  search delimiter forward if found in backward.
+
 Fri Sep  5 13:32:48 2003  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* test/runner.rb: arguments should be keys.

misc/ruby-mode.el

@@ -1085,8 +1085,8 @@ balanced expression is found."
 	      (setq beg (point)))))
       (if (and beg
 	       (let ((end-match (ruby-here-doc-end-match)))
-                 (not (re-search-backward end-match beg t))
-                 (re-search-forward end-match nil t)))
+                 (and (not (re-search-backward end-match beg t))
+		      (re-search-forward end-match nil t))))
 	  (progn
 	    (set-match-data (list beg (point)))
 	    t)