*** /tmp/tramp.el.orig
--- /tmp/tramp.el
***************
*** 4917,4926 ****
  	       buf))))
        ;; It's a local file
        (with-temp-buffer
! 	(unless (zerop (call-process
! 			"touch" nil (current-buffer) nil "-t" touch-time file))
! 	      (pop-to-buffer (current-buffer))
! 	      (signal 'file-error "touch failed"))))))
  
  (defun tramp-buffer-name (method user host)
    "A name for the connection buffer for USER at HOST using METHOD."
--- 4917,4931 ----
  	       buf))))
        ;; It's a local file
        (with-temp-buffer
! 	(unless (zerop
! 		 (setq xxx
! 		       (call-process
! 			"touch" nil (current-buffer) nil "-t" touch-time file)))
! 	  (setq message-log-max t)
! 	  (message "Tramp: command `touch -t %s %s´ rc %s" touch-time file xxx)
! 	  (message "Tramp: buffer `%s´" (buffer-substring (point-min) (point-max)))
! 	  (pop-to-buffer "*Messages*")
! 	  (signal 'file-error "touch failed"))))))
  
  (defun tramp-buffer-name (method user host)
    "A name for the connection buffer for USER at HOST using METHOD."