lambdas: let emacs byte-compile
This commit is contained in:
parent
0b830fb6ef
commit
03e825dd36
3 changed files with 5 additions and 5 deletions
2
init.el
2
init.el
|
@ -25,7 +25,7 @@
|
||||||
(global-display-line-numbers-mode)
|
(global-display-line-numbers-mode)
|
||||||
(setq-default indicate-empty-lines t)
|
(setq-default indicate-empty-lines t)
|
||||||
(setq-default show-trailing-whitespace t)
|
(setq-default show-trailing-whitespace t)
|
||||||
(add-hook 'prog-mode-hook '(lambda () (whitespace-mode t)))
|
(add-hook 'prog-mode-hook #'(lambda () (whitespace-mode t)))
|
||||||
|
|
||||||
;;; personal framework bits
|
;;; personal framework bits
|
||||||
;; my personal keymap
|
;; my personal keymap
|
||||||
|
|
|
@ -10,9 +10,9 @@
|
||||||
|
|
||||||
;; TODO Proper graphical setup
|
;; TODO Proper graphical setup
|
||||||
(add-hook 'after-make-frame-functions
|
(add-hook 'after-make-frame-functions
|
||||||
(lambda (frame)
|
#'(lambda (frame)
|
||||||
(toggle-scroll-bar -1)
|
(toggle-scroll-bar -1)
|
||||||
(tool-bar-mode -1)))
|
(tool-bar-mode -1)))
|
||||||
|
|
||||||
;;; improvements to compilation buffer
|
;;; improvements to compilation buffer
|
||||||
(require 'compile)
|
(require 'compile)
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
;; Macro to simplify setting mode-local vars
|
;; Macro to simplify setting mode-local vars
|
||||||
(defmacro oxa/hook (hook-name &rest body)
|
(defmacro oxa/hook (hook-name &rest body)
|
||||||
`(add-hook ',hook-name '(lambda nil ,@body)))
|
`(add-hook ',hook-name #'(lambda nil ,@body)))
|
||||||
|
|
||||||
(provide 'oxa/utils)
|
(provide 'oxa/utils)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue