summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--modally.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/modally.el b/modally.el
index 3fd914a..679808a 100644
--- a/modally.el
+++ b/modally.el
@@ -32,17 +32,17 @@
(require 'modally-faces)
;; FUNCTIONS
-(defun modally--seperator ()
+(defun modally--separator ()
"Return a propertized separator."
(propertize "┃" 'face (if (mode-line-window-selected-p)
- 'modally-active
- 'modally-inactive)))
+ 'modally-separator-active
+ 'modally-separator-inactive)))
(defun modally--read-only-status ()
"Return a string to display read-only status."
(format "%s %s"
(if buffer-read-only " RO" " RW")
- (modally--seperator)))
+ (modally--separator)))
(defun modally--buffer-name ()
"Return a propertized buffer name string."
@@ -95,7 +95,7 @@
((not (mode-line-window-selected-p)) 'mode-line-inactive)
((>= column fill-column) 'error)
((>= column (- fill-column 10)) 'warning)))))
- (modally--seperator)))
+ (modally--separator)))
(defun modally--git-branch ()
"Return a propertized Git branch string."
@@ -105,7 +105,7 @@
(propertize branch 'face (if (not (mode-line-window-selected-p))
'mode-line-inactive
'modally-git-branch))
- (modally--seperator)
+ (modally--separator)
)))
(defun modally--flymake-diagnostics ()
@@ -128,7 +128,7 @@
(propertize (format "e%s" errors) 'face 'error) alerts))
(format " %s %s"
(string-join alerts "\s")
- (modally--seperator)
+ (modally--separator)
))))
(defun modally--approx-time (time)
@@ -164,7 +164,7 @@
(propertize
(modally--approx-time org-timer-mode-line-string)
'face face)
- (modally--seperator)
+ (modally--separator)
))))
;; VARIABLES
@@ -195,7 +195,7 @@
(defvar modally-display-file-size
'(:eval (format "%s %s"
(format-mode-line "\s%I")
- (modally--seperator)))
+ (modally--separator)))
"Modeline construct to display file size of buffer.")
(defvar modally-display-flymake