| 
					
				 | 
			
			
				@@ -5041,7 +5041,7 @@ The following commands are available: 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (org-add-hook 'kill-buffer-hook 'org-check-running-clock nil 'local) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   ;; Paragraphs and auto-filling 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (org-set-autofill-regexps) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-  (setq indent-line-function 'org-indent-line-function) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+  (setq indent-line-function 'org-indent-line) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (org-update-radio-target-regexp) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   ;; Beginning/end of defun 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (org-set-local 'beginning-of-defun-function 'org-beginning-of-defun) 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -12403,9 +12403,9 @@ EXTRA is additional text that will be inserted into the notes buffer." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 			   (goto-char (1- (match-beginning 0)))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	      (insert "\n:" drawer ":\n:END:") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	      (beginning-of-line 0) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	      (org-indent-line-function) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	      (org-indent-line) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	      (beginning-of-line 2) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	      (org-indent-line-function) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	      (org-indent-line) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	      (end-of-line 0))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	   ((and org-log-state-notes-insert-after-drawers 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		 (save-excursion 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -14198,7 +14198,7 @@ If the drawer does not exist and FORCE is non-nil, create the drawer." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (or force (throw 'exit nil)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (goto-char beg) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (setq end beg) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	  (org-indent-line-function) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	  (org-indent-line) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (insert ":END:\n")) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	(cons beg end))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -14524,10 +14524,10 @@ and the new value.") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	    (goto-char (cdr range)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	    (insert "\n") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	    (backward-char 1) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	    (org-indent-line-function)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	    (org-indent-line)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (insert ":" property ":") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (and value (insert " " value)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	  (org-indent-line-function))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	  (org-indent-line))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (run-hook-with-args 'org-property-changed-functions property value))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 (defun org-buffer-property-keys (&optional include-specials include-defaults include-columns) 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -14888,7 +14888,7 @@ completion." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	(error "Only one allowed value for this property")) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (org-at-property-p) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (replace-match (concat " :" key ": " nval) t t) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-    (org-indent-line-function) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+    (org-indent-line) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (beginning-of-line 1) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (skip-chars-forward " \t") 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (run-hook-with-args 'org-property-changed-functions key nval))) 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -18941,7 +18941,7 @@ See the individual commands for more information." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	(let ((ind (org-get-indentation))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (newline) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (if (org-looking-back org-list-end-re) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	      (org-indent-line-function) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	      (org-indent-line) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	    (org-indent-line-to ind))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				      ((and org-return-follows-link 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	   (org-at-timestamp-p t) 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -20488,7 +20488,7 @@ If point is in an inline task, mark that task instead." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 ;;; Paragraph filling stuff. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 ;; We want this to be just right, so use the full arsenal. 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				  
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-(defun org-indent-line-function () 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+(defun org-indent-line () 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   "Indent line depending on context." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (interactive) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				   (let* ((pos (point)) 
			 |