Merge from emacs--rel--22
authorMiles Bader <miles@gnu.org>
Thu, 26 Jul 2007 05:20:28 +0000 (05:20 +0000)
committerMiles Bader <miles@gnu.org>
Thu, 26 Jul 2007 05:20:28 +0000 (05:20 +0000)
Patches applied:

 * emacs--rel--22  (patch 70-73)

   - Update from CVS

2007-07-25  Glenn Morris  <rgm@gnu.org>

   * Relicense all FSF files to GPLv3 or later.

2007-07-24  Dan Nicolaescu  <dann@ics.uci.edu>

   * lisp/vc-hg.el (vc-hg-revision-completion-table): Temporarily comment out.

Revision: emacs@sv.gnu.org/emacs--devo--0--patch-828

1  2 
lisp/vc-hg.el

diff --cc lisp/vc-hg.el
@@@ -75,8 -71,8 +75,8 @@@
  ;; - logentry-check ()                         NOT NEEDED
  ;; - comment-history (file)                    NOT NEEDED
  ;; - update-changelog (files)                  NOT NEEDED
 -;; * diff (file &optional rev1 rev2 buffer)    OK
 +;; * diff (files &optional rev1 rev2 buffer)   OK
- ;; - revision-completion-table (file)          OK
+ ;; - revision-completion-table (file)          COMMENTED OUT AS A WORKAROUND FOR A BUG
  ;; - diff-tree (dir &optional rev1 rev2)       TEST IT
  ;; - annotate-command (file buf &optional rev) OK
  ;; - annotate-time ()                          OK
         (buffer-substring-no-properties (point-min) (point-max))))))
  
  ;; Modelled after the similar function in vc-cvs.el
- (defun vc-hg-revision-completion-table (file)
-   (lexical-let ((file file)
-                 table)
-     (setq table (lazy-completion-table
-                  table (lambda () (vc-hg-revision-table file))))
-     table))
;; (defun vc-hg-revision-completion-table (file)
;;   (lexical-let ((file file)
;;                 table)
;;     (setq table (lazy-completion-table
;;                  table (lambda () (vc-hg-revision-table file))))
;;     table))
  
 -(defalias 'vc-hg-diff-tree 'vc-hg-diff)
 +(defun vc-hg-diff-tree (file &optional oldvers newvers buffer)
 +  (vc-hg-diff (list file) oldvers newvers buffer))
  
  (defun vc-hg-annotate-command (file buffer &optional version)
    "Execute \"hg annotate\" on FILE, inserting the contents in BUFFER.