diff --git a/ChangeLog b/ChangeLog
index 918dec273b..e2e1fbe131 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Apr  2 12:40:45 2001  Shugo Maeda <shugo@ruby-lang.org>
+
+	* lib/net/imap.rb (media_subtype): return subtype.
+
 Mon Apr  2 12:01:15 2001  Shugo Maeda <shugo@ruby-lang.org>
 
 	* lib/net/imap.rb (flag_list): capitalize flags.
diff --git a/lib/net/imap.rb b/lib/net/imap.rb
index 01d1031121..ef99b4c00c 100644
--- a/lib/net/imap.rb
+++ b/lib/net/imap.rb
@@ -1256,6 +1256,7 @@ module Net
       def media_subtype
 	$stderr.printf("warning: media_subtype is obsolete.\n")
 	$stderr.printf("         use subtype instead.\n")
+	return subtype
       end
     end
 
@@ -1272,6 +1273,7 @@ module Net
       def media_subtype
 	$stderr.printf("warning: media_subtype is obsolete.\n")
 	$stderr.printf("         use subtype instead.\n")
+	return subtype
       end
     end
 
@@ -1288,6 +1290,7 @@ module Net
       def media_subtype
 	$stderr.printf("warning: media_subtype is obsolete.\n")
 	$stderr.printf("         use subtype instead.\n")
+	return subtype
       end
     end
 
@@ -1302,6 +1305,7 @@ module Net
       def media_subtype
 	$stderr.printf("warning: media_subtype is obsolete.\n")
 	$stderr.printf("         use subtype instead.\n")
+	return subtype
       end
     end