       (svn-run t t 'update "update"
                (when rev (list "-r" rev))
                update-extra-arg
-               (expand-file-name default-directory)))))
+               (svn-local-filename-for-remote-access (expand-file-name default-directory))))))
 
 (defun svn-status-commit ()
   "Commit selected files.

  ;; when running svn on a remote host: expand local file names to get full names to access the file on the remote host via emacs
  (if (file-remote-p default-directory)
      (concat (file-remote-p default-directory) file-name)
    file-name))

(defun svn-process-environment ()

          (while (re-search-forward search-string (point-max) t)
            (replace-match (replace-regexp-in-string " " "-" (match-string 1)) nil nil nil 1)))))))

(defun svn-parse-status-result ()
  "Parse the `svn-process-buffer-name' buffer.
The results are used to build the `svn-status-info' variable."
