Bastien Guerry пре 11 година
родитељ
комит
df53dce911
1 измењених фајлова са 3 додато и 1 уклоњено
  1. 3 1
      lisp/org-attach.el

+ 3 - 1
lisp/org-attach.el

@@ -208,7 +208,9 @@ the directory and (if necessary) the corresponding ID will be created."
 	    (save-excursion
 	      (save-restriction
 		(widen)
-		(goto-char org-entry-property-inherited-from)
+		(if (marker-position org-entry-property-inherited-from)
+		    (goto-char org-entry-property-inherited-from)
+		  (org-back-to-heading t))
 		(let (org-attach-allow-inheritance)
 		  (org-attach-dir create-if-not-exists-p)))))
       (org-attach-check-absolute-path attach-dir)