From 6f5b853cc29f89b388c3dbb13cb3a347ec16db66 Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Thu, 27 Jul 2017 00:01:55 +0200
Subject: [PATCH] Silent init hooks if noninteractive

---
 core/core.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/core/core.el b/core/core.el
index 145fcbea4..810ac63dd 100644
--- a/core/core.el
+++ b/core/core.el
@@ -139,7 +139,9 @@ melodramatic ex-vimmer disappointed with the text-editor status quo."
 is to include more information in the error message, without sacrificing your
 ability to invoke the debugger in debug mode."
   (condition-case-unless-debug ex
-      (funcall fn)
+      (if noninteractive
+          (quiet! (funcall fn))
+        (funcall fn))
     ('error
      (lwarn hook :error
           "%s in '%s' -> %s"