The recent commit "DND: Follow link format defined in
org-attach-store-link-p" (2556f75bf34558979fcf52ac50754dfce85458b7) caused
error in `yank-media`:

- org--image-yank-media-handler in org.el
- org-link-make-string-for-buffer in ol.el

```
apply: Wrong number of arguments: #[(link &optional description
interactive-p) ((if (and (string-match org-link-plain-re link) (not
(string-match org-ts-regexp link))) (progn (setq link (org-unbracket-string
"<" ">" link)))) (if (and (buffer-file-name (buffer-base-buffer)) (let
((case-fold-search nil)) (string-match "\\`file:\\(.+?\\)::" link))) (progn
(let ((path (match-string-no-properties 1 link)) (search
(substring-no-properties link (match-end 0)))) (let ((saved-match-data
(match-data))) (unwind-protect (progn (if (equal ... ...) (progn ...)))
(set-match-data saved-match-data t)))))) (let ((case-fold-search nil)) (if
(string-match "\\`\\(file\\|docview\\):" link) (progn (let* ((type
(match-string-no-properties 0 link)) (path-start (match-end 0)) (search
(and (string-match "::\\(.*\\)\\'" link path-start) (match-string 1 link)))
(path (if search (substring-no-properties link path-start ...)
(substring-no-properties link ...))) (path (if (org-string-nw-p path) path
(buffer-file-name))) (origpath path)) (setq path
(org-link--normalize-filename path org-link-file-path-type)) (setq link
(concat type path (and search (concat "::" search)))) (if (equal
description origpath) (progn (setq description path))))))) (if description
nil (setq description (org-link-get-description link))) (if interactive-p (
progn (setq description (read-string "Description: " description)))) (if
(org-string-nw-p description) nil (setq description nil))
(org-link-make-string link description)) (visual-fill-column-width org-ts-
regexp org-src-source-file-name org-outline-regexp-bol org-inhibit-startup
org-id-link-to-org-use-id org-highlight-links org-comment-string
org-agenda-buffer-name clean-buffer-list-kill-buffer-names ...) nil "Format
LINK with DESCRIPTION for current buffer.
When BUFFER is nil, format LINK for current buffer.
When DESCRIPTION is nil, set it according to :insert-description link
parameter or `org-link-make-description-function'.
When current buffer is a file buffer and link points to that file,
strip the file name from the link.
Make sure that file: link follows `org-link-file-path-type'.
Strip <..> brackets from LINK, if it is a plain link.

When INTERACTIVE-P is non-nil, prompt user for description.
```


[stardiviner]           <Hack this world!>      GPG key ID: 47C32433
IRC(freeenode): stardiviner                     Twitter:  @numbchild
Key fingerprint = 9BAA 92BC CDDD B9EF 3B36  CB99 B8C4 B8E5 47C3 2433
Blog: http://stardiviner.github.io/

Reply via email to