emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

doom:file-delete: remove org attachment check (to be done elsewhere later)

Browse source
This commit is contained in:
Henrik Lissner 2016-06-23 01:31:22 -04:00
parent 64c51764a1
commit 12c3c98a74
1 changed files with 0 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

6
core/defuns/defuns-file.el
View file

@ -9,12 +9,6 @@
(if (not (file-exists-p filename)) (if (not (file-exists-p filename))
(error "File doesn't exist: %s" filename) (error "File doesn't exist: %s" filename)
(when (or bang (and (not bang) (y-or-n-p (format "Delete %s?" (f-base filename))))) (when (or bang (and (not bang) (y-or-n-p (format "Delete %s?" (f-base filename)))))
;; Delete attachments if in org-mode
(when (eq major-mode 'org-mode)
(mapc (lambda (file)
(when (file-exists-p file)
(delete-file file t)))
(doom/org-attachments)))
(set-buffer-modified-p nil) (set-buffer-modified-p nil)
(delete-file filename) (delete-file filename)
(kill-this-buffer) (kill-this-buffer)