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

[Carsten Dominik]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Carsten Dominik <cdominik>      06/09/08 08:47:01

Index: org.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/org.el,v
retrieving revision 1.104
retrieving revision 1.105
diff -u -b -r1.104 -r1.105
--- org.el      23 Aug 2006 10:07:42 -0000      1.104
+++ org.el      8 Sep 2006 08:47:01 -0000       1.105
@@ -6204,6 +6204,7 @@
     (while (setq p (next-single-property-change (point) :org-clock-minutes))
       (goto-char p)
       (when (setq time (get-text-property p :org-clock-minutes))
+       (save-excursion
        (beginning-of-line 1)
        (when (and (looking-at "\\(\\*+\\)[ \t]+\\(.*?\\)\\([ 
\t]+:[0-9a-zA-Z_@:]+:\\)?[ \t]*$")
                   (setq level (- (match-end 1) (match-beginning 1)))
@@ -6212,7 +6213,6 @@
                hdl (match-string 2)
                h (/ time 60)
                m (- time (* 60 h)))
-         (save-excursion
            (goto-char ins)
            (if (= level 1) (insert-before-markers "|-\n"))
            (insert-before-markers