awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Remove f.el references

Browse Source
This commit is contained in:
Henrik Lissner
2017-02-25 02:11:24 -05:00
parent 7ed243a398
commit a0305418ae
6 changed files with 15 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
modules/tools/macos/autoload.el
View File

@ -4,12 +4,13 @@
(defun +macos-open-with (&optional app-name path)
"Send PATH to APP-NAME on OSX."
(interactive)
(let* ((path (f-full (replace-regexp-in-string
"'" "\\'"
(or path (if (eq major-mode 'dired-mode)
(dired-get-file-for-visit)
(buffer-file-name)))
nil t)))
(let* ((path (expand-file-name
(replace-regexp-in-string
"'" "\\'"
(or path (if (eq major-mode 'dired-mode)
(dired-get-file-for-visit)
(buffer-file-name)))
nil t)))
(command (format "open %s"
(if app-name
(format "-a %s '%s'" (shell-quote-argument app-name) path)