Replace to f.el functions with native functions
This commit is contained in:
parent
140f8f8ad4
commit
9bdd208cb6
4
dsptl.el
4
dsptl.el
@ -61,9 +61,9 @@
|
||||
(group-n 1 (seq (+ (not space)) alnum))
|
||||
(? punctuation))
|
||||
nil t nil)
|
||||
(let ((source (f-relative file))
|
||||
(let ((source (file-relative-name file))
|
||||
(target (match-string-no-properties 1)))
|
||||
(when (f-file-p target)
|
||||
(when (file-regular-p target)
|
||||
(push `(,source . ,target) links))))))))
|
||||
|
||||
(defun dsptl-display-links-directory ()
|
||||
|
Reference in New Issue
Block a user