Remove deprecated set! & def-setting! macros

modules/app/email/autoload/email.el

@@ -40,12 +40,6 @@ default/fallback account."
         (setq-default mu4e-context-current context))
       context)))
 
-;; FIXME obsolete :email
-;;;###autoload
-(def-setting! :email (label letvars &optional default-p)
-  :obsolete set-email-account!
-  `(set-email-acount! ,label ,letvars ,default-p))
-
 
 
 (defvar +email-workspace-name "*mu4e*"

modules/app/irc/autoload/settings.el

@@ -7,10 +7,3 @@
 See `circe-network-options' for details."
   (after! circe
     (push (cons server letvars) circe-network-options)))
-
-;; FIXME obsolete :irc
-;;;###autoload
-(def-setting! :irc (server letvars)
-  :obsolete set-irc-server!
-  `(after! circe
-     (push (cons ,server ,letvars) circe-network-options)))

modules/completion/company/autoload.el

@@ -47,12 +47,6 @@ To have BACKENDS apply to any mode that is a parent of MODES, set MODES to
         (setf (alist-get mode +company-backend-alist)
               (cons type backends))))))
 
-;; FIXME obsolete :company-backend
-;;;###autoload
-(def-setting! :company-backend (modes &rest backends)
-  :obsolete set-company-backend!
-  `(set-company-backend! ,modes ,@backends))
-
 
 ;;
 ;; Library

modules/editor/rotate-text/autoload.el

@@ -17,9 +17,3 @@
               (setq-local rotate-text-local-words words)
               (setq-local rotate-text-local-patterns patterns)))
       (add-hook (intern (format "%s-hook" mode)) fn-name))))
-
-;; FIXME obsolete :rotate
-;;;###autoload
-(def-setting! :rotate (modes &rest plist)
-  :obsolete set-rotate-patterns!
-  `(set-rotate-patterns! ,modes ,@plist))

modules/emacs/electric/autoload.el

@@ -22,9 +22,3 @@ Enables `electric-indent-local-mode' in MODES.
                        (if chars (setq electric-indent-chars chars))
                        (if words (setq +electric-indent-words words)))))
              (add-hook hook fn))))))
-
-;; FIXME obsolete :electric
-;;;###autoload
-(def-setting! :electric (modes &rest plist)
-  :obsolete set-electric!
-  `(set-electric! ,modes ,@plist))

modules/feature/eval/autoload/settings.el

@@ -20,12 +20,6 @@ command that will be called interactively."
   (dolist (mode (doom-enlist modes))
     (setf (alist-get mode +eval-repls) command)))
 
-;; FIXME obsolete :repl
-;;;###autoload
-(def-setting! :repl (mode command)
-  :obsolete set-repl-handler!
-  `(set-repl-handler! ,mode ,command))
-
 
 ;;
 ;; Evaluation
@@ -62,9 +56,3 @@ command that will be called interactively."
              (or (cdr (assq mode quickrun--major-mode-alist))
                  (string-remove-suffix "-mode" (symbol-name mode)))
              command :mode mode)))))
-
-;; FIXME obsolete :eval
-;;;###autoload
-(def-setting! :eval (mode command)
-  :obsolete set-eval-handler!
-  `(set-eval-handler! ,mode ,command))

modules/feature/evil/autoload/evil.el

@@ -11,12 +11,6 @@
           (evil-set-initial-state mode state))
       (evil-set-initial-state modes state))))
 
-;; FIXME obsolete :evil-state
-;;;###autoload
-(def-setting! :evil-state (modes state)
-  :obsolete set-evil-initial-state!
-  `(set-evil-initial-state! ,modes ,state))
-
 
 ;;
 ;; Commands

modules/feature/file-templates/autoload.el

@@ -48,18 +48,6 @@ these properties:
     (dolist (template templates)
       (+file-templates--set (car template) (cdr template)))))
 
-;; FIXME obsolete :file-template
-;;;###autoload
-(def-setting! :file-template (pred &rest plist)
-  :obsolete set-file-template!
-  `(set-file-template! ,pred ,@plist))
-
-;; FIXME obsolete :file-templates
-;;;###autoload
-(def-setting! :file-templates (&rest templates)
-  :obsolete set-file-templates!
-  `(set-file-templates! ,@templates))
-
 
 ;;
 ;; Library

modules/feature/lookup/autoload/docsets.el

@@ -43,12 +43,6 @@ Used by `+lookup/in-docsets' and `+lookup/documentation'."
                 (:remove (cl-set-difference (alist-get mode +lookup-docset-alist) docsets))
                 (_ docsets)))))))
 
-;; FIXME obsolete :docset
-;;;###autoload
-(def-setting! :docset (modes &rest docsets)
-  :obsolete set-docset!
-  `(set-docsets! ,modes ,@docsets))
-
 
 ;;
 ;; Library

modules/feature/lookup/autoload/lookup.el

@@ -60,12 +60,6 @@ Otherwise, these properties are available to be set:
                            (add-hook 'xref-backend-functions xref-backend nil t))))))
              (add-hook hook fn))))))
 
-;; FIXME obsolete :lookup
-;;;###autoload
-(def-setting! :lookup (modes &rest plist)
-  :obsolete set-lookup-handlers!
-  `(set-lookup-handlers! ,modes ,@plist))
-
 
 ;;
 ;; Library

modules/feature/snippets/autoload/settings.el

@@ -8,9 +8,3 @@ can have its own snippets category, if the folder exists."
     (let ((fn (intern (format "+snippets|register-%s" mode))))
       (fset fn (lambda () (yas-activate-extra-mode mode)))
       (add-hook (intern (format "%s-hook" mode)) fn))))
-
-;; FIXME obsolete :yas-minor-mode
-;;;###autoload
-(def-setting! :yas-minor-mode (mode)
-  :obsolete set-yas-minor-mode!
-  `(set-yas-minor-mode! ,mode))

modules/lang/emacs-lisp/autoload.el

@@ -100,7 +100,6 @@ library/userland functions"
         '(("Evil Commands" "^\\s-*(evil-define-\\(?:command\\|operator\\|motion\\) +\\(\\_<[^ ()\n]+\\_>\\)" 1)
           ("Unit tests" "^\\s-*(\\(?:ert-deftest\\|describe\\) +\"\\([^\")]+\\)\"" 1)
           ("Package" "^\\s-*(\\(?:def-\\)?package! +\\(\\_<[^ ()\n]+\\_>\\)" 1)
-          ("Settings" "^\\s-*(def-setting! +\\([^ ()\n]+\\)" 1)
           ("Major modes" "^\\s-*(define-derived-mode +\\([^ ()\n]+\\)" 1)
           ("Modelines" "^\\s-*(def-modeline! +\\([^ ()\n]+\\)" 1)
           ("Modeline Segments" "^\\s-*(def-modeline-segment! +\\([^ ()\n]+\\)" 1)

modules/tools/ein/autoload.el

@@ -1,15 +1,5 @@
 ;;; tools/ein/autoload.el -*- lexical-binding: t; -*-
 
-;; FIXME obsolete :ein-notebook-dir
-;;;###autoload
-(def-setting! :ein-notebook-dir (dir)
-  "Set the default directory from where to open Jupyter notebooks."
-  `(setq ein:jupyter-default-notebook-directory ,dir))
-
-
-;;
-;; Library
-
 (defun +ein--collect-ein-buffer-links ()
   (let ((end (window-end))
         points)

modules/tools/prodigy/autoload.el

@@ -1,12 +1,5 @@
 ;;; tools/prodigy/autoload.el -*- lexical-binding: t; -*-
 
-;; FIXME obsolete :service
-;;;###autoload
-(def-setting! :service (&rest plist)
-  "TODO"
-  `(after! prodigy
-     (prodigy-define-service ,@plist)))
-
 ;;;###autoload
 (defun +prodigy/create ()
   "Interactively create a new prodigy service."

modules/ui/popup/autoload/settings.el

@@ -196,19 +196,3 @@ Example:
   (when (bound-and-true-p +popup-mode)
     (setq display-buffer-alist +popup--display-buffer-alist))
   +popup--display-buffer-alist)
-
-
-;;
-;; Obsolete settings
-
-;; FIXME obsolete :popup
-;;;###autoload
-(def-setting! :popup (condition &optional alist parameters)
-  :obsolete set-popup-rule!
-  `(set-popup-rule! ,condition ,alist ,parameters))
-
-;; FIXME obsolete :popups
-;;;###autoload
-(def-setting! :popups (&rest rulesets)
-  :obsolete set-popup-rules!
-  `(set-popup-rules! ,@rulesets))