Mercurial > hg
changeset 8370:45ed015b524e
allow toggling when the cursor is on the correct line instead of just the filename text in hg-commit-toggle-file
author | Jonathan Kotta <jpkotta@packetdigital.com> |
---|---|
date | Wed, 13 May 2009 13:07:43 -0500 |
parents | 93a811ef3ac0 |
children | 1bd0fdf4c1ec |
files | contrib/mercurial.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/contrib/mercurial.el Wed May 13 16:31:19 2009 +0200 +++ b/contrib/mercurial.el Wed May 13 13:07:43 2009 -0500 @@ -837,11 +837,12 @@ (interactive "d") (save-excursion (goto-char pos) - (let ((face (get-text-property pos 'face)) + (let (face (inhibit-read-only t) bol) (beginning-of-line) (setq bol (+ (point) 4)) + (setq face (get-text-property bol 'face)) (end-of-line) (if (eq face 'bold) (progn