[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] [ANN] List improvement v.2
From: |
Nicolas Goaziou |
Subject: |
Re: [Orgmode] [ANN] List improvement v.2 |
Date: |
Sun, 15 Aug 2010 16:07:35 +0200 |
User-agent: |
Wanderlust/2.15.9 (Almost Unreal) Emacs/23.2 Mule/6.0 (HANACHIRUSATO) |
Argh, it should be:
(defun org-switch-to-new-lists ()
"Make current buffer compatible with new list definition."
(goto-char (point-min))
(let ((case-fold-search t))
(while (< (point) (point-max))
(while (and (org-in-item-p)
(not (org-at-item-p))
(not (looking-at "^[ \t]*$"))
(not (and (org-in-regexps-block-p
"^[ \t]*#\\+begin_" "^[ \t]*#\\+end_")
(not (looking-at "^[ \t]*#\\+begin_"))))
(<= (org-get-indentation)
(save-excursion
(org-beginning-of-item)
(org-get-indentation))))
(newline))
(beginning-of-line 2))))
Sorry for the noise.
Regards,
-- Nicolas