From 18bb5178ea2d2d1f2f0e788ab33bfbdf59376837 Mon Sep 17 00:00:00 2001 From: tslil clingman <> Date: Fri, 24 Apr 2020 14:51:42 -0700 Subject: EXWM workspace fixes & tray, Verilog, still not good input method --- emacs/inits/04-input_method.el | 18 ++++++++++++++++-- 1 file changed, 16 insertions(+), 2 deletions(-) (limited to 'emacs/inits/04-input_method.el') diff --git a/emacs/inits/04-input_method.el b/emacs/inits/04-input_method.el index fff167c..a310b57 100644 --- a/emacs/inits/04-input_method.el +++ b/emacs/inits/04-input_method.el @@ -1,4 +1,4 @@ -;; Time-stamp: <2019-09-11 20:37:56 (tslil@bison)> +;; Time-stamp: <2020-04-06 13:46:34 (tslil@bison)> (use-package agda-input :load-path "~/.emacs.d/scripts/" @@ -12,4 +12,18 @@ (add-to-list 'agda-input-user-translations sym)) (agda-input-setup)) -(setq-default default-input-method "Agda") +(setq-default default-input-method "TeX") + +(defvar use-default-input-method t) + +(make-variable-buffer-local 'use-default-input-method) + +(defun activate-default-input-method () + (interactive) + (if use-default-input-method + (activate-input-method default-input-method) + (inactivate-input-method))) + +;; (add-hook 'text-mode-hook #'activate-default-input-method) +;; (add-hook 'mail-mode-hook #'activate-default-input-method) +;; (add-hook 'isearch-mode-hook #'activate-default-input-method) -- cgit v1.2.3