From 150ac9e510b7eac9cf615dae4b5b8dd21d365781 Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Sat, 7 Dec 2013 08:45:05 +0200 Subject: [PATCH] [Fix #433] Disable problematic binding M-[ --- core/prelude-editor.el | 3 ++- modules/prelude-lisp.el | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/core/prelude-editor.el b/core/prelude-editor.el index 9a51c59..08f5132 100644 --- a/core/prelude-editor.el +++ b/core/prelude-editor.el @@ -111,7 +111,8 @@ Will only occur if prelude-whitespace is also enabled." (show-smartparens-global-mode +1) (define-key prog-mode-map (kbd "M-(") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "("))) -(define-key prog-mode-map (kbd "M-[") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "["))) +;; FIXME: pick terminal friendly binding +;; (define-key prog-mode-map (kbd "M-[") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "["))) (define-key prog-mode-map (kbd "M-\"") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "\""))) ;; disable annoying blink-matching-paren diff --git a/modules/prelude-lisp.el b/modules/prelude-lisp.el index 4877e0a..2516a13 100644 --- a/modules/prelude-lisp.el +++ b/modules/prelude-lisp.el @@ -40,7 +40,8 @@ ;; wrap keybindings (define-key lisp-mode-shared-map (kbd "M-(") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "("))) -(define-key lisp-mode-shared-map (kbd "M-[") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "["))) +;; FIXME: Pick terminal-friendly binding. +;;(define-key lisp-mode-shared-map (kbd "M-[") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "["))) (define-key lisp-mode-shared-map (kbd "M-\"") (lambda (&optional arg) (interactive "P") (sp-wrap-with-pair "\""))) ;; a great lisp coding hook