From 1607f1d9fe04214c8457bf0287679691ccd6bf8f Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 2 Oct 2002 06:02:17 +0000
Subject: * commit miss;  and tcltklib fix too.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@2920 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 object.c | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'object.c')

diff --git a/object.c b/object.c
index 71f5e99bd..455d353b3 100644
--- a/object.c
+++ b/object.c
@@ -83,6 +83,14 @@ rb_class_real(cl)
     return cl;
 }
 
+VALUE
+rb_obj_type(obj)
+    VALUE obj;
+{
+    rb_warn("`type' is deprecated; use `class'");
+    return rb_class_real(CLASS_OF(obj));
+}
+
 VALUE
 rb_obj_class(obj)
     VALUE obj;
@@ -1292,7 +1300,7 @@ Init_Object()
     rb_define_method(rb_mKernel, "hash", rb_obj_id, 0);
     rb_define_method(rb_mKernel, "id", rb_obj_id, 0);
     rb_define_method(rb_mKernel, "__id__", rb_obj_id, 0);
-    rb_define_method(rb_mKernel, "type", rb_obj_class, 0);
+    rb_define_method(rb_mKernel, "type", rb_obj_type, 0);
     rb_define_method(rb_mKernel, "class", rb_obj_class, 0);
 
     rb_define_method(rb_mKernel, "clone", rb_obj_clone, 0);
-- 
cgit