X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/ab9e097f3a2b6fb3774c57a5cbca7ec67eb25a65..506bada965ae0c559cb2e9c9dbff460c782f391f:/el/dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 75bbe8e..e843110 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -654,8 +654,14 @@ case."
   (trap (turn-on-font-lock)))
 
 (eval-after-load 'gtags
-  '(dolist (key '([mouse-2] [mouse-3]))
-     (define-key gtags-mode-map key nil)))
+  '(progn
+     (dolist (key '([mouse-2] [mouse-3]))
+       (define-key gtags-mode-map key nil))
+     (define-key gtags-mode-map [C-S-mouse-2] 'gtags-find-tag-by-event)
+     (define-key gtags-select-mode-map [C-S-mouse-2]
+       'gtags-select-tag-by-event)
+     (dolist (map (list gtags-mode-map gtags-select-mode-map))
+       (define-key map [C-S-mouse-3] 'gtags-pop-stack))))
 
 ;; Backup file handling.