phundrak/eshell-info-banner.el
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Merge pull request #3 from juergenhoetzel/undefine-funtions

Browse Source 
Replace undefined functions length= and length> with Emacs builtins
This commit is contained in:
Lucien Cartier-Tilet 2021-05-01 15:34:46 +02:00 committed by GitHub
commit 1c3c31ace7
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
eshell-info-banner.el
View File

@ -127,7 +127,7 @@ neither of these, an error will be thrown by the function."
path)))
((null path) "")
((listp path)
(f-join (if (length= path 1)
(f-join (if (= (length path) 1)
(car path)
(let* ((dir (car path))
(first-char (substring dir 0 1)))
@ -151,7 +151,7 @@ Return detected partitions as a list of structs."
(mount (nth 5 partition)))
(when (string-prefix-p "/dev" filesystem t)
(make-eshell-info-banner--mounted-partitions
:path (if (length> mount eshell-info-banner-shorten-path-from)
:path (if (> (length mount) eshell-info-banner-shorten-path-from)
(eshell-info-banner--abbr-path mount t)
mount)
:size size