diff --git a/init/init-latex.el b/init/init-latex.el index a509294..fb7b08e 100644 --- a/init/init-latex.el +++ b/init/init-latex.el @@ -79,15 +79,23 @@ ;; EXPERIMENTAL: unbind return - NOTE it is important to unbind and not RET. If we ;; unbind RET then C-m won't work either. - (define-key LaTeX-mode-map (kbd "") (lambda() (interactive) (insert "\\")));(lambda() (interactive) (message "Use C-m"))) + (define-key LaTeX-mode-map (kbd "") (lambda() (interactive) (insert "\\"))) (define-key LaTeX-mode-map (kbd "S-") (lambda() (interactive) (insert "|"))) ;;(define-key LaTeX-mode-map (kbd "C-SPC") (lambda() (interactive) (insert "\\"))) (define-key LaTeX-mode-map (kbd "M-S-SPC") 'TeX-insert-braces) (define-key LaTeX-mode-map (kbd "s-SPC") (lambda() (interactive) (insert "~"))) - (define-key LaTeX-mode-map (kbd "M-_") (lambda (r-begin r-end) (interactive "r") (add-delimiter "_{" "}" r-begin r-end))) + + ;; why this got dropped? + (define-key LaTeX-mode-map (kbd "C-c C-.") 'LaTeX-mark-environment) + + ;; Go with strict mode +; (define-key LaTeX-mode-map (kbd "_") (lambda() (interactive) (flash-hline) (message "Use C-c C-k"))) + (define-key LaTeX-mode-map (kbd "M-_") (lambda() (interactive) (flash-hline) (message "Use C-c C-k"))) (define-key LaTeX-mode-map (kbd "C-c C-k") (lambda (r-begin r-end) (interactive "r") (add-delimiter "_{" "}" r-begin r-end))) - (define-key LaTeX-mode-map (kbd "M-^") (lambda (r-begin r-end) (interactive "r") (add-delimiter "^{" "}" r-begin r-end))) +; (define-key LaTeX-mode-map (kbd "^") (lambda() (interactive) (flash-hline) (message "Use C-c C-i"))) + (define-key LaTeX-mode-map (kbd "M-^") (lambda() (interactive) (flash-hline) (message "Use C-c C-i"))) (define-key LaTeX-mode-map (kbd "C-c C-i") (lambda (r-begin r-end) (interactive "r") (add-delimiter "^{" "}" r-begin r-end))) + (define-key LaTeX-mode-map (kbd "M-|") (lambda (r-begin r-end) (interactive "r") (add-delimiter "|" "|" r-begin r-end))) (define-key LaTeX-mode-map (kbd "M-,") (lambda (r-begin r-end) (interactive "r") (add-delimiter ", " ", " r-begin r-end))) (define-key LaTeX-mode-map (kbd "M-\"") (lambda (r-begin r-end) (interactive "r") (add-delimiter "“" "”" r-begin r-end))) @@ -118,6 +126,8 @@ (define-key LaTeX-mode-map (kbd "∨") 'insert-char-with-padding) (define-key LaTeX-mode-map (kbd "∧") 'insert-char-with-padding) (define-key LaTeX-mode-map (kbd "×") 'insert-char-with-padding) + (define-key LaTeX-mode-map (kbd "⊂") 'insert-char-with-padding) + (define-key LaTeX-mode-map (kbd "⊃") 'insert-char-with-padding) ;; Force moves around to be more “semantic” (define-key LaTeX-mode-map (kbd "C-v") 'forward-paragraph);(lambda() (interactive) (message "Command disabled")))