From 99e0933f43fe36aef8534c8718db2448b9eef159 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Thu, 29 Nov 2012 12:37:26 +0900 Subject: [PATCH] fix bug --- emacs.el | 30 +++++++++++++++--------------- 1 file changed, 15 insertions(+), 15 deletions(-) diff --git a/emacs.el b/emacs.el index dc05beb..b4e7228 100644 --- a/emacs.el +++ b/emacs.el @@ -999,21 +999,21 @@ delete; o: select other; j, l: enlarge; h, k: shrink; q: quit." ;; http://cha.la.coocan.jp/doc/gnu_global.html (when (lazy-load-eval 'gtags '(gtags-mode)) - (setq gtags-mode-hook - '(lambda () - (setq gtags-select-buffer-single t) - ;; (local-set-key "\M-t" 'gtags-find-tag) - ;; (local-set-key "\M-r" 'gtags-find-rtag) - ;; (local-set-key "\M-s" 'gtags-find-symbol) - ;; (local-set-key "\C-t" 'gtags-pop-stack) - (define-key gtags-mode-map (kbd "C-x t h") 'gtags-find-tag-from-here) - (define-key gtags-mode-map (kbd "C-x t t") 'gtags-find-tag) - (define-key gtags-mode-map (kbd "C-x t r") 'gtags-find-rtag) - (define-key gtags-mode-map (kbd "C-x t s") 'gtags-find-symbol) - (define-key gtags-mode-map (kbd "C-x t p") 'gtags-find-pattern) - (define-key gtags-mdoe-map (kbd "C-x t f") 'gtags-find-file) - (define-key gtags-mode-map (kbd "C-x t b") 'gtags-pop-stack) ;back - ))) + (add-hook 'gtags-mode-hook + (lambda () + (setq gtags-select-buffer-single t) + ;; (local-set-key "\M-t" 'gtags-find-tag) + ;; (local-set-key "\M-r" 'gtags-find-rtag) + ;; (local-set-key "\M-s" 'gtags-find-symbol) + ;; (local-set-key "\C-t" 'gtags-pop-stack) + (define-key gtags-mode-map (kbd "C-x t h") 'gtags-find-tag-from-here) + (define-key gtags-mode-map (kbd "C-x t t") 'gtags-find-tag) + (define-key gtags-mode-map (kbd "C-x t r") 'gtags-find-rtag) + (define-key gtags-mode-map (kbd "C-x t s") 'gtags-find-symbol) + (define-key gtags-mode-map (kbd "C-x t p") 'gtags-find-pattern) + (define-key gtags-mdoe-map (kbd "C-x t f") 'gtags-find-file) + (define-key gtags-mode-map (kbd "C-x t b") 'gtags-pop-stack) ;back + ))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; term mode