 
 (defun svn-status-bury-buffer ()
   (interactive)
-  (bury-buffer))
+  ;(bury-buffer)
+  (when svn-status-initial-window-configuration
+    (set-window-configuration svn-status-initial-window-configuration)))
+
+(defun svn-status-find-file ()
+  (interactive)
+  (find-file (svn-status-line-info->filename
+      (svn-status-get-line-information))))
 
 (defun svn-status-find-file-other-window ()
   (interactive)


(defun svn-status-update-buffer ()
  (interactive)
  (delete-other-windows)
  (pop-to-buffer "*svn-status*")
  (svn-status-mode)
  (let ((st-info svn-status-info)
        (buffer-read-only nil)

                ((eq svn-process-cmd 'info)
                 (svn-status-show-process-buffer-internal t)
                 (message "svn info finished"))
                ((eq svn-process-cmd 'parse-info)
                 (svn-status-parse-info-result))
;;                ((eq svn-process-cmd 'diff)
;;                 (svn-status-show-process-buffer-internal t)
;;                 (save-excursion
