From f94534efbc44762158208632b1ce7f1bc83dba75 Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 30 Jul 2002 10:54:33 +0000
Subject: [PATCH] * misc/ruby-mode.el (ruby-accurate-end-of-block): restrict
 search   region.

* misc/ruby-mode.el (ruby-parse-partial): reversed wrong patch.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2671 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog         | 7 +++++++
 misc/ruby-mode.el | 7 ++++---
 2 files changed, 11 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 372d71013a..26b72b33da 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+Tue Jul 30 19:48:51 2002  Nobuyoshi Nakada  <nobu.nokada@softhome.net>
+
+	* misc/ruby-mode.el (ruby-accurate-end-of-block): restrict search
+	  region.
+
+	* misc/ruby-mode.el (ruby-parse-partial): reversed wrong patch.
+
 Tue Jul 30 17:21:13 2002  Nobuyoshi Nakada  <nobu.nokada@softhome.net>
 
 	* misc/ruby-mode.el (ruby-accurate-end-of-block): incomplete block
diff --git a/misc/ruby-mode.el b/misc/ruby-mode.el
index 7bc5ec0725..139bebcebc 100644
--- a/misc/ruby-mode.el
+++ b/misc/ruby-mode.el
@@ -173,8 +173,9 @@ Also ignores spaces after parenthesis when 'space.")
 
 (defun ruby-accurate-end-of-block (&optional end)
   (let (state)
+    (or end (setq end (point-max)))
     (while (and (setq state (apply 'ruby-parse-partial end state))
-		(>= (nth 2 state) 0)))))
+		(>= (nth 2 state) 0) (< (point) end)))))
 
 (defun ruby-mode-variables ()
   (set-syntax-table ruby-mode-syntax-table)
@@ -483,8 +484,8 @@ The variable ruby-indent-level controls the amount of indentation.
        (t
 	(error (format "bad string %s"
 		       (buffer-substring (point) pnt)
-		       )))))
-    (list in-string nest depth pcol)))
+		       ))))))
+  (list in-string nest depth pcol))
 
 (defun ruby-parse-region (start end)
   (let (state)