Mercurial Mercurial > hg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
allow toggling when the cursor is on the correct line instead of just the filename text in hg-commit-toggle-file
authorJonathan Kotta <jpkotta@packetdigital.com>
Wed, 13 May 2009 13:07:43 -0500
changeset 8370 45ed015b524e
parent 8369 93a811ef3ac0
child 8371 1bd0fdf4c1ec
allow toggling when the cursor is on the correct line instead of just the filename text in hg-commit-toggle-file
contrib/mercurial.el file | annotate | diff | comparison | revisions 
--- 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
Mercurial