adding a prefix to logs emitted by the adjusted installer
This commit is contained in:
@ -1,10 +1,10 @@
|
|||||||
;;; -*- lexical-binding: t; -*-
|
;;; -*- lexical-binding: t; -*-
|
||||||
(advice-add 'nix-straight-get-used-packages
|
(advice-add 'nix-straight-get-used-packages
|
||||||
:before (lambda (&rest r)
|
:before (lambda (&rest r)
|
||||||
(message "Advising doom installer to gather packages to install...")
|
(message "[nix-doom-emacs] Advising doom installer to gather packages to install...")
|
||||||
(advice-add 'doom-reload-autoloads
|
(advice-add 'doom-reload-autoloads
|
||||||
:override (lambda (&optional file force-p)
|
:override (lambda (&optional file force-p)
|
||||||
(message "Skipping generating autoloads...")))
|
(message "[nix-doom-emacs] Skipping generating autoloads...")))
|
||||||
(advice-add 'doom--format-print
|
(advice-add 'doom--format-print
|
||||||
:around (lambda (orig-print &rest r)
|
:around (lambda (orig-print &rest r)
|
||||||
(let ((noninteractive nil))
|
(let ((noninteractive nil))
|
||||||
@ -12,5 +12,5 @@
|
|||||||
|
|
||||||
(advice-add 'y-or-n-p
|
(advice-add 'y-or-n-p
|
||||||
:override (lambda (q)
|
:override (lambda (q)
|
||||||
(message "%s \n--> answering NO" q)
|
(message "%s \n[nix-doom-emacs] --> answering NO" q)
|
||||||
nil))
|
nil))
|
||||||
|
Reference in New Issue
Block a user