jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Do not show the tip if cursor is in the minibuffer

Browse source
This commit is contained in:
toctan 2013-05-19 19:16:43 +08:00
parent e1c4c129c0
commit 4b6fc89a24
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
core/prelude-core.el
View file

@ -352,10 +352,11 @@ Doesn't mess with special buffers."
(defun prelude-tip-of-the-day () (defun prelude-tip-of-the-day ()
"Display a random entry from `prelude-tips'." "Display a random entry from `prelude-tips'."
(interactive) (interactive)
(unless (window-minibuffer-p)
;; pick a new random seed ;; pick a new random seed
(random t) (random t)
(message (message
(concat "Prelude tip: " (nth (random (length prelude-tips)) prelude-tips)))) (concat "Prelude tip: " (nth (random (length prelude-tips)) prelude-tips)))))
(defun prelude-eval-after-init (form) (defun prelude-eval-after-init (form)
"Add `(lambda () FORM)' to `after-init-hook'. "Add `(lambda () FORM)' to `after-init-hook'.