[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/orgalist 853f41f: Fix thinko preventing indentation cyc
From: |
Nicolas Goaziou |
Subject: |
[elpa] externals/orgalist 853f41f: Fix thinko preventing indentation cycling to work properly |
Date: |
Wed, 2 May 2018 14:43:19 -0400 (EDT) |
branch: externals/orgalist
commit 853f41f6c10d1d2a8d3432771a7ea833b2bc4e7b
Author: Nicolas Goaziou <address@hidden>
Commit: Nicolas Goaziou <address@hidden>
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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/orgalist 853f41f: Fix thinko preventing indentation cycling to work properly,
Nicolas Goaziou <=