2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index e9fed7698e..a133156213 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed May 22 21:26:47 2002  Nobuyoshi Nakada  <nobu.nokada@softhome.net>
+
+	* ruby.c (proc_options): -T consumes digits only.
+
 Wed May 22 20:18:31 2002  WATANABE Hirofumi  <eban@ruby-lang.org>
 
 	* configure.in: need not link vsnprintf.o on MinGW.
diff --git a/ruby.c b/ruby.c
index bcb21ca40b..55dd7ab87d 100644
--- a/ruby.c
+++ b/ruby.c
@@ -558,10 +558,11 @@ proc_options(argc, argv)
 		if (*++s) {
 		    v = scan_oct(s, 2, &numlen);
 		    if (numlen == 0) v = 1;
+		    s += numlen;
 		}
 		rb_set_safe_level(v);
 	    }
-	    break;
+	    goto reswitch;
 
 	  case 'I':
 	    forbid_setid("-I");