From 224ef1ec6e53988776b257de48a0b559ef43a8be Mon Sep 17 00:00:00 2001 From: =?utf8?q?Gustav=20H=C3=A5llberg?= Date: Tue, 4 Aug 2009 14:39:47 +0200 Subject: [PATCH] stgit.el: Set patch names to be word syntax throughout MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit This allows easy selection of the patch name; e.g., by double-clicking. Signed-off-by: Gustav HÃ¥llberg --- contrib/stgit.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/contrib/stgit.el b/contrib/stgit.el index 9cc40db..132c19e 100644 --- a/contrib/stgit.el +++ b/contrib/stgit.el @@ -79,7 +79,9 @@ directory DIR or `default-directory'" (insert (propertize (if (eq status 'index) "Index" "Work tree") 'face face)) (insert (format "%-30s" - (propertize (symbol-name name) 'face face)) + (propertize (symbol-name name) + 'face face + 'syntax-table (string-to-syntax "w"))) " " (if (stgit-patch-empty patch) "(empty) " "") (propertize (or (stgit-patch-desc patch) "") @@ -739,6 +741,7 @@ Commands: (set (make-local-variable 'stgit-show-worktree) stgit-default-show-worktree) (set (make-local-variable 'stgit-index-node) nil) (set (make-local-variable 'stgit-worktree-node) nil) + (set (make-local-variable 'parse-sexp-lookup-properties) t) (set-variable 'truncate-lines 't) (add-hook 'after-save-hook 'stgit-update-saved-file) (run-hooks 'stgit-mode-hook)) -- 2.11.0