From 8b1af0f70def24ddad7241c5e5868cb98b5041b8 Mon Sep 17 00:00:00 2001 From: Jeremy Kaplan Date: Sat, 26 Sep 2015 15:26:04 -0400 Subject: [PATCH] Add paren match highlighting to all of emacs --- emacs/init.el | 17 ++--------------- emacs/themes/jdkaplan-theme.el | 2 ++ 2 files changed, 4 insertions(+), 15 deletions(-) diff --git a/emacs/init.el b/emacs/init.el index 855da8a..319b3c9 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -58,6 +58,8 @@ '(proof-splash-enable nil) '(require-final-newline t) '(scheme-program-name "mit-scheme") + '(show-paren-delay 0) + '(show-paren-mode 1) '(split-height-threshold 0) '(split-width-threshold 0) '(tab-width 4) @@ -127,21 +129,6 @@ ;; python3 (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 (defun scheme-send-buffer () (interactive) diff --git a/emacs/themes/jdkaplan-theme.el b/emacs/themes/jdkaplan-theme.el index 25447de..9332414 100644 --- a/emacs/themes/jdkaplan-theme.el +++ b/emacs/themes/jdkaplan-theme.el @@ -19,6 +19,8 @@ '(font-lock-variable-name-face ((t (:foreground "#00c7ff" )))) '(minibuffer-prompt ((t (:foreground "#c7c7c7" :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)