diff options
| author | Glenn Morris | 2012-09-13 14:23:33 -0400 |
|---|---|---|
| committer | Glenn Morris | 2012-09-13 14:23:33 -0400 |
| commit | b9800ec43b3e7f17cde08dc890afa690185cf9aa (patch) | |
| tree | b279358869b107ad1eef3c44e1ca8d1d0fa2b038 | |
| parent | c18e885bdd2607ec1784c3e1585e581459408932 (diff) | |
| download | emacs-b9800ec43b3e7f17cde08dc890afa690185cf9aa.tar.gz emacs-b9800ec43b3e7f17cde08dc890afa690185cf9aa.zip | |
* lisp/vc/vc.el: No need to require ediff.
(ediff-load-version-control): Declare.
(ediff-vc-internal): Fix declaration.
(vc-version-ediff): Require ediff.
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/vc/vc.el | 8 |
2 files changed, 12 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5e51c67e8e8..62ba7017163 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2012-09-13 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * vc/vc.el: No need to require ediff. | ||
| 4 | (ediff-load-version-control): Declare. | ||
| 5 | (ediff-vc-internal): Fix declaration. | ||
| 6 | (vc-version-ediff): Require ediff. | ||
| 7 | |||
| 1 | 2012-09-13 Paul Eggert <eggert@cs.ucla.edu> | 8 | 2012-09-13 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 9 | ||
| 3 | Use a more backwards-compatible timer format (Bug#12430). | 10 | Use a more backwards-compatible timer format (Bug#12430). |
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index 1ef4faaa008..47800bd4aac 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el | |||
| @@ -653,7 +653,6 @@ | |||
| 653 | 653 | ||
| 654 | (require 'vc-hooks) | 654 | (require 'vc-hooks) |
| 655 | (require 'vc-dispatcher) | 655 | (require 'vc-dispatcher) |
| 656 | (require 'ediff) | ||
| 657 | 656 | ||
| 658 | (declare-function diff-setup-whitespace "diff-mode" ()) | 657 | (declare-function diff-setup-whitespace "diff-mode" ()) |
| 659 | 658 | ||
| @@ -1698,7 +1697,9 @@ saving the buffer." | |||
| 1698 | (vc-diff-internal t (vc-deduce-fileset t) nil nil | 1697 | (vc-diff-internal t (vc-deduce-fileset t) nil nil |
| 1699 | (called-interactively-p 'interactive)))) | 1698 | (called-interactively-p 'interactive)))) |
| 1700 | 1699 | ||
| 1701 | (declare-function ediff-vc-internal (rev1 rev2 &optional startup-hooks)) | 1700 | (declare-function ediff-load-version-control "ediff" (&optional silent)) |
| 1701 | (declare-function ediff-vc-internal "ediff-vers" | ||
| 1702 | (rev1 rev2 &optional startup-hooks)) | ||
| 1702 | 1703 | ||
| 1703 | ;;;###autoload | 1704 | ;;;###autoload |
| 1704 | (defun vc-version-ediff (files rev1 rev2) | 1705 | (defun vc-version-ediff (files rev1 rev2) |
| @@ -1719,7 +1720,8 @@ repository history using ediff." | |||
| 1719 | ;; FIXME We only support running ediff on one file for now. | 1720 | ;; FIXME We only support running ediff on one file for now. |
| 1720 | ;; We could spin off an ediff session per file in the file set. | 1721 | ;; We could spin off an ediff session per file in the file set. |
| 1721 | ((= (length files) 1) | 1722 | ((= (length files) 1) |
| 1722 | (ediff-load-version-control) | 1723 | (require 'ediff) |
| 1724 | (ediff-load-version-control) ; loads ediff-vers | ||
| 1723 | (find-file (car files)) ;FIXME: find-file from Elisp is bad. | 1725 | (find-file (car files)) ;FIXME: find-file from Elisp is bad. |
| 1724 | (ediff-vc-internal rev1 rev2 nil)) | 1726 | (ediff-vc-internal rev1 rev2 nil)) |
| 1725 | (t | 1727 | (t |