diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2009-05-14 14:46:41 +0200 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2009-05-14 14:46:41 +0200 |
| commit | f756d17bcfcae773ae627e7e6d3f2992f17eb691 (patch) | |
| tree | 6c7f8a6e62ae9417d1804c54e847feb89e0dd88f | |
| parent | 0962662663b5b224a3989d3bbf4ac23ad7f48bba (diff) | |
| download | org-mode-f756d17bcfcae773ae627e7e6d3f2992f17eb691.tar.gz | |
Lists: Fix bug with lists at the end of a file
Now org-end-of-item-list does find the end of the buffer if that is
where the lists ends.
| -rw-r--r-- | lisp/org-list.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/org-list.el b/lisp/org-list.el index edee414..a5ed6be 100644 --- a/lisp/org-list.el +++ b/lisp/org-list.el @@ -889,7 +889,9 @@ I.e. to the text after the last item." (catch 'next (beginning-of-line 2) (if (looking-at "[ \t]*$") - (throw (if (eobp) 'exit 'next) t)) + (if (eobp) + (progn (setq pos (point)) (throw 'exit t)) + (throw 'next t))) (skip-chars-forward " \t") (setq ind1 (current-column)) (if (or (< ind1 ind) (and (= ind1 ind) |