Add paren match highlighting to all of emacs
This commit is contained in:
parent
5b384968e1
commit
8b1af0f70d
2 changed files with 4 additions and 15 deletions
|
|
@ -58,6 +58,8 @@
|
||||||
'(proof-splash-enable nil)
|
'(proof-splash-enable nil)
|
||||||
'(require-final-newline t)
|
'(require-final-newline t)
|
||||||
'(scheme-program-name "mit-scheme")
|
'(scheme-program-name "mit-scheme")
|
||||||
|
'(show-paren-delay 0)
|
||||||
|
'(show-paren-mode 1)
|
||||||
'(split-height-threshold 0)
|
'(split-height-threshold 0)
|
||||||
'(split-width-threshold 0)
|
'(split-width-threshold 0)
|
||||||
'(tab-width 4)
|
'(tab-width 4)
|
||||||
|
|
@ -127,21 +129,6 @@
|
||||||
;; python3
|
;; python3
|
||||||
(add-to-list 'auto-mode-alist '("\\.py3\\'" . python-mode))
|
(add-to-list 'auto-mode-alist '("\\.py3\\'" . python-mode))
|
||||||
|
|
||||||
;; highlight matching parens
|
|
||||||
(require 'paren)
|
|
||||||
(defun lispy-parens ()
|
|
||||||
"Setup parens display for lisp modes"
|
|
||||||
(setq show-paren-delay 0)
|
|
||||||
(setq show-paren-style 'parenthesis)
|
|
||||||
(make-variable-buffer-local 'show-paren-mode)
|
|
||||||
(show-paren-mode 1)
|
|
||||||
(set-face-attribute 'show-paren-match-face nil :foreground "orange")
|
|
||||||
(set-face-attribute 'show-paren-match-face nil :background "black")
|
|
||||||
(set-face-attribute 'show-paren-match-face nil :weight 'extra-bold))
|
|
||||||
|
|
||||||
(add-hook 'emacs-lisp-mode-hook 'lispy-parens)
|
|
||||||
(add-hook 'scheme-mode-hook 'lispy-parens)
|
|
||||||
|
|
||||||
;; Missing things from scheme IDE
|
;; Missing things from scheme IDE
|
||||||
(defun scheme-send-buffer ()
|
(defun scheme-send-buffer ()
|
||||||
(interactive)
|
(interactive)
|
||||||
|
|
|
||||||
|
|
@ -19,6 +19,8 @@
|
||||||
'(font-lock-variable-name-face ((t (:foreground "#00c7ff" ))))
|
'(font-lock-variable-name-face ((t (:foreground "#00c7ff" ))))
|
||||||
'(minibuffer-prompt ((t (:foreground "#c7c7c7" :bold t ))))
|
'(minibuffer-prompt ((t (:foreground "#c7c7c7" :bold t ))))
|
||||||
'(font-lock-warning-face ((t (:foreground "red" :bold t ))))
|
'(font-lock-warning-face ((t (:foreground "red" :bold t ))))
|
||||||
|
|
||||||
|
'(show-paren-match-face ((t (:foreground "orange" :background "black" :bold t))))
|
||||||
)
|
)
|
||||||
|
|
||||||
(provide-theme 'jdkaplan)
|
(provide-theme 'jdkaplan)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue