Display the number of packages loaded in spacemacs buffer

core/contribsys.el

@@ -166,6 +166,12 @@ extension.
        (message "(Spacemacs) Initializing %s:%s..." (symbol-name lsym) ext)
        (if (fboundp init-func) (funcall init-func))))
 
+(defun contribsys/initialized-packages-count ()
+  "Return the number of initialized packages and extensions."
+  (+ (ht-size spacemacs-all-packages)
+     (ht-size spacemacs-all-pre-extensions)
+     (ht-size spacemacs-all-post-extensions)))
+
 (defun contribsys/declare-configuration-layers ()
   "Declare the configuration layer in order of appearance in list
 dotspacemacs-configuration-layers defined in ~/.spacemacs."

core/spacemacs-mode.el

@@ -101,5 +101,7 @@ of size LOADING-DOTS-CHUNK-THRESHOLD."
               (let ((elapsed (float-time
                               (time-subtract (current-time) emacs-start-time))))
                 (spacemacs/append-to-buffer
-                 (format "[%.3fs]\n" elapsed))))))
+                 (format "[%s packages loaded in %.3fs]\n"
+                         (contribsys/initialized-packages-count)
+                         elapsed))))))