;;; -*- lexical-binding: t; -*-
(advice-add 'nix-straight-get-used-packages
            :before (lambda (&rest r)
                      (message "Advising doom installer to gather packages to install...")
                      (advice-add 'doom-reload-autoloads
                                  :override (lambda (&optional file force-p)
                                              (message "Skipping generating autoloads...")))
                      (advice-add 'doom--format-print
                                  :around (lambda (orig-print &rest r)
                                            (let ((noninteractive nil))
                                              (apply orig-print r))))))

(advice-add 'y-or-n-p
            :override (lambda (q)
                        (message "%s \n--> answering NO" q)
                        nil))