浏览代码

Merge branch 'maint'

Bastien Guerry 12 年之前
父节点
当前提交
096c5644f7
共有 1 个文件被更改,包括 3 次插入3 次删除
  1. 3 3
      lisp/org.el

+ 3 - 3
lisp/org.el

@@ -9849,9 +9849,9 @@ application the system uses for this file type."
 	    (throw 'match t))
 
 	  (save-excursion
-	    (let ((linkpos (org-in-regexp org-angle-link-re)))
-	      (when (or linkpos
-			(and linkpos (goto-char (car klpos))
+	    (let ((plinkpos (org-in-regexp org-plain-link-re)))
+	      (when (or (org-in-regexp org-angle-link-re)
+			(and plinkpos (goto-char (car plinkpos))
 			     (save-match-data (not (looking-back "\\[\\[")))))
 		(setq type (match-string 1)
 		      path (org-link-unescape (match-string 2)))