make MORE SMALLY

init.el

@@ -11,8 +11,7 @@
 
 ;; don't load anything useless at the startup (like `emacs-lisp-mode' for
 ;; *Scratch* or `dashboard')
-(setq initial-major-mode 'fundamental-mode
-      initial-scratch-message "Good Luck!\n: you can start")
+(setq initial-major-mode 'fundamental-mode)
 
 ;; PERF,UX: Remove "For information about GNU Emacs..." message at startup.
 ;;   It's redundant with our dashboard and incurs a premature redraw.

lisp/editing/my-corfu.el

@@ -46,11 +46,11 @@
            (corfu-count . 7))
   :config
   ;; show documentation of every auto-completion item
-  (leaf corfu-popupinfo
-    :global-minor-mode t
-    :bind (:corfu-map
-           :package corfu
-           ("C-h" . 'corfu-popupinfo-toggle)))
+  ;; (leaf corfu-popupinfo
+  ;;   :global-minor-mode t
+  ;;   :bind (:corfu-map
+  ;;          :package corfu
+  ;;          ("C-h" . 'corfu-popupinfo-toggle)))
 
   ;; show icons inside auto-completion popup
   (leaf kind-icon

lisp/editing/my-dumb-jump.el

@@ -16,6 +16,7 @@
 
 (leaf dumb-jump
   :ensure t
+  :disabled t
   :custom ((dumb-jump-prefer-searcher dumb-jump-force-searcher)
            . 'rg)
   :hook (xref-backend-functions . dumb-jump-xref-activate))

lisp/env/my-hl-todo.el

@@ -16,21 +16,21 @@
 ;;   :ensure (hl-todo :repo "tarsius/hl-todo" :host github)
 ;;   :global-minor-mode global-hl-todo-mode)
 
-(defface my-hl-todo-face  '((t (:bold nil :italic t :foreground "#cc9393")))
-  "A face to highlight things like TODO and NOTE.")
-
-(define-minor-mode my-hl-todo-mode
-  "Highlight things like TODO and NOTE."
-  :init-value t
-  (when (and my-hl-todo-mode
-             (not (eq major-mode 'org-mode)))
-    (font-lock-add-keywords
-     nil
-     '(("\\(TODO\\|NOTE\\|DONE\\|PERF\\|HACK\\)" . 'my-hl-todo-face))
-     t)))
-
-(add-hook 'prog-mode-hook #'my-hl-todo-mode)
-(add-hook 'text-mode-hook #'my-hl-todo-mode)
+;; (defface my-hl-todo-face  '((t (:bold nil :italic t :foreground "#cc9393")))
+;;   "A face to highlight things like TODO and NOTE.")
+
+;; (define-minor-mode my-hl-todo-mode
+;;   "Highlight things like TODO and NOTE."
+;;   :init-value t
+;;   (when (and my-hl-todo-mode
+;;              (not (eq major-mode 'org-mode)))
+;;     (font-lock-add-keywords
+;;      nil
+;;      '(("\\(TODO\\|NOTE\\|DONE\\|PERF\\|HACK\\)" . 'my-hl-todo-face))
+;;      t)))
+
+;; (add-hook 'prog-mode-hook #'my-hl-todo-mode)
+;; (add-hook 'text-mode-hook #'my-hl-todo-mode)
 
 (provide 'my-hl-todo)
 ;;; my-hl-todo.el ends here

lisp/misc/my-use-afk.el

@@ -50,9 +50,9 @@
     transient
     magit-base
     magit-git
-    pcvs-util
-    gmm-utils
-    mail-utils
+    ;; pcvs-util
+    ;; gmm-utils
+    ;; mail-utils
     mm-util
     mailabbrev
     mail-parse