# HG changeset patch # User Glenn Morris # Date 1218331660 0 # Node ID 11deca4a880b3162538963e310398065c2276ce1 # Parent f6d26796ef8bae5b75cf65343d0f5f103a456c9d (org-renumber-ordered-list): Fix bob/bobp typo. (org-extract-attributes): Let-bind `key', `value'. (org-make-tags-matcher): Let-bind `time-p'. diff -r f6d26796ef8b -r 11deca4a880b lisp/org/org.el --- a/lisp/org/org.el Sun Aug 10 01:25:47 2008 +0000 +++ b/lisp/org/org.el Sun Aug 10 01:27:40 2008 +0000 @@ -6042,7 +6042,7 @@ (buffer-substring (point-at-bol) (match-beginning 3)))) ;; (term (substring (match-string 3) -1)) ind1 (n (1- arg)) - fmt bob) + fmt bobp) ;; find where this list begins (org-beginning-of-item-list) (setq bobp (bobp)) @@ -7031,7 +7031,7 @@ (defun org-extract-attributes (s) "Extract the attributes cookie from a string and set as text property." - (let (a attr (start 0)) + (let (a attr key value (start 0)) (save-match-data (when (string-match "{{\\([^}]+\\)}}$" s) (setq a (match-string 1 s) s (substring s 0 (match-beginning 0))) @@ -9436,7 +9436,7 @@ minus tag mm tagsmatch todomatch tagsmatcher todomatcher kwd matcher orterms term orlist re-p str-p level-p level-op - prop-p pn pv po cat-p gv) + prop-p pn pv po cat-p gv time-p) (if (string-match "/+" match) ;; match contains also a todo-matching request (progn