2000-02-17

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

1 files changed, 4 insertions, 0 deletions

diff --git a/string.c b/string.c
index 2fce26f0db..1e51110a96 100644
--- a/string.c
+++ b/string.c
@@ -580,6 +580,10 @@ rb_str_index_method(argc, argv, str)
     else {
 	pos = 0;
     }
+    if (pos < 0) {
+	pos += RSTRING(str)->len;
+	if (pos < 0) return Qnil;
+    }
 
     switch (TYPE(sub)) {
       case T_REGEXP: