init.el: Check if system-name is guix machine, redo dashboard

1 files changed, 40 insertions, 31 deletions

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index bccc2ba..14608ff 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -9,7 +9,20 @@
 
 
 (setq custom-file (concat user-emacs-directory "/custom.el"))
-(guix-emacs-autoload-packages)
+
+
+
+
+
+;;Check if system name is one of my guix systems
+;;Change this strings your machines $HOSTNAME
+;;if you are using guix
+(if (or (string= (system-name) "fsociety")
+	(string= (system-name) "heisenberg"))
+    (guix-emacs-autoload-packages)
+  nil)
+
+;(guix-emacs-autoload-packages)
 
 
 
@@ -150,36 +163,32 @@ to be installed.")
 		    :weight 'regular)
 
 ;; Dashboard settings
-(use-package dashboard
-  :ensure t
-  :config
-  (dashboard-setup-startup-hook)
-  
-  (setq dashboard-items '((recents  . 5)
-                          (bookmarks . 5)))
-  
-  (setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*")))
-  (setq dashboard-item-names '(("Recent Files:" . "Recent Files:")
-			       ("Bookmarks:" . "Study:")))
-  ;; Set the banner
-  (setq dashboard-startup-banner "~/dotfiles/pictures/medicine/plague-doctor-s.png")
-  ;; Set the title
-  (setq dashboard-banner-logo-title "Is that a flying flower?")
-  ;; (setq dashboard-init-info "Bring me your sick and wounded!")
-  
-  ;; Content is not centered by default. To center, set
-  (setq dashboard-set-init-info t)
-  (setq dashboard-center-content t)
-  (setq dashboard-set-navigator t)
-  (setq dashboard-set-heading-icons t)
-  (setq dashboard-set-file-icons t)
-  (setq dashboard-show-shortcuts nil)
-  (setq dashboard-set-footer t)
-  (setq dashboard-footer-messages '("Welcome to the Church Of Emacs"))
-  (setq dashboard-footer-icon (all-the-icons-octicon "broadcast"
-                                                     :height 1.15
-                                                     :v-adjust -0.05
-                                                     :face 'font-lock-keyword-face)))
+(require 'dashboard)
+(dashboard-setup-startup-hook)
+(setq dashboard-items '((recents  . 5)
+                        (bookmarks . 5)))
+(setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*")))
+(setq dashboard-item-names '(("Recent Files:" . "Recent Files:")
+			     ("Bookmarks:" . "Study:")))
+;; Set the banner
+(setq dashboard-startup-banner "~/dotfiles/pictures/medicine/plague-doctor-s.png")
+;; Set the title
+(setq dashboard-banner-logo-title "Is that a flying flower?")
+;; (setq dashboard-init-info "Bring me your sick and wounded!")
+
+;; Content is not centered by default. To center, set
+(setq dashboard-set-init-info t)
+(setq dashboard-center-content t)
+(setq dashboard-set-navigator t)
+(setq dashboard-set-heading-icons t)
+(setq dashboard-set-file-icons t)
+(setq dashboard-show-shortcuts nil)
+(setq dashboard-set-footer t)
+(setq dashboard-footer-messages '("Welcome to the Church Of Emacs"))
+(setq dashboard-footer-icon (all-the-icons-octicon "broadcast"
+                                                   :height 1.15
+                                                   :v-adjust -0.05
+                                                   :face 'font-lock-keyword-face))