Add config for fortune-cookie

2018-02-20 15:45:35 -05:00 · 2018-02-20 15:45:35 -05:00 · 0e3fa97736
parent 936ef53c7f
commit 0e3fa97736
1 changed files with 10 additions and 0 deletions
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@ -625,6 +625,16 @@
    (interactive)
    (shell-command "ssh ag 'mbsync inboxes && afew -tn' && muchsync ag")))

+(use-package fortune-cookie
+  :config
+  ; change message every time scratch buffer created
+  (setq initial-major-mode
+        (lambda ()
+          (setq initial-scratch-message
+                (concat (fortune-cookie-comment
+                         (fortune-cookie) fortune-cookie-comment-start) "\n\n"))
+          (lisp-interaction-mode))))
+
 ;;; Local Variables
 (add-to-list 'safe-local-eval-forms '(outline-hide-body))
 ;; Local Variables: