From 8d4d2e43233afcb075b4663828568bd5a5f16712 Mon Sep 17 00:00:00 2001 From: nobu Date: Fri, 5 Sep 2003 06:32:07 +0000 Subject: [PATCH] * 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 | 5 +++++ misc/ruby-mode.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4060c239d3..24e36db5e8 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +Fri Sep 5 15:32:04 2003 Nobuyoshi Nakada + + * 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 * test/runner.rb: arguments should be keys. diff --git a/misc/ruby-mode.el b/misc/ruby-mode.el index f538714f44..8d9df41a4a 100644 --- a/misc/ruby-mode.el +++ b/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)