 (defcustom svn-program "svn"
   "*The svn program to run"
   :type 'string
+  :group 'dsvn)
+
+(defcustom svn-restore-windows nil
+  "*Non-nil means that the window configuration is restored after commit"
+  :type 'boolean
   :group 'dsvn)
 
 (defun svn-call-process (program buffer &rest args)

  "Move to the previous changeset in the log."
  (interactive)
  (beginning-of-line)
  (unless (re-search-backward "^------------------------------------------------------------------------$" nil t)
    (error "Found no commit"))
  (svn-log-show-diff))


  (save-excursion
    (set-buffer (process-buffer proc))
    (goto-char (process-mark proc))
    ;; put point back where it was to avoid scrolling for long output
    ;; (e.g., large diffs)
    (let ((p (point))
          (inhibit-read-only t))
      (insert-before-markers str)
      (goto-char p))))

(defvar svn-todo-queue '()
  "A queue of commands to run when the current command finishes.")
