 	  (propertize unf-str
 				   'face '(:background "dark magenta"
 									   :foreground "white"))
-	(propertize unf-str
-				'face 'mode-line-inactive)))
+	unf-str))
 
 (defun tnml/major-mode-module ()
   "Return the current major mode without the '-mode' suffix."

  (if (equal (selected-window) tnml-selected-window)
	  (propertize unf-str 'face '(:background "gold3"
											  :foreground "gray18"))
	(propertize unf-str 'face 'mode-line-inactive)))

(defun tnml/system-module ()
  "Return a formatted string of battery percentage and time."
  (propertize (format " %s%%%% %s "
					  (battery-format "%p"
									  (funcall battery-status-function))
					  (format-time-string "%I:%M %p")) 
			  'face '(:background "gray87"
					  :foreground "gray20"
					  :weight ultrabold)))

(defvar tnml/format-left
  '((tnml/evil-module)

  "Return current evil-state."
  (cond
   ((string-equal evil-state 'normal)
	(propertize " NORMAL "
				'face '(:background "dodger blue"
									:foreground "white")))
   ((string-equal evil-state 'insert)
	(propertize " INSERT "
				'face '(:background "yellow"
									:foreground "gray10")))
   ((string-equal evil-state 'visual)
	(propertize " VISUAL "
				'face'(:background "MediumPurple4"
								   :foreground "seashell1")))
   ((string-equal evil-state 'emacs)
	(propertize " EMACS "
				'face '(:background "plum1"
									:foreground "gray10")))
   ((string-equal evil-state 'replace)
	(propertize " REPLACE "
				'face '(:background "dark red"
									:foreground "white smoke")))
   ((string-equal evil-state 'motion)
	(propertize " MOTION "
				'face '(:background "navy"
									:foreground "seashell1")))
   ((string-equal evil-state 'operator)
	(propertize " OPERATOR "
				'face '(:background "SeaGreen1"
									:foreground "gray10")))
   ((string-equal evil-state 'lispy)
	(propertize " LISPY "
				'face '(:background "dark violet"
									:foreground "white smoke")))))

(defun tnml/writable-module ()
  "Return a formatted string consisting of an icon representing the current buffer's status and its name."
