Browse Source

Display truly "random" tip on startup

custom
Bozhidar Batsov 13 years ago
parent
commit
cab4b80766
  1. 2
      core/prelude-core.el

2
core/prelude-core.el

@ -336,6 +336,8 @@ and so on."
(defun prelude-tip-of-the-day () (defun prelude-tip-of-the-day ()
(interactive) (interactive)
;; pick a new random seed
(random t)
(message (message
(concat "Prelude tip: " (nth (random (length prelude-tips)) prelude-tips)))) (concat "Prelude tip: " (nth (random (length prelude-tips)) prelude-tips))))

Loading…
Cancel
Save