diff --git a/lisp/org.el b/lisp/org.el
index 3b2629359..cd7450c7a 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -9258,7 +9258,7 @@ property to set."
 	   (save-excursion
 	     (org-back-to-heading t)
 	     (put-text-property
-	      (point-at-bol) (point-at-eol) tprop p))))))))
+	      (point-at-bol) (org-end-of-subtree t t) tprop p))))))))
 
 
 ;;;; Link Stuff