larstvei/Focus
1
0
Fork 0
mirror of https://github.com/larstvei/Focus.git synced 2024-11-26 11:38:32 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix compiler warning introduced at 2086fee

Browse Source
This commit is contained in:
larstvei 2022-09-10 15:00:20 +02:00
parent b30ead247d
commit 9dd85fc474
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
focus.el
View File

@ -105,9 +105,9 @@ The timer calls `focus-read-only-hide-cursor' after
"Return the current bounds, based on `focus-get-thing'." "Return the current bounds, based on `focus-get-thing'."
(let ((thing (focus-get-thing))) (let ((thing (focus-get-thing)))
(cond ((eq thing 'org-element) (cond ((eq thing 'org-element)
(let* ((elem (org-element-at-point)) (let* ((elem (org-element-at-point))
(beg (org-element-property :begin (org-element-at-point))) (beg (org-element-property :begin elem))
(end (org-element-property :end (org-element-at-point)))) (end (org-element-property :end elem)))
(cons beg end))) (cons beg end)))
(t (bounds-of-thing-at-point (focus-get-thing)))))) (t (bounds-of-thing-at-point (focus-get-thing))))))