From da777a87c15f111aedf84fad724ae2c3b6a352a0 Mon Sep 17 00:00:00 2001 From: Vincent Zhang Date: Wed, 13 Jun 2018 21:34:31 +0800 Subject: [PATCH] Remove `memoize` dependency. --- doom-modeline.el | 14 +------------- 1 file changed, 1 insertion(+), 13 deletions(-) diff --git a/doom-modeline.el b/doom-modeline.el index bb16df9..c28e363 100644 --- a/doom-modeline.el +++ b/doom-modeline.el @@ -47,7 +47,6 @@ (require 'projectile) (require 'all-the-icons) (require 'dash) -(require 'memoize) (require 'shrink-path) (require 'eldoc-eval) @@ -410,7 +409,7 @@ active." (eq (selected-window) doom-modeline-current-window)) ;; Inspired from `powerline's `pl/make-xpm'. -(defmemoize doom-modeline--make-xpm (color height width) +(defun doom-modeline--make-xpm (color height width) "Create an XPM bitmap." (propertize " " 'display @@ -473,9 +472,6 @@ If TRUNCATE-TAIL is t also truncate the parent directory of the file." (propertize (file-name-nondirectory buffer-file-name) 'face (if file-faces `(:inherit ,file-faces))))))))) -(defmemoize doom-modeline-file-relative-name (filename directory) - (file-relative-name filename directory)) - (defun doom-modeline--buffer-file-name-relative (&optional include-project) "Propertized `buffer-file-name' showing directories relative to project's root only." (let ((root (doom-modeline-project-root)) @@ -492,14 +488,6 @@ If TRUNCATE-TAIL is t also truncate the parent directory of the file." (propertize (file-name-nondirectory buffer-file-truename) 'face (if file-faces `(:inherit ,file-faces)))))))) -(defmemoize doom-modeline-abbreviate-file-name (file-name) - (abbreviate-file-name file-name)) - -(defmemoize doom-modeline-shrink-path-file-mixed (project-root file-name) - (shrink-path-file-mixed project-root - (file-name-directory file-name) - file-name)) - (defun doom-modeline--buffer-file-name (truncate-project-root-parent) "Propertized `buffer-file-name'. If TRUNCATE-PROJECT-ROOT-PARENT is t space will be saved by truncating it down