Define <f9> in the c-mode-map directly

This commit is contained in:
Tom Willemse 2015-12-17 00:50:21 +01:00
parent bb83279842
commit f65c03208b

View file

@ -137,10 +137,6 @@ MODE1 is enabled and vice-versa."
;;;; Functions ;;;; Functions
(defun oni:c-mode-func ()
"Function for `c-mode-hook'."
(local-set-key [f9] 'compile))
(defun oni:change-number-at-point (change-func) (defun oni:change-number-at-point (change-func)
"Use CHANGE-FUNC to change the number at `point'." "Use CHANGE-FUNC to change the number at `point'."
(let ((num (number-to-string (funcall change-func (number-at-point)))) (let ((num (number-to-string (funcall change-func (number-at-point))))
@ -753,6 +749,9 @@ If no direction is given, don't split."
(topmost-intro-cont first c-lineup-topmost-intro-cont (topmost-intro-cont first c-lineup-topmost-intro-cont
c-lineup-gnu-DEFUN-intro-cont)))) c-lineup-gnu-DEFUN-intro-cont))))
(with-eval-after-load 'cc-mode
(define-key c-mode-map (kbd "<f9>") 'compile))
(stante-after circe (stante-after circe
(require 'circe-init)) (require 'circe-init))
@ -1101,8 +1100,6 @@ If no direction is given, don't split."
'clojure-mode-hook 'geiser-repl-mode-hook 'sawfish-mode-hook 'clojure-mode-hook 'geiser-repl-mode-hook 'sawfish-mode-hook
'scheme-mode-hook) 'scheme-mode-hook)
(oni:add-hooks 'c-mode-hook #'oni:c-mode-func)
(oni:add-hooks 'emacs-lisp-mode-hook (oni:add-hooks 'emacs-lisp-mode-hook
(lambda () (lambda ()
(setf ac-sources '(ac-source-emacs-lisp-features (setf ac-sources '(ac-source-emacs-lisp-features