소스 검색

Post-fix previous patch

Carsten Dominik 16 년 전
부모
커밋
6a9acfa9a3
1개의 변경된 파일3개의 추가작업 그리고 1개의 파일을 삭제
  1. 3 1
      lisp/org-protocol.el

+ 3 - 1
lisp/org-protocol.el

@@ -277,7 +277,9 @@ decode each split part."
   (let* ((sep (or separator "/+"))
   (let* ((sep (or separator "/+"))
          (split-parts (split-string data sep)))
          (split-parts (split-string data sep)))
     (if unhexify
     (if unhexify
-        (mapcar 'url-unhex-string split-parts)
+	(if (fboundp unhexify)
+	    (mapcar unhexify split-parts)
+	  (mapcar 'org-protocol-unhex-string split-parts))
       split-parts)))
       split-parts)))
 
 
 (defun org-protocol-unhex-string(str)
 (defun org-protocol-unhex-string(str)