github/doom-modeline
1
0
Fork 0
mirror of https://github.com/correl/doom-modeline.git synced 2024-11-23 11:09:54 +00:00
Code Issues Projects Releases Packages Wiki Activity

Add dash lib for compatiblility issues with Emacs <=25.

Browse source
This commit is contained in:
Vincent Zhang 2018-06-12 22:09:35 +08:00
parent dce8d0e5b1
commit 1a2ff8f2b6
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
doom-modeline.el
View file

@ -6,7 +6,7 @@
;; Package-Version: 20180611.111
;; Version: 0.1.0
;; URL: https://github.com/seagle0128/doom-modeline
;; Package-Requires: ((emacs "24.4") (all-the-icons "1.0.0") (projectile "0.10.0") (shrink-path "0.2.0") (eldoc-eval "0.1"))
;; Package-Requires: ((emacs "24.4") (dash "2.11.0") (all-the-icons "1.0.0") (projectile "0.10.0") (shrink-path "0.2.0") (eldoc-eval "0.1"))
;; Keywords: modeline, mode-line
;; This file is not part of GNU Emacs.
@ -195,7 +195,7 @@ error if it doesn't exist."
(defun doom-set-modeline (key &optional default)
"Set the modeline format. Does nothing if the modeline KEY doesn't exist. If
DEFAULT is non-nil, set the default mode-line for all buffers."
(when-let ((modeline (doom-modeline key)))
(-when-let ((modeline (doom-modeline key)))
(setf (if default
(default-value 'mode-line-format)
(buffer-local-value 'mode-line-format (current-buffer)))
@ -260,7 +260,7 @@ If STRICT-P, return nil if no project was found, otherwise return
(defvar +doom-modeline-current-window (frame-selected-window))
(defun +doom-modeline|set-selected-window (&rest _)
"Sets `+doom-modeline-current-window' appropriately"
(when-let ((win (frame-selected-window)))
(-when-let* ((win (frame-selected-window)))
(unless (minibuffer-window-active-p win)
(setq +doom-modeline-current-window win))))
@ -860,7 +860,7 @@ Returns \"\" to not break --no-window-system."
"The persp number."
(when (featurep 'persp-mode)
(when (+doom-window-bottom-left-p)
(when-let ((persp (get-current-persp)))
(-when-let ((persp (get-current-persp)))
(propertize
(concat
(number-to-string