Mercurial > emacs
comparison lisp/vc-git.el @ 108913:c05344a913c8
Improve support for special markup in the VC commit message.
* lisp/vc-mtn.el (vc-mtn-checkin): Add support for Author: and Date: markup.
* lisp/vc-hg.el (vc-hg-checkin): Add support for Date:.
* lisp/vc-git.el (vc-git-checkin):
* lisp/vc-bzr.el (vc-bzr-checkin): Likewise.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Tue, 08 Jun 2010 22:24:01 -0700 |
| parents | 3e41dbf56aa2 |
| children |
comparison
equal
deleted
inserted
replaced
| 108912:c7e85ff4bca6 | 108913:c05344a913c8 |
|---|---|
| 552 | 552 |
| 553 (defun vc-git-checkin (files rev comment) | 553 (defun vc-git-checkin (files rev comment) |
| 554 (let ((coding-system-for-write vc-git-commits-coding-system)) | 554 (let ((coding-system-for-write vc-git-commits-coding-system)) |
| 555 (apply 'vc-git-command nil 0 files | 555 (apply 'vc-git-command nil 0 files |
| 556 (nconc (list "commit" "-m") | 556 (nconc (list "commit" "-m") |
| 557 (log-edit-extract-headers '(("Author" . "--author")) | 557 (log-edit-extract-headers '(("Author" . "--author") |
| 558 ("Date" . "--date")) | |
| 558 comment) | 559 comment) |
| 559 (list "--only" "--"))))) | 560 (list "--only" "--"))))) |
| 560 | 561 |
| 561 (defun vc-git-find-revision (file rev buffer) | 562 (defun vc-git-find-revision (file rev buffer) |
| 562 (let* (process-file-side-effects | 563 (let* (process-file-side-effects |