branch: externals/orgalist
commit 853f41f6c10d1d2a8d3432771a7ea833b2bc4e7b
Author: Nicolas Goaziou <m...@nicolasgoaziou.fr>
Commit: Nicolas Goaziou <m...@nicolasgoaziou.fr>
Fix thinko preventing indentation cycling to work properly
* orgalist.el (orgalist--cycle-indentation): Fix test for empty items.
---
orgalist.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/orgalist.el b/orgalist.el
index 301690c..e437f98 100644
--- a/orgalist.el
+++ b/orgalist.el
@@ -525,12 +525,12 @@ This function is meant to be used as a piece of advice on
`indent-line-function'."
(when (orgalist--at-item-p)
(let ((struct (orgalist--struct)))
- (if (>= (progn (org-match-line orgalist--item-re) (match-end 0))
- (save-excursion
- (goto-char (org-list-get-item-end
- (line-beginning-position) struct))
- (skip-chars-backward " \r\t\n")
- (point)))
+ (if (< (progn (org-match-line orgalist--item-re) (match-end 0))
+ (save-excursion
+ (goto-char (org-list-get-item-end
+ (line-beginning-position) struct))
+ (skip-chars-backward " \r\t\n")
+ (point)))
;; If the item is not empty, do not indent.
'noindent
(let ((ind (org-list-get-ind (line-beginning-position) struct))
