| 
					
				 | 
			
			
				@@ -1742,7 +1742,7 @@ in that string.  If STRING is nil, it will be fetched from the beginning 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 of the current line." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (org-with-gensyms (marker) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     `(let ((,marker (get-text-property (if string 0 (point-at-bol)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-				       'org-hd-marker string))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+				       'org-hd-marker ,string))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				        (with-current-buffer (marker-buffer ,marker) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (save-excursion 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	   (goto-char ,marker) 
			 |