pop-os: Add emacs-dashboard

oni/home/config/pop-os.scm

@@ -9,7 +9,8 @@
                 #:select (emacs))
   #:use-module ((gnu packages emacs-xyz)
                 #:select (emacs-dockerfile-mode
-                          emacs-deft))
+                          emacs-deft
+                          emacs-dashboard))
   #:use-module ((gnu services)
 		        #:select (service))
   #:use-module ((guix gexp)
@@ -103,7 +104,8 @@
                  emacs-php-ts-mode
                  emacs-oni-lua
                  emacs-oni-sh
-                 emacs-deft))
+                 emacs-deft
+                 emacs-dashboard))
  (services (list home-channels-service
 		 home-environment-service
 		 (service home-emacs-service-type

oni/home/config/pop-os/emacs.el

@@ -116,3 +116,9 @@ buffers.")
                        (artisan--test-internal nil name ignore)))
       (local-set-key (kbd "q") #'bury-buffer)
       (local-set-key (kbd "s") (lambda () (interactive) (interrupt-process))))))
+
+(require 'dashboard)
+(dashboard-setup-startup-hook)
+(run-with-idle-timer 300 t (lambda () (switch-to-buffer dashboard-buffer-name)))
+(run-at-time "02:00" 86400 #'dashboard-open)
+(add-hook 'server-after-make-frame-hook #'dashboard-open)