                  (beginning-of-line)
                  (looking-at-p "[[:space:]]*\"")))
       (cl-return))
-    (when (derived-mode-p 'text-mode)
+    (when (and (derived-mode-p 'text-mode)
+               (not (derived-mode-p 'yaml-mode)))
       (apply func args)
       (cl-return))
     ;; Inspired by <https://emacs.stackexchange.com/a/14716/12534>.

  :blackout "TOML")

;; Package `yaml-mode' provides a major mode for YAML.
(use-package yaml-mode
  :config

  (add-hook 'yaml-mode-hook #'radian--auto-fill-disable))

;;; Introspection
;;;; Help


;; https://www.gnu.org/software/emacs/manual/html_node/efaq/Turning-on-auto_002dfill-by-default.html
(setq-default auto-fill-function #'do-auto-fill)

(define-minor-mode radian-fix-whitespace-mode
  "Minor mode to automatically fix whitespace on save.
