Mercurial > emacs
comparison lisp/vc-cvs.el @ 104625:97ec4e51e2eb
(vc-cvs-update-changelog): Fix typo.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Thu, 27 Aug 2009 01:50:12 +0000 |
| parents | 5bce9145b1cc |
| children | adeed914a5fb |
comparison
equal
deleted
inserted
replaced
| 104624:eee8a7124ad0 | 104625:97ec4e51e2eb |
|---|---|
| 630 (beginning-of-line) | 630 (beginning-of-line) |
| 631 (if (re-search-forward "^\\([0-9]+\\.[0-9]+\\(\\.[0-9]+\\)*\\) +(" | 631 (if (re-search-forward "^\\([0-9]+\\.[0-9]+\\(\\.[0-9]+\\)*\\) +(" |
| 632 (line-end-position) t) | 632 (line-end-position) t) |
| 633 (match-string-no-properties 1) | 633 (match-string-no-properties 1) |
| 634 nil))) | 634 nil))) |
| 635 | |
| 636 (defun vc-cvs-previous-revision (file rev) | |
| 637 (vc-call-backend 'RCS 'previous-revision file rev)) | |
| 638 | |
| 639 (defun vc-cvs-next-revision (file rev) | |
| 640 (vc-call-backend 'RCS 'next-revision file rev)) | |
| 641 | |
| 642 ;; FIXME: This should probably be replaced by code using cvs2cl. | |
| 643 (defun vc-cvs-update-changelog (files) | |
| 644 (vc-call-backend 'RCS 'update-changelog files)) | |
| 635 | 645 |
| 636 ;;; | 646 ;;; |
| 637 ;;; Tag system | 647 ;;; Tag system |
| 638 ;;; | 648 ;;; |
| 639 | 649 |