From d1d945f72135bb020e8247a51670348d454c1f39 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Thu, 11 Oct 2012 14:44:44 +0900 Subject: [PATCH] add interactive function make --- emacs.el | 51 ++++++++++++++++++++++++++++----------------------- 1 file changed, 28 insertions(+), 23 deletions(-) diff --git a/emacs.el b/emacs.el index 47fc946..e8caba8 100644 --- a/emacs.el +++ b/emacs.el @@ -606,34 +606,16 @@ otherwise the path where the library installed." t) (require 'save-window-size nil t)) -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -;; GNU GLOBAL(gtags) -;; http://uguisu.skr.jp/Windows/gtags.html -;; http://eigyr.dip.jp/gtags.html -;; http://cha.la.coocan.jp/doc/gnu_global.html - -(autoload 'gtags-mode "gtags" "" t) -(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 - )) - (and (dllib-if-unfound "https://github.com/10sr/emacs-lisp/raw/master/read-only-only-mode.el" t) (require 'read-only-only-mode nil t)) +(defun make () + "Run \"make -k \" in current directory." + (interactive) + (compile "make -k")) + (add-hook 'verilog-mode-hook (lambda () (define-key verilog-mode-map ";" 'self-insert-command))) @@ -871,6 +853,29 @@ otherwise the path where the library installed." t) (require 'sl nil t)) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; GNU GLOBAL(gtags) +;; http://uguisu.skr.jp/Windows/gtags.html +;; http://eigyr.dip.jp/gtags.html +;; http://cha.la.coocan.jp/doc/gnu_global.html + +(autoload 'gtags-mode "gtags" "" t) +(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 + )) + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; term mode