Fix bug where two adjacent =begin/=end blocks causes the parser to get out of step.

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

lib/rdoc/parsers/parse_rb.rb

@@ -611,20 +611,17 @@ class RubyLex
       str = op
       @ltype = "="
 
+
       begin
-        ch = getc
-        str << ch
-      end until ch == "\n"
-      
-      until peek_equal?("=end") && peek(4) =~ /\s/
-	begin
+        line = ""
+        begin
           ch = getc
-          str << ch
+          line << ch
         end until ch == "\n"
-      end
+        str << line
+      end until line =~ /^=end/
 
-      str << "=end"
-      gets
+      ungetc
 
       @ltype = nil
       Token(TkRD_COMMENT).set_text(str)