eban

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

ChangeLog

+Sat Aug  5 16:43:43 2000  WATANABE Hirofumi  <eban@os.rim.or.jp>
+
+	* lib/ftools.rb (compare, safe_unlink, chmod): avoid warnings.
+
+	* lib/ftools.rb (move): typo. not `tpath', but `to'.
+
 Sat Jul 29 23:42:04 2000  Yukihiro Matsumoto  <matz@netlab.co.jp>
 
 	* dir.c (dir_each): should check whether dir is closed during the

lib/ftools.rb

@@ -81,7 +81,7 @@ def move from, to, verbose = false
 	syscopy from, to and unlink from
 	utime(from_stat.atime, from_stat.mtime, to)
 	begin
-	  chown(fstat.uid, fstat.gid, tpath)
+	  chown(fstat.uid, fstat.gid, to)
 	rescue
 	end
       end
@@ -110,7 +110,8 @@ def compare from, to, verbose = false
 
     begin
       while fr == tr
-	if fr = from.read(fsize)
+	fr = from.read(fsize)
+	if fr
 	  tr = to.read(fr.size)
 	else
 	  ret = to.read(fsize)
@@ -136,7 +137,7 @@ def safe_unlink(*files)
     begin
       $stderr.print files.join(" "), "\n" if verbose
       chmod 0777, *files
-      unlink *files
+      unlink(*files)
     rescue
 #      STDERR.print "warning: Couldn't unlink #{files.join ' '}\n"
     end
@@ -163,11 +164,13 @@ def makedirs(*dirs)
 
   alias o_chmod chmod
 
+  vsave, $VERBOSE = $VERBOSE, false
   def chmod(mode, *files)
     verbose = if files[-1].is_a? String then false else files.pop end
     $stderr.printf "chmod %04o %s\n", mode, files.join(" ") if verbose
     o_chmod mode, *files
   end
+  $VERBOSE = vsave
 
   def install(from, to, mode = nil, verbose = false)
     to = catname(from, to)