Skip to content

Commit 3ef5933

Browse files
committed
replace some calls of f.el functions w/ stdlib equivalents
1 parent ab75986 commit 3ef5933

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

kele.el

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -49,7 +49,7 @@
4949
:group 'kele)
5050

5151
(defcustom kele-cache-dir
52-
(f-expand "~/.kube/cache/")
52+
(expand-file-name "~/.kube/cache/")
5353
"Path to the kubectl cache."
5454
:group 'kele
5555
:type 'directory)
@@ -481,18 +481,18 @@ retval into `async-wait'."
481481
(require 'json)
482482
(require 'yaml)
483483
,(async-inject-variables "kele-cache-dir")
484-
(->> (f-entries (f-join kele-cache-dir "discovery"))
484+
(->> (f-entries (file-name-concat kele-cache-dir "discovery"))
485485
(-map (lambda (dir)
486486
(let* ((api-list-files (f-files dir
487487
(lambda (file)
488-
(equal (f-ext file) "json"))
488+
(equal (file-name-extension file) "json"))
489489
t))
490490
(api-lists (-map (lambda (file)
491491
(json-parse-string (f-read file)
492492
:object-type 'alist
493493
:array-type 'list))
494494
api-list-files))
495-
(key (f-relative dir (f-join kele-cache-dir "discovery"))))
495+
(key (file-relative-name dir (file-name-concat kele-cache-dir "discovery"))))
496496
`(,key . ,api-lists))))))
497497
func-complete)))
498498

0 commit comments

Comments
 (0)