commit c37b5a66fdc350c0c744f5a71cf39f5c99f5931f parent 25fea307f2443ffc8abcba5daabc9abe0f8f322d Author: Oleh Krehel <ohwoeowho@gmail.com> Date: Sat, 19 Oct 2013 18:03:29 +0200 org-download.el: added `org-download-yank' * org-download.el (org-download-image): no longer inserts image from last kill - use `org-download-yank' instead. Diffstat:
| M | org-download.el | | | 10 | +++++++--- |
1 file changed, 7 insertions(+), 3 deletions(-)
diff --git a/org-download.el b/org-download.el @@ -163,10 +163,14 @@ It's affected by `org-download-timestamp' and `org-download--dir'." (with-current-buffer cur-buf (org-display-inline-images))))))) +(defun org-download-yank () + "Call `org-download-image' with current kill." + (interactive) + (org-download-image (current-kill 0))) + (defun org-download-image (link) - "Save image at address LINK to current directory's sub-directory DIR. -DIR is the name of the current level 0 heading." - (interactive (list (current-kill 0))) + "Save image at address LINK to `org-download--dir'." + (interactive "sUrl: ") (let ((filename (org-download--fullname link))) (if (null (image-type-from-file-name filename)) (message "not an image URL")