;;;###autoload
(define-key menu-bar-emerge-menu [emerge-revisions-with-ancestor]
'("Revisions with Ancestor ..." . emerge-revisions-with-ancestor))
+;;;###autoload
(define-key menu-bar-emerge-menu [emerge-revisions]
'("Revisions ..." . emerge-revisions))
;;;###autoload
;;; Functions to start Emerge on RCS versions
+;;;###autoload
(defun emerge-revisions (arg file revision-A revision-B
&optional startup-hooks quit-hooks)
"Emerge two RCS revisions of a file."
quit-hooks)
quit-hooks)))
+;;;###autoload
(defun emerge-revisions-with-ancestor (arg file revision-A
revision-B ancestor
&optional
(defvar emerge-merge-directories-filename-regexp "[^.]"
"Regexp describing files to be processed by `emerge-merge-directories'.")
+;;;###autoload
(defun emerge-merge-directories (a-dir b-dir ancestor-dir output-dir)
(interactive
(list