Browse Source

Fix bug in org-clock.el

Carsten Dominik 15 years ago
parent
commit
d82366ee01
1 changed files with 3 additions and 3 deletions
  1. 3 3
      lisp/org-clock.el

+ 3 - 3
lisp/org-clock.el

@@ -519,11 +519,11 @@ the clocking selection, associated with the letter `d'."
 		     (marker-position org-clock-marker)
 		     (marker-buffer org-clock-marker))
 	(org-clock-out t))
-
+      
       (when (equal select '(16))
 	;; Mark as default clocking task
 	(org-clock-mark-default-task))
-
+      
       ;; Clock in at which position?
       (setq target-pos
 	    (if (and (eobp) (not (org-on-heading-p)))
@@ -539,7 +539,6 @@ the clocking selection, associated with the letter `d'."
 	  (move-marker selected-task nil))
 	(save-excursion
 	  (save-restriction
-	    (if (and 
 	    (widen)
 	    (goto-char target-pos)
 	    (org-back-to-heading t)
@@ -1570,3 +1569,4 @@ The details of what will be saved are regulated by the variable
 ;; arch-tag: 7b42c5d4-9b36-48be-97c0-66a869daed4c
 
 ;;; org-clock.el ends here
+)