diff options
author | Case Duckworth | 2021-03-11 12:16:20 -0600 |
---|---|---|
committer | Case Duckworth | 2021-03-11 12:16:20 -0600 |
commit | 5247b85a848908dd3a470b60b537b372d85221d3 (patch) | |
tree | 1b02ba5b14bfc89564fd9ec5b5963a5566fd8964 | |
parent | Configure `eshell' (diff) | |
download | emacs-5247b85a848908dd3a470b60b537b372d85221d3.tar.gz emacs-5247b85a848908dd3a470b60b537b372d85221d3.zip |
Configure emacs lisp
-rw-r--r-- | init.el | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/init.el b/init.el index c5f8034..86eb548 100644 --- a/init.el +++ b/init.el | |||
@@ -350,6 +350,22 @@ | |||
350 | (acdw/set `((eshell-directory-name ,(acdw/in-dir "eshell/" t)) | 350 | (acdw/set `((eshell-directory-name ,(acdw/in-dir "eshell/" t)) |
351 | (eshell-aliases-file ,(acdw/in-dir "eshell/aliases" t)))) | 351 | (eshell-aliases-file ,(acdw/in-dir "eshell/aliases" t)))) |
352 | 352 | ||
353 | ;;; Programming languages | ||
354 | |||
355 | ;; Emacs lisp | ||
356 | (acdw/set '((eval-expression-print-length nil) | ||
357 | (eval-expression-print-level nil))) | ||
358 | |||
359 | (when (require 'cl-lib) | ||
360 | (setq-default lisp-indent-function #'common-lisp-indent-function) | ||
361 | (put 'cl-flet 'common-lisp-indent-function | ||
362 | (get 'flet 'common-lisp-indent-function)) | ||
363 | (put 'cl-labels 'common-lisp-indent-function | ||
364 | (get 'labels 'common-lisp-indent-function)) | ||
365 | (put 'if 'common-lisp-indent-function 2) | ||
366 | (put 'dotimes-protect 'common-lisp-indent-function | ||
367 | (get 'when 'common-lisp-indent-function))) | ||
368 | |||
353 | ;;; Miscellaneous | 369 | ;;; Miscellaneous |
354 | 370 | ||
355 | (acdw/set '((disabled-command-function nil) | 371 | (acdw/set '((disabled-command-function nil) |