Add src path and fix dashboard image

init.el

@@ -51,6 +51,10 @@
          ((text-mode tex-mode prog-mode) . auto-fill-mode)
          ((text-mode tex-mode prog-mode) . my/-enable-show-trailing-whitespace))
   :init
+  (with-eval-after-load 'find-func
+    (when (file-directory-p "~/src/emacs/src/")
+      (setq find-function-C-source-directory "~/src/emacs/src/")))
+
   (defun my/-enable-show-trailing-whitespace ()
     (setq-local show-trailing-whitespace t))
   ;; (defun my/-emacs-lisp-mode-setup-evil-lookup ()
@@ -2471,6 +2475,16 @@ one of the normal rainbow-delimiters-depth-N-face faces."
 ;; dashboard.el
 (use-package dashboard
   :config
+  (defvar-local my/-dashboard-did-fix-image nil
+    "Weather or not the dashboard image has been fixed in this buffer.")
+  (defun my/-dashboard-fix-image ()
+    (unless my/-dashboard-did-fix-image
+      (dashboard-refresh-buffer)
+      (setq my/-dashboard-did-fix-image t)))
+  (defun my/-dashboard-setup-function ()
+    (add-hook 'window-configuration-change-hook 'my/-dashboard-fix-image nil t))
+  (add-hook 'dashboard-mode-hook 'my/-dashboard-setup-function)
+  (set-face-background 'dashboard-banner-logo-title nil)
   (dashboard-setup-startup-hook)
   (setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*"))
         dashboard-force-refresh t