emacs-elpa-diffs
[Top][All Lists]
Advanced

[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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]