success status messages for everyone!!!

thwap/thwap-completion.el

@@ -16,36 +16,40 @@
 ;; Company and auto-complete configuration
 (when (and (eq 'companycomp thwap-completion) (not (eq 'helmcomp thwap-completion)) (not (eq 'ivycomp thwap-completion)))
 	(straight-use-package 'company)
-	(add-hook 'after-init-hook 'global-company-mode))
+	(add-hook 'after-init-hook 'global-company-mode)
+	(message "Company completion enabled."))
 
 ;; If ivy is enabled, install and configure it
 (when (and (eq 'ivycomp thwap-completion) (not (eq 'companycomp thwap-completion)) (not (eq 'helmcomp thwap-completion)))
 	(straight-use-package 'ivy)
 	(ivy-mode 1)
 	(setq ivy-use-virtual-buffers t)
-	(setq enable-recursive-minibuffers t))
+	(setq enable-recursive-minibuffers t)
+	(message "Ivy completion enabled."))
 
 ;; If helm is enabled, install and configure it
 (when (and (eq 'helmcomp thwap-completion) (not (eq 'companycomp thwap-completion)) (not (eq 'ivycomp thwap-completion)))
 	(straight-use-package 'helm)
-	(helm-mode 1))
+	(helm-mode 1)
+	(message "Helm completion enabled."))
 
 
 ;; If all are enabled, choose company
 (when (or (and (eq 'companycomp thwap-completion) (eq 'helmcomp thwap-completion) (eq 'ivycomp thwap-completion))
 					(and (eq 'companycomp thwap-completion) (eq 'helmcomp thwap-completion) (not (eq 'ivycomp thwap-completion)))
 					(and (eq 'companycomp thwap-completion) (eq 'ivycomp thwap-completion) (not (eq 'helmcomp thwap-completion))))
-	(message "All completion frameworks are enabled.  Choosing company.")
 	(straight-use-package 'company)
-	(add-hook 'after-init-hook 'global-company-mode))
+	(add-hook 'after-init-hook 'global-company-mode)
+	(message "There can be only one. Company completion picked."))
 
 ;; if helm and ivy are enabled, choose ivy
 (when (and (eq 'helmcomp thwap-completion) (eq 'ivycomp thwap-completion) (not (eq 'companycomp thwap-completion)))
-	(message "Both helm and ivy are enabled.  Choosing ivy.")
 	(straight-use-package 'ivy)
 	(ivy-mode 1)
 	(setq ivy-use-virtual-buffers t)
-	(setq enable-recursive-minibuffers t))
+	(setq enable-recursive-minibuffers t)
+	(message "There can be only one. Ivy completion picked."))
 
+(message "T.H.W.A.P. Completion configuration complete.")
 (provide 'thwap-completion)
 

thwap/thwap-configuration.el

@@ -8,4 +8,5 @@
   :group 'convenience
   :prefix "thwap-")
 
+(message "T.H.W.A.P. Loaded thwap-config group.")
 (provide 'thwap-configuration)

thwap/thwap-dashboard.el

@@ -21,5 +21,6 @@
                                   dashboard-insert-newline
                                   dashboard-insert-footer))
 
+(message "T.H.W.A.P. Dashboard loaded")
 (provide 'thwap-dashboard)
 ;;; thwap-dashboard.el ends here

thwap/thwap-defaults.el

@@ -65,6 +65,6 @@
 ;; yasnippet stuff
 (thwap/add-key-binding "y n" 'yas-new-snippet "Create a new yasnippet")
 
-
+(message "T.H.W.A.P. Defaults Loaded")
 ;; our provide statement
 (provide 'thwap-defaults)

thwap/thwap-file-browser.el

@@ -20,7 +20,8 @@
 		:straight t
 		:config
 		(global-set-key [f8] 'neotree-toggle)
-		(thwap/add-key-binding "C-n" 'neotree-toggle "Toggle Neotree")))
+		(thwap/add-key-binding "C-n" 'neotree-toggle "Toggle Neotree"))
+	(message "neotree loaded"))
 
 
 (when (eq 'treemacs thwap-dirbrowser)
@@ -45,6 +46,8 @@
 						treemacs-goto-tag-strategy 'refetch-index)))
 	(thwap/add-key-binding "C-t" 'treemacs "Toggle Treemacs")
 	(when (memq 'kaolinthemes thwap-ui-themes)
-		(kaolin-treemacs-theme)))
+		(kaolin-treemacs-theme))
+	(message "treemacs loaded"))
 
+(message "T.H.W.A.P. Directory browser configuration loaded.")
 (provide 'thwap-file-browser)

thwap/thwap-helpers.el

@@ -65,5 +65,6 @@ all `.org` files in the `~/.org-agenda` directory, and sets
   (setq org-timeblock-inbox-file "~/.org-agenda/tasks.org"))
 
 
+(message "T.H.W.A.P. Loaded helper function library.")
 (provide 'thwap-helpers)
 ;;; thwap-helpers.el ends here

thwap/thwap-interface.el

@@ -32,29 +32,34 @@
 
 (when (memq 'modusthemes thwap-ui-themes)
 	(straight-use-package 'modus-themes)
-	(require 'modus-themes))
+	(require 'modus-themes)
+	(message "Modus themes loaded."))
 
 (when (memq 'doomthemes thwap-ui-themes)
 	(straight-use-package 'doom-themes)
-	(require 'doom-themes))
+	(require 'doom-themes)
+	(message "Doom themes loaded."))
 
 (when (memq 'sublimethemes thwap-ui-themes)
 	(straight-use-package 'sublime-themes)
-	(require 'sublime-themes))
+	(require 'sublime-themes)
+	(message "Sublime themes loaded."))
 
 (when (memq 'kaolinthemes thwap-ui-themes)
 	(straight-use-package 'kaolin-themes)
-	(require 'kaolin-themes))
+	(require 'kaolin-themes)
+	(message "Kaolin themes loaded."))
 
 (when (memq 'alectthems thwap-ui-themes)
 	(straight-use-package 'alect-themes)
-	(require 'alect-themes))
+	(require 'alect-themes)
+	(message "Alect themes loaded."))
 
 ;; load the theme specified in the config
 ;; if things look wonky, you probably either need to install the
 ;; theme or you need to check your spelling.
 (load-theme thwap-ui-theme :no-confirm)
-
+(message "Theme loaded: %s" thwap-ui-theme)
 
 ;; icon bits
 
@@ -68,7 +73,8 @@
 		:straight t
 		:defer
 		:init
-		(all-the-icons-completion-mode 1)))
+		(all-the-icons-completion-mode 1))
+	(message "All-the-icons loaded."))
 
 (when (and (eq 'nerdicons thwap-ui-icons) (not (eq 'alltheicons thwap-ui-icons)))
 	(use-package nerd-icons
@@ -82,7 +88,8 @@
 		;; "Symbols Nerd Font Mono" is the default and is recommended
 		;; but you can use any other Nerd Font if you want
 		(nerd-icons-font-family "Symbols Nerd Font Mono")
-		))
+		)
+	(message "Nerd-icons loaded."))
 
 (when (and (eq 'nerdicons thwap-ui-icons) (eq 'alltheicons thwap-ui-icons))
 	(message "Both all-the-icons and nerd-icons are enabled. Disabling nerd-icons.")
@@ -95,6 +102,9 @@
 		:straight t
 		:defer
 		:init
-		(all-the-icons-completion-mode 1)))
+		(all-the-icons-completion-mode 1))
+	(message "All-the-icons loaded."))
 
+
+(message "T.H.W.A.P. Interface settings loaded.")
 (provide 'thwap-interface)