فهرست منبع

Merge branch 'maint'

Nicolas Goaziou 8 سال پیش
والد
کامیت
4b3bdd019e
1فایلهای تغییر یافته به همراه2 افزوده شده و 1 حذف شده
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -11937,7 +11937,8 @@ prefix argument (`C-u C-u C-u C-c C-w')."
 				     (replace-regexp-in-string
 				      org-bracket-link-regexp
 				      "\\3"
-				      (nth 4 (org-heading-components)))))
+				      (or (nth 4 (org-heading-components))
+					  ""))))
 			     (org-refile-get-location
 			      (cond ((and arg (listp arg)) "Goto")
 				    (regionp (concat actionmsg " region to"))