   "Helper function to handle tramp connections stopping with an exit output.
 Add this function to the `svn-pre-parse-status-hook'."
   (goto-char (point-max))
+  (when (eq (svn-point-at-bol) (svn-point-at-eol))
+    (forward-line -1))
   (beginning-of-line)
   (when (looking-at "exit")
     (delete-region (point) (svn-point-at-eol))))



(defun svn-status-create-arg-file (file-name prefix file-info-list postfix)
  (with-temp-file file-name
    (insert prefix)
    (let ((st-info file-info-list))


(defun svn-had-user-input-since-asynch-run ()
  (not (equal (recent-keys) svn-pre-run-asynch-recent-keys)))

(defun svn-expand-filename-for-remote-access (file-name)
  "Convert the given local part of a filename to a full file name to allow accessing remote 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 ()
  "Construct the environment for the svn process.
