Commit 3ae29a4b99c1

@@ -11,6 +11,18 @@
 (global-unset-key (kbd "C-x C-z"))
 (global-unset-key (kbd "C-h h"))
 
+;; Enable these
+(mapc
+ (lambda (command)
+   (put command 'disabled nil))
+ '(list-timers narrow-to-region narrow-to-page upcase-region downcase-region))
+
+;; And disable these
+(mapc
+ (lambda (command)
+   (put command 'disabled t))
+ '(overwrite-mode iconify-frame diary))
+
 ;; Custom file management
 (defconst vde/custom-file (locate-user-emacs-file "custom.el")
   "File used to store settings from Customization UI.")
@@ -22,8 +34,9 @@
 
 (use-package cus-edit
   :config
+  ;; Disable the damn thing by making it disposable.
+  (setq custom-file (make-temp-file "emacs-custom-"))
   (setq
-   custom-file vde/custom-file
    custom-buffer-done-kill nil          ; Kill when existing
    custom-buffer-verbose-help nil       ; Remove redundant help text
    custom-unlispify-tag-names nil       ; Show me the real variable name

@@ -233,6 +233,11 @@
 (require 'project-func)
 (add-to-list 'load-path (concat user-emacs-directory "/config/"))
 
+;; Make native compilation silent and prune its cache.
+(when (native-comp-available-p)
+  (setq native-comp-async-report-warnings-errors 'silent) ; Emacs 28 with native compilation
+  (setq native-compile-prune-cache t)) ; Emacs 29
+
 (require '00-base)
 (require '00-clean) ;; Maybe refactor no-littering
 (require 'config-appearance)