[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/org/org-archive.el,v
From: |
Carsten Dominik |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/org/org-archive.el,v |
Date: |
Sat, 25 Oct 2008 21:32:52 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Carsten Dominik <cdominik> 08/10/25 21:32:50
Index: lisp/org/org-archive.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/org/org-archive.el,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- lisp/org/org-archive.el 12 Oct 2008 06:12:44 -0000 1.8
+++ lisp/org/org-archive.el 25 Oct 2008 21:32:47 -0000 1.9
@@ -5,7 +5,7 @@
;; Author: Carsten Dominik <carsten at orgmode dot org>
;; Keywords: outlines, hypermedia, calendar, wp
;; Homepage: http://orgmode.org
-;; Version: 6.09a
+;; Version: 6.10c
;;
;; This file is part of GNU Emacs.
;;
@@ -322,12 +322,13 @@
(setq pos (point))
(condition-case nil
(outline-up-heading 1 t)
- (error (goto-char (point-min))))
+ (error (setq e (point-max)) (goto-char (point-min))))
(setq b (point))
+ (unless e
(condition-case nil
(org-end-of-subtree t t)
(error (goto-char (point-max))))
- (setq e (point))
+ (setq e (point)))
(goto-char b)
(unless (re-search-forward
(concat "^" (regexp-quote leader)