Index: main/org-autofocus.el
===================================================================
--- main/org-autofocus.el	(revision main,6)
+++ main/org-autofocus.el	(revision main,7)
@@ -34,11 +34,14 @@
 
 (defun org-af--dim (start end)
+  "Dim the task from START to END."
   (let ((o (make-overlay start end)))
     (overlay-put o 'category org-af-dimmed)))
 
 (defun org-af--undim (start end)
+  "Undim the task from START to END."
   (remove-overlays start end 'org-af-dimmed t))
 
 (defun org-af--dimmed-p (point)
+  "Test whether the task at POINT is dimmed."
   (get-char-property point 'org-af-dimmed))