From: Basil L. Contovounesios <contovob@tcd.ie>
Date: Tue, 25 Jun 2019 20:49:00 +0000 (+0100)
Subject: Avoid using subr-x.el function in files.el
X-Git-Tag: emacs-27.0.90~2226
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4217398de3883cc8bc550f6ba33389e8ec85ad6e;p=emacs.git

Avoid using subr-x.el function in files.el

* lisp/files.el (file-size-human-readable): Open code string-empty-p
call.  This was the single occurrence of a subr-x.el function in
files.el, which does not (yet) load subr-x.el.
---

diff --git a/lisp/files.el b/lisp/files.el
index a431be8d5d8..05150ac0214 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1396,7 +1396,7 @@ in all cases, since that is the standard symbol for byte."
 		  "%.1f%s%s"
 	        "%.0f%s%s")
 	      file-size
-              (if (string-empty-p prefixed-unit) "" (or space ""))
+              (if (string= prefixed-unit "") "" (or space ""))
               prefixed-unit))))
 
 (defcustom mounted-file-systems