* instruby.rb (install): preserve the timestamp for Mac OS X ranlib problem.

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

ChangeLog

@@ -1,11 +1,16 @@
+Tue Jul 29 15:41:02 2003  WATANABE Hirofumi  <eban@ruby-lang.org>
+
+	* instruby.rb (install): preserve the timestamp for Mac OS X ranlib
+	  problem.
+
 Tue Jul 29 12:22:28 2003  why the lucky stiff  <ruby-cvs@whytheluckystiff.net>
 
-    * ext/syck/token.c: prefixed many constants and definitions with YAML_ to
-      avoid name clash.
+	* ext/syck/token.c: prefixed many constants and definitions
+	  with YAML_ to avoid name clash.
 
-    * ext/syck/gram.c: ditto.
+	* ext/syck/gram.c: ditto.
 
-    * ext/syck/gram.h: ditto.
+	* ext/syck/gram.h: ditto.
 
 Tue Jul 29 12:15:37 2003  NAKAMURA Usaku <usa@ruby-lang.org>
 

instruby.rb

@@ -49,17 +49,20 @@ end
 
 parse_args()
 
-include FileUtils
+include FileUtils::Verbose
 include FileUtils::NoWrite if $dryrun
 @fileutils_output = STDOUT
 @fileutils_label = ''
-alias makelink ln_sf
-class << self
-  body = proc {|*args|super(*fu_update_option(args,:verbose=>true))}
-  for func in [:install, :makelink]
-    define_method(func, body)
+
+def install(src, dest, options = {})
+  super
+  return if options[:noop]
+  fu_each_src_dest(src, dest) do |s, d|
+    st = File.stat(s)
+    File.utime(st.atime, st.mtime, d)
   end
 end
+
 $made_dirs = {}
 def makedirs(dirs)
   dirs = fu_list(dirs)
@@ -112,7 +115,7 @@ end
 
 if dll == lib and dll != arc
   for link in CONFIG["LIBRUBY_ALIASES"].split
-    makelink(dll, File.join(libdir, link))
+    ln_sf(dll, File.join(libdir, link))
   end
 end