1 files changed, 16 insertions, 0 deletions

@@ -350,6 +350,22 @@
 (acdw/set `((eshell-directory-name ,(acdw/in-dir "eshell/" t))
            (eshell-aliases-file ,(acdw/in-dir "eshell/aliases" t))))
 
+;;; Programming languages
+
+;; Emacs lisp
+(acdw/set '((eval-expression-print-length nil)
+            (eval-expression-print-level nil)))
+
+(when (require 'cl-lib)
+  (setq-default lisp-indent-function #'common-lisp-indent-function)
+  (put 'cl-flet 'common-lisp-indent-function
+       (get 'flet 'common-lisp-indent-function))
+  (put 'cl-labels 'common-lisp-indent-function
+       (get 'labels 'common-lisp-indent-function))
+  (put 'if 'common-lisp-indent-function 2)
+  (put 'dotimes-protect 'common-lisp-indent-function
+       (get 'when 'common-lisp-indent-function)))
+
 ;;; Miscellaneous
 
 (acdw/set '((disabled-command-function nil)