From: Glenn Morris <rgm@gnu.org>
Date: Mon, 21 Jan 2008 04:47:10 +0000 (+0000)
Subject: (org-entry-properties): Let-bind `clocksum'.
X-Git-Tag: emacs-pretest-23.0.90~8480
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a1e8139657344bbea722654c1d569e9e8dc8e1e6;p=emacs.git

(org-entry-properties): Let-bind `clocksum'.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fd8d5b4ad8f..eadbd4dedb6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-01-21  Glenn Morris  <rgm@gnu.org>
+
+	* progmodes/hideif.el: Move defcustoms and defface to start of file.
+
+	* textmodes/org.el (org-entry-properties): Let-bind `clocksum'.
+
 2008-01-21  Juanma Barranquero  <lekktu@gmail.com>
 
 	* textmodes/org.el (org-unmodified, org-cycle-emulate-tab)
diff --git a/lisp/textmodes/org.el b/lisp/textmodes/org.el
index 75e84e51719..00a3bc2d195 100644
--- a/lisp/textmodes/org.el
+++ b/lisp/textmodes/org.el
@@ -15725,7 +15725,7 @@ If WHICH is nil or `all', get all properties.  If WHICH is
   (org-with-point-at pom
     (let ((clockstr (substring org-clock-string 0 -1))
 	  (excluded '("TODO" "TAGS" "ALLTAGS" "PRIORITY"))
-	  beg end range props sum-props key value string)
+	  beg end range props sum-props key value string clocksum)
       (save-excursion
 	(when (condition-case nil (org-back-to-heading t) (error nil))
 	  (setq beg (point))