forked from colonelpanic/dotfiles
53 lines
2.1 KiB
EmacsLisp
53 lines
2.1 KiB
EmacsLisp
|
;;; starter-kit-lisp-autoloads.el --- automatically extracted autoloads
|
|||
|
|
;;
|
|||
|
|
;;; Code:
|
|||
|
|
|
|||
|
|
|
|||
|
|
;;;### (autoloads nil "starter-kit-lisp" "starter-kit-lisp.el" (20815
|
|||
|
|
;;;;;; 22618 0 0))
|
|||
|
|
;;; Generated autoloads from starter-kit-lisp.el
|
|||
|
|
|
|||
|
|
(add-hook 'emacs-lisp-mode-hook 'turn-on-eldoc-mode)
|
|||
|
|
|
|||
|
|
(add-hook 'emacs-lisp-mode-hook 'esk-remove-elc-on-save)
|
|||
|
|
|
|||
|
|
(add-hook 'emacs-lisp-mode-hook 'esk-prog-mode-hook)
|
|||
|
|
|
|||
|
|
(add-hook 'emacs-lisp-mode-hook 'elisp-slime-nav-mode)
|
|||
|
|
|
|||
|
|
(defun esk-remove-elc-on-save nil "\
|
|||
|
|
If you're saving an elisp file, likely the .elc is no longer valid." (make-local-variable (quote after-save-hook)) (add-hook (quote after-save-hook) (lambda nil (if (file-exists-p (concat buffer-file-name "c")) (delete-file (concat buffer-file-name "c"))))))
|
|||
|
|
|
|||
|
|
(define-key emacs-lisp-mode-map (kbd "C-c v") 'eval-buffer)
|
|||
|
|
|
|||
|
|
(define-key read-expression-map (kbd "TAB") 'lisp-complete-symbol)
|
|||
|
|
|
|||
|
|
(define-key lisp-mode-shared-map (kbd "RET") 'reindent-then-newline-and-indent)
|
|||
|
|
|
|||
|
|
(defface esk-paren-face '((((class color) (background dark)) (:foreground "grey50")) (((class color) (background light)) (:foreground "grey55"))) "\
|
|||
|
|
Face used to dim parentheses." :group (quote starter-kit-faces))
|
|||
|
|
|
|||
|
|
(eval-after-load 'paredit '(define-key paredit-mode-map (kbd "M-)") 'paredit-forward-slurp-sexp))
|
|||
|
|
|
|||
|
|
(dolist (mode '(scheme emacs-lisp lisp clojure)) (when (> (display-color-cells) 8) (font-lock-add-keywords (intern (concat (symbol-name mode) "-mode")) '(("(\\|)" quote esk-paren-face)))) (add-hook (intern (concat (symbol-name mode) "-mode-hook")) 'esk-turn-on-paredit) (add-hook (intern (concat (symbol-name mode) "-mode-hook")) 'esk-turn-on-paredit))
|
|||
|
|
|
|||
|
|
(defun esk-pretty-fn nil (font-lock-add-keywords nil `(("(\\(fn\\>\\)" (0 (progn (compose-region (match-beginning 1) (match-end 1) "ƒ") nil))))))
|
|||
|
|
|
|||
|
|
(add-hook 'clojure-mode-hook 'esk-pretty-fn)
|
|||
|
|
|
|||
|
|
;;;***
|
|||
|
|
|
|||
|
|
;;;### (autoloads nil nil ("starter-kit-lisp-pkg.el") (20815 22618
|
|||
|
|
;;;;;; 616623 0))
|
|||
|
|
|
|||
|
|
;;;***
|
|||
|
|
|
|||
|
|
(provide 'starter-kit-lisp-autoloads)
|
|||
|
|
;; Local Variables:
|
|||
|
|
;; version-control: never
|
|||
|
|
;; no-byte-compile: t
|
|||
|
|
;; no-update-autoloads: t
|
|||
|
|
;; coding: utf-8
|
|||
|
|
;; End:
|
|||
|
|
;;; starter-kit-lisp-autoloads.el ends here
|