diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-12-22 19:18:33 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-12-22 19:18:33 +0100 |
| commit | cb059004028f5642da971b6549301560477d7755 (patch) | |
| tree | c3130f69a7d668c318b1f7438110d47ee18ae946 | |
| parent | be4bacb32b6bb9f6794e43bac7664e97d855ab5c (diff) | |
| download | org-mode-cb059004028f5642da971b6549301560477d7755.tar.gz | |
org.el (org-store-link): Remove handling w3m links from this function
* org.el (org-store-link): Update the error message when no
method is available for storing a link. Use `user-error' for
this. Remove handling w3m links from this function.
| -rw-r--r-- | lisp/org.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/org.el b/lisp/org.el index f7d9717..f7cb5fe 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8964,11 +8964,6 @@ part of Org's core." link (url-view-url t)) (org-store-link-props :type "w3" :url (url-view-url t))) - ((eq major-mode 'w3m-mode) - (setq cpltxt (or w3m-current-title w3m-current-url) - link w3m-current-url) - (org-store-link-props :type "w3m" :url (url-view-url t))) - ((setq search (run-hook-with-args-until-success 'org-create-file-search-functions)) (setq link (concat "file:" (abbreviate-file-name buffer-file-name) @@ -9060,7 +9055,7 @@ part of Org's core." (setq link cpltxt)) ((org-called-interactively-p 'interactive) - (error "Cannot link to a buffer which is not visiting a file")) + (user-error "No method for storing a link from this buffer")) (t (setq link nil))) |