use warn() instead of $stderr.puts().

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

ChangeLog

@@ -1,6 +1,8 @@
-Mon May 19 00:24:13 2003  Tadayoshi Funaba  <tadf@dotrb.org>
+Mon May 19 08:08:51 2003  Tadayoshi Funaba  <tadf@dotrb.org>
 
-	* lib/date.rb: use $deferr instead of $stderr.
+	* lib/date.rb: use warn() instead of $stderr.puts().
+
+	* sample/cal.rb: ditto.
 
 Sat May 17 02:17:42 2003  Nobuyoshi Nakada  <nobu.nokada@softhome.net>
 

lib/date.rb

@@ -532,9 +532,9 @@ class Date
     module_eval <<-"end;"
       def self.#{old}(*args, &block)
 	if $VERBOSE
-	  $deferr.puts("\#{caller.shift.sub(/:in .*/, '')}: " \
-		       "warning: \#{self}::#{old} is deprecated; " \
-		       "use \#{self}::#{new}")
+	  warn("\#{caller.shift.sub(/:in .*/, '')}: " \
+	       "warning: \#{self}::#{old} is deprecated; " \
+	       "use \#{self}::#{new}")
 	end
 	#{new}(*args, &block)
       end
@@ -549,9 +549,9 @@ class Date
     module_eval <<-"end;"
       def #{old}(*args, &block)
 	if $VERBOSE
-	  $deferr.puts("\#{caller.shift.sub(/:in .*/, '')}: " \
-		       "warning: \#{self.class}\##{old} is deprecated; " \
-		       "use \#{self.class}\##{new}")
+	  warn("\#{caller.shift.sub(/:in .*/, '')}: " \
+	       "warning: \#{self.class}\##{old} is deprecated; " \
+	       "use \#{self.class}\##{new}")
 	end
 	#{new}(*args, &block)
       end

sample/cal.rb

@@ -32,7 +32,7 @@ $tab =
 $cc = 'gb'
 
 def usage
-  $stderr.puts 'usage: cal [-c iso3166] [-jmty] [[month] year]'
+  warn 'usage: cal [-c iso3166] [-jmty] [[month] year]'
   exit 1
 end