summaryrefslogtreecommitdiff
path: root/emacs/inits/NO-06-dashboard.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/inits/NO-06-dashboard.el')
-rw-r--r--emacs/inits/NO-06-dashboard.el35
1 files changed, 35 insertions, 0 deletions
diff --git a/emacs/inits/NO-06-dashboard.el b/emacs/inits/NO-06-dashboard.el
new file mode 100644
index 0000000..2db87ac
--- /dev/null
+++ b/emacs/inits/NO-06-dashboard.el
@@ -0,0 +1,35 @@
+;; Time-stamp: <2020-02-08 13:07:24 (tslil@bison)>
+
+(use-package fortune
+ :config
+ (setq fortune-dir "/usr/share/fortune/"
+ fortune-program "fortune"
+ fortune-file "/usr/share/fortune/cookie"
+ fortune-program-options '("-s" "tao" "wisdom"))
+ (defun dashboard-fortune (n)
+ (insert
+ (if (evenp (random 2))
+ (with-temp-buffer
+ (let ((fortune-buffer-name (current-buffer)))
+ (fortune-in-buffer t)
+ (buffer-string)))
+ (shell-command-to-string "shuf -n 1 ~/store/quotes")))))
+
+
+
+(use-package dashboard
+ :ensure t
+ :config
+ (add-to-list 'dashboard-item-generators '(fortune . dashboard-fortune))
+
+ (setq dashboard-center-content t
+ dashboard-set-init-info t
+ dashboard-set-footer nil
+ dashboard-banners-directory (expand-file-name "~/.emacs.d/banners/")
+ dashboard-startup-banner 5
+ dashboard-items '((recents . 5)
+ (projects . 5)
+ (fortune . 0))
+ dashboard-init-info (format "Welcome ~%s!" (user-login-name)))
+
+ (dashboard-setup-startup-hook))