 		  process-environment))
          (process-connection-type nil)
          (proc (apply 'start-process "darcs"
-                      buf darcsum-program subcommand args)))
+                      buf darcsum-program subcommand
+		      (append darcsum-darcs-2-options args))))
       (set-process-sentinel proc 'darcsum-process-sentinel)
       (set-process-filter proc 'darcsum-process-filter)
       (with-current-buffer buf

the file or the directory at point into the boring file."
  (interactive
   (let ((type (darcsum-get-line-type))
	 (path (get-text-property (point) 'darcsum-path)))
     (if (string-match "^\\./" path)
	 (setq path (substring path 2)))
     (setq path (regexp-quote path))
     (cond
      ((eq type 'dir)
       (setq path (concat "(^|/)" (regexp-quote path) "($|/)")))
      ((memq type '(file change))
       (setq path (concat "(^|/)" path "$"))))
     (list (read-string "Add to boring list: " path))))

    (define-key map "U" 'darcsum-revert)
    (define-key map "u" 'darcsum-toggle-context)
    (define-key map "d" 'darcsum-delete)
    (define-key map "r" 'darcsum-remove)
    (define-key map "M" 'darcsum-move)
    (define-key map "m" 'darcsum-toggle-mark)
    (define-key map [button2] 'darcsum-mouse-toggle-mark)
