               (filename (match-string 6)))
           (delete-region (match-beginning 0)
                          (match-end 0))
-	  (when (or (not svn-status-v-file-match)
-		    (member filename svn-status-v-file-match))
+	  (when (or (not svn-file-filter)
+		    (member filename svn-file-filter))
 	    (svn-insert-file filename status)))))))
 
 (defun svn-status-v-sentinel (proc reason)

  ;; First retrieve the property names, and then the value of each.
  ;; We can't use proplist -v because is output is ambiguous when values
  ;; consist of multiple lines.
  (let (propnames)
    (with-current-buffer (svn-run-hidden 'proplist (list file))
      (goto-char (point-min))

             (eq (process-status (cadr svn-running)) 'run))
    (error "Can't run two svn processes from the same buffer")))

(defun svn-run-async (command args &optional file-filter)
  "Run subversion command COMMAND with ARGS, possibly at a later time.

Optional third argument FILE-FILTER is the file filter to be in effect
during the run."

  (if (and svn-running
           (eq (process-status (cadr svn-running)) 'run))
      (setq svn-todo-queue
	    (nconc svn-todo-queue
		   (list (list command args file-filter))))
    (progn
      (set (make-local-variable 'svn-file-filter) file-filter)
      (svn-run command args))))

;; This could be used to debug filter functions
(defvar svn-output-queue nil)
(defvar svn-in-output-filter nil)
