fix home buffer random banner choice

Random banner choice was broken by the presence of the `img` directory.
Even if `random` was set instead of `random*` in .spacemacs file the
cate banner would still show.

This commit fixes this bug while simplifying the existing code by adding
a regexp filter to only choose "*.txt" files.
This commit is contained in:
deb0ch 2016-06-29 12:45:11 +02:00 committed by syl20bnr
parent 97147993a6
commit 862eb68f7c
1 changed files with 3 additions and 3 deletions

View File

@ -148,10 +148,10 @@ Cate special text banner can de reachable via `998', `cat' or `random*'.
"Return the full path of a banner chosen randomly.
If ALL is non-nil then truly all banners can be selected."
(let* ((files (directory-files spacemacs-banner-directory t))
(let* ((files (directory-files spacemacs-banner-directory t ".*\.txt"))
(count (length files))
;; -2 then +2 to remove `.' and `..'
(choice (+ 2 (random (- count (if all 2 4))))))
;; -2 to remove the two last ones (easter eggs)
(choice (random (- count (if all 0 2)))))
(nth choice files)))
(defun spacemacs-buffer//get-banner-path (index)