On Tue, 18 Jan 2011 12:44:14 +0900, "Shigio YAMAGUCHI" <[email protected]> wrote: > Hi all, > > It seems that a lot of people who are using gtags.el say, > "Return the default mouse mapping of emacs!" > I should answer this. > > How about changing gtags.el like follows? > > o All the assignment of mouse key is abolished. > o Instead, new custom variable 'gtags-suggested-keymap' is added. > > If you hope old key mapping then you should write your .emacs file > like this: > [$HOME/.emacs] > +------------------------------------------------ > |(setq gtags-mode-hook > | '(lambda () > | (setq gtags-suggested-keymap t) > |)) > > This is equivalent to the following settings: > [$HOME/.emacs] > +------------------------------------------------ > |(setq gtags-mode-hook > | '(lambda () > | (define-key gtags-mode-map "\eh" 'gtags-display-browser) > | (define-key gtags-mode-map "\C-]" 'gtags-find-tag-from-here) > | (define-key gtags-mode-map "\C-t" 'gtags-pop-stack) > | (define-key gtags-mode-map "\el" 'gtags-find-file) > | (define-key gtags-mode-map "\eg" 'gtags-find-with-grep) > | (define-key gtags-mode-map "\eI" 'gtags-find-with-idutils) > | (define-key gtags-mode-map "\es" 'gtags-find-symbol) > | (define-key gtags-mode-map "\er" 'gtags-find-rtag) > | (define-key gtags-mode-map "\et" 'gtags-find-tag) > | (define-key gtags-mode-map "\ev" 'gtags-visit-rootdir) > | (if (not gtags-running-xemacs) nil > | (define-key gtags-mode-map 'button3 'gtags-pop-stack) > | (define-key gtags-mode-map 'button2 'gtags-find-tag-by-event)) > | (if gtags-running-xemacs nil > | (define-key gtags-mode-map [mouse-3] 'gtags-pop-stack) > | (define-key gtags-mode-map [mouse-2] > 'gtags-find-tag-by-event)) > |)) > | > |(setq gtags-select-mode-hook > | '(lambda () > | (if (not gtags-running-xemacs) nil > | (define-key gtags-select-mode-map 'button3 'gtags-pop-stack) > | (define-key gtags-select-mode-map 'button2 > 'gtags-select-tag-by-event)) > | (if gtags-running-xemacs nil > | (define-key gtags-select-mode-map [mouse-3] 'gtags-pop-stack) > | (define-key gtags-select-mode-map [mouse-2] > 'gtags-select-tag-by-event)) > |)) > > As a result, the following mappings remain assuming that is compulsory. > > (define-key gtags-mode-map "\e*" 'gtags-pop-stack) > (define-key gtags-mode-map "\e." 'gtags-find-tag) > (define-key gtags-mode-map "\C-x4." 'gtags-find-tag-other-window) > > (define-key gtags-select-mode-map "\e*" 'gtags-pop-stack) > (define-key gtags-select-mode-map "\^?" 'scroll-down) > (define-key gtags-select-mode-map " " 'scroll-up) > (define-key gtags-select-mode-map "\C-b" 'scroll-down) > (define-key gtags-select-mode-map "\C-f" 'scroll-up) > (define-key gtags-select-mode-map "k" 'previous-line) > (define-key gtags-select-mode-map "j" 'next-line) > (define-key gtags-select-mode-map "p" 'previous-line) > (define-key gtags-select-mode-map "n" 'next-line) > (define-key gtags-select-mode-map "q" 'gtags-pop-stack) > (define-key gtags-select-mode-map "u" 'gtags-pop-stack) > (define-key gtags-select-mode-map "\C-t" 'gtags-pop-stack) > (define-key gtags-select-mode-map "\C-m" 'gtags-select-tag) > (define-key gtags-select-mode-map "\C-o" 'gtags-select-tag-other-window) > (define-key gtags-select-mode-map "\e." 'gtags-select-tag) > > What do you think?
Any chance of getting the per-frame tag stack. http://lists.gnu.org/archive/html/bug-global/2009-03/msg00002.html -aneesh _______________________________________________ Bug-global mailing list [email protected] http://lists.gnu.org/mailman/listinfo/bug-global
