Remove obsolete extra-symbol customization for TeX input method

init.el

@@ -276,9 +276,7 @@
                                            :key #'cl-first)))))
 
 (use-package quail
-  :init (setq default-input-method "TeX")
+  :init (setq default-input-method "TeX"))
-  :config (add-hook 'input-method-activate-hook
-                    #'db/add-symbols-to-TeX-input-method))
 
 (use-package savehist
   :commands (savehist-mode)
@@ -374,7 +372,6 @@
              db/sort-nsm-permanent-settings
              endless/colorize-compilation
              db/turn-off-local-electric-pair-mode
-             db/add-symbols-to-TeX-input-method
              db/two-monitors-xrandr
              db/one-monitor-xrandr
              db/pretty-print-xml

site-lisp/db-utils.el

@@ -789,41 +789,6 @@ number of bytes has been inserted."
       (should (equal '(120 4194204 4194235 4194260)
                      (string-to-list (buffer-string)))))))
 
-
-;;; Extend Input Methods
-
-(defun db/add-symbols-to-TeX-input-method ()
-  "Add some new symbols to TeX input method."
-  (when (string= current-input-method "TeX")
-    (let ((quail-current-package (assoc "TeX" quail-package-alist)))
-      (quail-define-rules
-       ((append . t))
-       ("\\land" ?∧)
-       ("\\lor" ?∨)
-       ("\\lnot" ?¬)
-       ("\\implies" ?⇒)
-       ("\\powerset" ?𝔓)
-       ("\\mathbbK" ?𝕂)
-       ("\\mathbbR" ?ℝ)
-       ("\\mathbbN" ?ℕ)
-       ("\\mathbbZ" ?ℤ)
-       ("\\mathbbP" ?ℙ)
-       ("\\mathcalA" ?𝒜)
-       ("\\mathcalB" ?ℬ)
-       ("\\mathcalC" ?𝒞)
-       ("\\mathcalD" ?𝒟)
-       ("\\mathcalE" ?ℰ)
-       ("\\mathcalH" ?ℋ)
-       ("\\mathcalI" ?ℐ)
-       ("\\mathcalJ" ?𝒥)
-       ("\\mathcalK" ?𝒦)
-       ("\\mathcalL" ?ℒ)
-       ("\\mathcalM" ?ℳ)
-       ("\\mathcalR" ?ℛ)
-       ("\\mathcalQ" ?𝒬)
-       ("\\mathcalS" ?𝒮)
-       ("\\mathfrakP" ?𝔓)))))
-
 
 ;;; Wrappers for external applications