General & minor reformatting+refactor

This commit is contained in:
Henrik Lissner 2018-07-19 03:40:31 +02:00
parent 8756837036
commit d6461d495b
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
4 changed files with 8 additions and 11 deletions

View file

@ -76,9 +76,9 @@
:lang :lang
;assembly ; assembly for fun or debugging ;assembly ; assembly for fun or debugging
;(cc +irony +rtags); C/C++/Obj-C madness ;(cc +irony +rtags); C/C++/Obj-C madness
;clojure ; java with a lisp
;common-lisp ; if you've seen one lisp, you've seen them all ;common-lisp ; if you've seen one lisp, you've seen them all
;crystal ; ruby at the speed of c ;crystal ; ruby at the speed of c
;clojure ; java with a lisp
;csharp ; unity, .NET, and mono shenanigans ;csharp ; unity, .NET, and mono shenanigans
data ; config/data formats data ; config/data formats
;erlang ; an elegant language for a more civilized age ;erlang ; an elegant language for a more civilized age

View file

@ -1,6 +1,5 @@
;;; lang/common-lisp/config.el -*- lexical-binding: t; -*- ;;; lang/common-lisp/config.el -*- lexical-binding: t; -*-
;; `slime'
(after! sly (after! sly
(setq inferior-lisp-program "sbcl") (setq inferior-lisp-program "sbcl")
@ -39,10 +38,10 @@
(when (featurep! :feature evil +everywhere) (when (featurep! :feature evil +everywhere)
(add-hook 'sly-popup-buffer-mode-hook #'evil-normalize-keymaps) (add-hook 'sly-popup-buffer-mode-hook #'evil-normalize-keymaps)
(unless evil-move-beyond-eol (unless evil-move-beyond-eol
(advice-add 'sly-eval-last-expression :around '+common-lisp*sly-last-sexp) (advice-add #'sly-eval-last-expression :around #'+common-lisp*sly-last-sexp)
(advice-add 'sly-pprint-eval-last-expression :around '+common-lisp*sly-last-sexp) (advice-add #'sly-pprint-eval-last-expression :around #'+common-lisp*sly-last-sexp)
(advice-add 'sly-eval-print-last-expression :around '+common-lisp*sly-last-sexp) (advice-add #'sly-eval-print-last-expression :around #'+common-lisp*sly-last-sexp)
(advice-add 'sly-eval-last-expression-in-repl :around '+common-lisp*sly-last-sexp)) (advice-add #'sly-eval-last-expression-in-repl :around #'+common-lisp*sly-last-sexp))
(set-evil-initial-state! (set-evil-initial-state!
'(sly-db-mode sly-inspector-mode sly-popup-buffer-mode sly-xref-mode) '(sly-db-mode sly-inspector-mode sly-popup-buffer-mode sly-xref-mode)
'normal) 'normal)

View file

@ -53,7 +53,5 @@
(def-package! pandoc-mode (def-package! pandoc-mode
:when (featurep! +pandoc) :when (featurep! +pandoc)
:commands :commands pandoc-mode
pandoc-mode :hook (markdown-mode . conditionally-turn-on-pandoc))
:hook
(markdown-mode . conditionally-turn-on-pandoc))