;ELC   
;;; Compiled by mwolson@grepfind.mwolson.org on Thu Jan 24 00:15:32 2008
;;; from file /stuff/proj/emacs/dvc/mwolson/lisp/xdarcs-core.el
;;; in Emacs version 23.0.50.2
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`xdarcs-core.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'dvc-core)
#@55 The executable used for the darcs commandline client.
(defvar xdarcs-executable "darcs" (#$ . 620))
#@129 The filename, used to store the log message before commiting.
Usually that file is placed in the tree-root of the working tree.
(defvar xdarcs-log-edit-file-name "++xdarcs-log-edit" (#$ . 727))
#@303 Return the tree root for LOCATION, nil if not in a local tree.
Computation is done from withing Emacs, by looking at an _darcs/
directory in a parent buffer of LOCATION.  This is therefore very
fast.

If NO-ERROR is non-nil, don't raise an error if LOCATION is not a
git managed tree (but return nil).
(defalias 'xdarcs-tree-root #[(&optional location no-error interactive) "\303\304\206 t\305	\n%\207" [interactive location no-error dvc-tree-root-helper "_darcs/" "%S is not in a darcs tree!"] 6 (#$ . 928)])
(provide 'xdarcs-core)