Как скрыть загрузку модулей ?

(defun load-init (modules dirs)
  (mapc (lambda (name)
          (shut-up
          (load (format "%s/%s" dirs name))))
        modules))

Debugger entered--Lisp error: (void-function shut-up)
  (shut-up (load (format "%s/%s" dirs name)))
  (lambda (name) (shut-up (load (format "%s/%s" dirs name))))(general)
  mapc((lambda (name) (shut-up (load (format "%s/%s" dirs name)))) (general packages keys))
  load-init((general packages keys) "~/.emacs.d/load/init")
  eval-buffer(#<buffer  *load*> nil "/home/user/.emacs.d/init.el" nil t)  ; Reading at buffer position 213
  load-with-code-conversion("/home/user/.emacs.d/init.el" "/home/user/.emacs.d/init.el" t t)

(load-file "~/.emacs.d/load/init/general.el")
(load-file "~/.emacs.d/load/init/packages.el")
(load-file "~/.emacs.d/load/init/keys.el")

(defun load-init (modules dirs)
  (mapc (lambda (name)
          (shut-up
          (load (format "%s/%s" dirs name))))
        modules))


;; Load modules
(load-init
 '(auto-save-buffers-enhanced
   bs
   company
   company-ycmd
   dired_plus
   fiplr
   flycheck
   flycheck-ycmd
   helm
   highlight-current-line
   highlight-indent-guides
   ido
   linum
   logview
   org
   py-autopep8
   rainbow-delimiters
   saveplace
   smartparens
   syntax-subword-mode
   virtualenvwrapper
   web-mode
   yasnippet
   ycmd) "~/.emacs.d/load/modules")

(defadvice load (before quiet-loading
                   (&optional NOMESSAGE)
                   activate)
   (setq NOMESSAGE t))
(load site-run-file t)

(require 'shut-up)