*** /home/albinus/src/tramp/lisp/tramp.el.~2.599.~	2007-10-22 20:41:48.000000000 +0200
--- /home/albinus/src/tramp/lisp/tramp.el	2007-10-23 22:57:22.000000000 +0200
***************
*** 2575,2585 ****
      ;; We handle also the local part, because there doesn't exist
      ;; `set-file-uid-gid'.
      (let ((uid (or (and (integerp uid) uid) (tramp-get-local-uid 'integer)))
! 	  (gid (or (and (integerp gid) gid) (tramp-get-local-uid 'integer)))
  	  (default-directory (tramp-compat-temporary-file-directory)))
!       (call-process
!        "chown" nil nil nil
!        (format "%d:%d" uid gid) (tramp-shell-quote-argument filename)))))
  
  ;; Simple functions using the `test' command.
  
--- 2575,2588 ----
      ;; We handle also the local part, because there doesn't exist
      ;; `set-file-uid-gid'.
      (let ((uid (or (and (integerp uid) uid) (tramp-get-local-uid 'integer)))
! 	  (gid (or (and (integerp gid) gid) (tramp-get-local-gid 'integer)))
  	  (default-directory (tramp-compat-temporary-file-directory)))
!       ;; "chown" might not exist, for example on Win32.
!       (condition-case nil
! 	  (call-process
! 	   "chown" nil nil nil
! 	   (format "%d:%d" uid gid) (tramp-shell-quote-argument filename))
! 	(error nil)))))
  
  ;; Simple functions using the `test' command.