diff --git a/README.md b/README.md
index 69e7a2f..cc1d670 100644
--- a/README.md
+++ b/README.md
@@ -32,6 +32,7 @@ write the following config with any file name (eg. `.erc.emacs`)
 (setq erc-autojoin-channels-alist '(("libera.chat" "#c" "#c++" "#linux"
                                      "#lisp" "##c++" "#clasp" "#clojure" "#guile"
                                       "#vim" "#neovim" "#emacs" "#erc")))
+(setq erc-logger-quiet-log t) ;; if you don't want spammed with "Added to..." messages
 (erc-logger-log-start))))
 </pre>
 
diff --git a/erc-logger.el b/erc-logger.el
index 6acbe48..47e6ab3 100644
--- a/erc-logger.el
+++ b/erc-logger.el
@@ -49,13 +49,17 @@
   :type 'string
   :group 'erc-logger)
 
-
 (defcustom erc-logger-log-interval
   10
   "The interval (second) to run `erc-log-buffers' repeatedly."
   :type 'float
   :group 'erc-logger)
 
+(defcustom erc-logger-quiet-log nil
+  "Silence echo area and `*Messages*' notifications about appending files."
+  :type 'boolean
+  :group 'erc-logger)
+
 (defvar erc-logger-log-timer nil)
 (defvar erc-logger-log-date nil)
 (defvar erc-logger-log-todays-date nil)
@@ -126,7 +130,9 @@
 					(setq current-message-point new-current-message-point)))
 				(if (file-exists-p file-full-path)
 				    (when (not (= end-of-message-point current-message-point))
-				      (append-to-file current-message-point end-of-message-point file-full-path))
+                                      (let ((inhibit-message (if erc-logger-quiet-log t inhibit-message))
+                                            (message-log-max (if erc-logger-quiet-log nil message-log-max)))
+				        (append-to-file current-message-point end-of-message-point file-full-path)))
 				  (erc-logger-write-file-immut file-full-path))
 				(when (not (= end-of-message-point current-message-point))
 				  (puthash erc-buffer end-of-message-point erc-logger-irc-buffer-size-map)))