ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use `org-link-unescape' instead of obsolete unhex string function 

* lisp/org-protocol.el (org-protocol-split-data) (org-protocol-open-source):
Use `org-link-unescape' instead of obsolete unhex string function.
This commit is contained in:
David Maus 2010-12-15 20:01:51 +01:00
parent 139cc1d4c2
commit 0590bb7fe1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-protocol.el
View File

@ -301,7 +301,7 @@ part."
(if unhexify (if unhexify
(if (fboundp unhexify) (if (fboundp unhexify)
(mapcar unhexify split-parts) (mapcar unhexify split-parts)
(mapcar 'org-protocol-unhex-string split-parts)) (mapcar 'org-link-unescape split-parts))
split-parts))) split-parts)))
(defun org-protocol-flatten-greedy (param-list &optional strip-path replacement) (defun org-protocol-flatten-greedy (param-list &optional strip-path replacement)
@ -476,7 +476,7 @@ The location for a browser's bookmark should look like this:
;; As we enter this function for a match on our protocol, the return value ;; As we enter this function for a match on our protocol, the return value
;; defaults to nil. ;; defaults to nil.
(let ((result nil) (let ((result nil)
(f (org-protocol-unhex-string fname))) (f (org-link-unescape fname)))
(catch 'result (catch 'result
(dolist (prolist org-protocol-project-alist) (dolist (prolist org-protocol-project-alist)
(let* ((base-url (plist-get (cdr prolist) :base-url)) (let* ((base-url (plist-get (cdr prolist) :base-url))