- Timestamp:
- 05/02/2020 01:12:10 AM (5 years ago)
- branch-nick:
- org-autofocus
- revision id:
- dsowen@fugue88.ws-20200502011210-c77mrxxweedt8xp8
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/org-autofocus.el
r6 r7 34 34 35 35 (defun org-af--dim (start end) 36 "Dim the task from START to END." 36 37 (let ((o (make-overlay start end))) 37 38 (overlay-put o 'category org-af-dimmed))) 38 39 39 40 (defun org-af--undim (start end) 41 "Undim the task from START to END." 40 42 (remove-overlays start end 'org-af-dimmed t)) 41 43 42 44 (defun org-af--dimmed-p (point) 45 "Test whether the task at POINT is dimmed." 43 46 (get-char-property point 'org-af-dimmed)) 44 47
Note: See TracChangeset
for help on using the changeset viewer.