diff options
| author | Glenn Morris <rgm@gnu.org> | 2010-10-05 21:06:25 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2010-10-05 21:06:25 -0700 |
| commit | 645a6257c4fdb1cb8bf963d9681cf5eb7a13aa70 (patch) | |
| tree | 98d34719c5c6d3b6af9d5b8b2b6fb57d98a8dcf5 /lisp/hilit-chg.el | |
| parent | 568f71a811098a9daf27bb440de0c470223ca054 (diff) | |
| download | emacs-645a6257c4fdb1cb8bf963d9681cf5eb7a13aa70.tar.gz | |
* lisp/hilit-chg.el (hilit-chg-get-diff-list-hk): Declare `e' for compiler.
Remove arch-tag comment.
Diffstat (limited to 'lisp/hilit-chg.el')
| -rw-r--r-- | lisp/hilit-chg.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/hilit-chg.el b/lisp/hilit-chg.el index ec9c88fd6ec..22012986be5 100644 --- a/lisp/hilit-chg.el +++ b/lisp/hilit-chg.el @@ -921,7 +921,7 @@ changes are made, so \\[highlight-changes-next-change] and (defun hilit-chg-get-diff-info (buf-a file-a buf-b file-b) - (let ((e nil) x y) ;; e is set by function hilit-chg-get-diff-list-hk + (let (e x y) ; e,x,y are set by function hilit-chg-get-diff-list-hk (ediff-setup buf-a file-a buf-b file-b nil nil ; buf-c file-C 'hilit-chg-get-diff-list-hk @@ -932,10 +932,11 @@ changes are made, so \\[highlight-changes-next-change] and (defun hilit-chg-get-diff-list-hk () - ;; x and y are dynamically bound by hilit-chg-get-diff-info + ;; e, x and y are dynamically bound by hilit-chg-get-diff-info ;; which calls this function as a hook - (defvar x) ;; placate the byte-compiler + (defvar x) ; placate the byte-compiler (defvar y) + (defvar e) (setq e (current-buffer)) (let ((n 0) extent p va vb a b) (setq x nil y nil) ;; x and y are bound by hilit-chg-get-diff-info @@ -1035,5 +1036,4 @@ This is called when `global-highlight-changes-mode' is turned on." (provide 'hilit-chg) -;; arch-tag: de00301d-5bad-44da-aa82-e0e010b0c463 ;;; hilit-chg.el ends here |