aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTom Tromey2017-02-13 17:24:04 -0700
committerTom Tromey2017-02-19 20:59:35 -0700
commita4c3227230fbdbcb324313b6aae067ad284f8239 (patch)
tree56680ead51146e516817a6e976a67cace7a1d6bb
parente7b0dac11356f4f343f0441ce2078e994e1a7219 (diff)
downloademacs-a4c3227230fbdbcb324313b6aae067ad284f8239.tar.gz
emacs-a4c3227230fbdbcb324313b6aae067ad284f8239.zip
Remove stale comments from vc-git and vc-hg
* lisp/vc/vc-git.el (vc-git-retrieve-tag): Remove comment. * lisp/vc/vc-hg.el (vc-hg-retrieve-tag): Remove comment.
-rw-r--r--lisp/vc/vc-git.el4
-rw-r--r--lisp/vc/vc-hg.el3
2 files changed, 2 insertions, 5 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 0f58892eb4e..8a22d747b7d 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -1240,9 +1240,7 @@ This requires git 1.8.4 or later, for the \"-L\" option of \"git log\"."
1240 1240
1241(defun vc-git-retrieve-tag (dir name _update) 1241(defun vc-git-retrieve-tag (dir name _update)
1242 (let ((default-directory dir)) 1242 (let ((default-directory dir))
1243 (vc-git-command nil 0 nil "checkout" name) 1243 (vc-git-command nil 0 nil "checkout" name)))
1244 ;; FIXME: update buffers if `update' is true
1245 ))
1246 1244
1247 1245
1248;;; MISCELLANEOUS 1246;;; MISCELLANEOUS
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index 2f9487ca2e7..8a2b07718cf 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -76,7 +76,7 @@
76;; - annotate-extract-revision-at-line () OK 76;; - annotate-extract-revision-at-line () OK
77;; TAG SYSTEM 77;; TAG SYSTEM
78;; - create-tag (dir name branchp) OK 78;; - create-tag (dir name branchp) OK
79;; - retrieve-tag (dir name update) OK FIXME UPDATE BUFFERS 79;; - retrieve-tag (dir name update) OK
80;; MISCELLANEOUS 80;; MISCELLANEOUS
81;; - make-version-backups-p (file) ?? 81;; - make-version-backups-p (file) ??
82;; - previous-revision (file rev) OK 82;; - previous-revision (file rev) OK
@@ -562,7 +562,6 @@ Optional arg REVISION is a revision to annotate from."
562 "Retrieve the version tagged by NAME of all registered files at or below DIR." 562 "Retrieve the version tagged by NAME of all registered files at or below DIR."
563 (let ((default-directory dir)) 563 (let ((default-directory dir))
564 (vc-hg-command nil 0 nil "update" name) 564 (vc-hg-command nil 0 nil "update" name)
565 ;; FIXME: update buffers if `update' is true
566 ;; TODO: update *vc-change-log* buffer so can see @ if --graph 565 ;; TODO: update *vc-change-log* buffer so can see @ if --graph
567 )) 566 ))
568 567