[Emacs-diffs] Changes to emacs/lisp/org/org-archive.el,v

[Carsten Dominik]

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)