Conform hook names to conventions

Also minor reformatting & comment corrections.

modules/completion/company/autoload.el

@@ -6,7 +6,7 @@
 
 MODES should be one major-mode symbol or a list of them."
   (dolist (mode (doom-enlist modes))
-    (let ((def-name (intern (format "+company--init-%s" mode))))
+    (let ((def-name (intern (format "+company|init-%s" mode))))
       (fset def-name
             (lambda () (when (or (eq major-mode mode)
                             (and (boundp mode) (symbol-value mode)))

modules/emacs/electric/autoload.el

@@ -10,7 +10,7 @@ trigger electric indentation."
             (list '(:char :words) plist)))
   (cl-destructuring-bind (&key chars words) plist
     (dolist (mode (doom-enlist modes))
-      (let ((fn (intern (format "+electric-indent--init-%s" mode))))
+      (let ((fn (intern (format "+electric|init-%s" mode))))
         (fset fn
               (lambda ()
                 (electric-indent-local-mode +1)

modules/feature/lookup/autoload/lookup.el

@@ -28,7 +28,7 @@ properties:
 Using this multiple times overwrites previous properties and unsets omitted
 ones."
   (dolist (mode (doom-enlist modes))
-    (let ((def-name (intern (format "+lookup--init-%s" mode))))
+    (let ((def-name (intern (format "+lookup|init-%s" mode))))
       (fset def-name
             (lambda ()
               (when (or (eq major-mode mode)

modules/feature/snippets/autoload/settings.el

@@ -5,7 +5,7 @@
   "Register a minor MODE with yasnippet so it can have its own snippets
 category, if the folder exists."
   (after! yasnippet
-    (let ((fn (intern (format "+snippets--register-%s" mode))))
+    (let ((fn (intern (format "+snippets|register-%s" mode))))
       (fset fn (lambda () (+snippets|enable-project-modes mode)))
       (add-hook (intern (format "%s-hook" mode)) fn))))
 

modules/lang/emacs-lisp/config.el

@@ -7,10 +7,7 @@
   (set-eval-handler! 'emacs-lisp-mode #'+emacs-lisp-eval)
   (set-lookup-handlers! 'emacs-lisp-mode :documentation 'info-lookup-symbol)
   (set-docset! '(lisp-mode emacs-lisp-mode) "Emacs Lisp")
-
+  (set-pretty-symbols! 'emacs-lisp-mode :lambda "lambda")
-  (set-pretty-symbols! 'emacs-lisp-mode
-    :lambda "lambda")
-
   (set-rotate-patterns! 'emacs-lisp-mode
     :symbols '(("t" "nil")
                ("let" "let*")

modules/lang/latex/config.el

@@ -202,9 +202,9 @@
   :when (featurep! :completion company)
   :commands (company-auctex-init)
   :init
-  ;; We can't use the (set-company-backend! ...) because Auctex reports its
+  ;; We can't use the `set-company-backend!' because Auctex reports its
   ;; major-mode as `latex-mode', but uses LaTeX-mode-hook for its mode, which is
-  ;; not anticipated by :company-backend (and shouldn't have to!)
+  ;; not something `set-company-backend!' anticipates (and shouldn't have to!)
   (add-hook! LaTeX-mode
     (make-variable-buffer-local 'company-backends)
     (company-auctex-init)))

modules/tools/rotate-text/autoload.el

@@ -6,7 +6,7 @@
 `rotate-text' will cycle through."
   (declare (indent 1))
   (dolist (mode (doom-enlist modes))
-    (let ((fn-name (intern (format "+rotate-text--init-%s" mode))))
+    (let ((fn-name (intern (format "+rotate-text|init-%s" mode))))
       (fset fn-name
             (lambda ()
               (setq-local rotate-text-local-symbols symbols)