diff options
| author | Dmitry Gutov <dgutov@yandex.ru> | 2015-10-28 02:42:51 +0200 |
|---|---|---|
| committer | Dmitry Gutov <dgutov@yandex.ru> | 2015-10-28 02:42:51 +0200 |
| commit | b1d39288e5845be744dcf8ac3c26631c1009dba1 (patch) | |
| tree | aed0824285ea80337a77a51b913133731c6a98d2 /lisp/vc/vc-hg.el | |
| parent | 692bce5b9eccfae19ae2a5a23a9ccd8d6bf86076 (diff) | |
| download | emacs-b1d39288e5845be744dcf8ac3c26631c1009dba1.tar.gz | |
Pipe Hg commit descriptions through 'tabindent'
* lisp/vc/vc-hg.el (vc-hg-log-format): Pipe commit description
through 'tabindent'.
(vc-hg-log-view-mode): Set tab-width to 2 locally.
(http://lists.gnu.org/archive/html/emacs-devel/2015-10/msg02259.html)
Diffstat (limited to 'lisp/vc/vc-hg.el')
| -rw-r--r-- | lisp/vc/vc-hg.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el index 8d9493ec210..1550c564b7e 100644 --- a/lisp/vc/vc-hg.el +++ b/lisp/vc/vc-hg.el @@ -264,7 +264,7 @@ highlighting the Log View buffer." "{if(parents, 'parents: {parents}\n')}" "user: {author}\n" "Date: {date|date}\n" - "summary: {desc}\n\n") + "summary: {desc|tabindent}\n\n") "Mercurial log template for `vc-hg-print-log' long format.") (defun vc-hg-print-log (files buffer &optional shortlog start-revision limit) @@ -305,6 +305,7 @@ If LIMIT is non-nil, show no more than this many entries." (if (eq vc-log-view-type 'short) (cadr vc-hg-root-log-format) "^changeset:[ \t]*\\([0-9]+\\):\\(.+\\)")) + (set (make-local-variable 'tab-width) 2) ;; Allow expanding short log entries (when (eq vc-log-view-type 'short) (setq truncate-lines t) |