JaeUs/dotfiles
1
0
Fork 0
mirror of http://github.com/JaeUs3792/dotfiles synced 2025-12-14 08:01:35 +09:00
Code Issues Packages Projects Releases Wiki Activity

Emacs : org link remove add

Browse Source
This commit is contained in:
JaeYoo-Im
2022-10-04 22:01:27 +09:00
parent af4f48a850
commit 1264a52725
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
.doom.d/config.el
View File

@ -153,6 +153,14 @@ same directory as the org-buffer and insert a link to this file."
(user-error (user-error
"Error pasting the image, make sure you have an image in the clipboard!")) "Error pasting the image, make sure you have an image in the clipboard!"))
)) ))
(defun my-org-remove-link-and-trash-linked-file ()
"Remove `org-mode' link at point and trash linked file."
(interactive)
(let* ((link (org-element-context))
(path (org-element-property :path link)))
(move-file-to-trash path)
(delete-region (org-element-property :begin link)
(org-element-property :end link))))
(defun as-windows-path (unix-path) (defun as-windows-path (unix-path)
"Takes a unix path and returns a matching WSL path" "Takes a unix path and returns a matching WSL path"