Mercurial > hg > xemacs-beta
diff lisp/ediff/ediff-merg.el @ 134:34a5b81f86ba r20-2b1
Import from CVS: tag r20-2b1
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:30:11 +0200 |
parents | 6a378aca36af |
children | 2d532a89d707 |
line wrap: on
line diff
--- a/lisp/ediff/ediff-merg.el Mon Aug 13 09:29:37 2007 +0200 +++ b/lisp/ediff/ediff-merg.el Mon Aug 13 09:30:11 2007 +0200 @@ -25,6 +25,12 @@ (provide 'ediff-merg) +(defgroup ediff-merge nil + "Merging utilities" + :prefix "ediff-" + :group 'ediff) + + ;; compiler pacifier (defvar ediff-window-A) (defvar ediff-window-B) @@ -44,11 +50,13 @@ (require 'ediff-init) -(defvar ediff-default-variant 'combined +(defcustom ediff-default-variant 'combined "*The variant to be used as a default for buffer C in merging. -Valid values are the symbols `default-A', `default-B', and `combined'.") +Valid values are the symbols `default-A', `default-B', and `combined'." + :type '(radio (const default-A) (const default-B) (const combined)) + :group 'ediff-merge) -(defvar ediff-combination-pattern +(defcustom ediff-combination-pattern '("<<<<<<<<<<<<<< variant A" ">>>>>>>>>>>>>> variant B" "======= end of combination") "*Pattern to be used for combining difference regions in buffers A and B. The value is (STRING1 STRING2 STRING3). The combined text will look like this: @@ -58,7 +66,9 @@ STRING2 diff region from variant B STRING3 -") +" + :type '(list string string string) + :group 'ediff-merge) (ediff-defvar-local ediff-show-clashes-only nil "*If t, show only those diff regions where both buffers disagree with the ancestor.