Mercurial > emacs
changeset 97390:11deca4a880b
(org-renumber-ordered-list): Fix bob/bobp typo.
(org-extract-attributes): Let-bind `key', `value'.
(org-make-tags-matcher): Let-bind `time-p'.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sun, 10 Aug 2008 01:27:40 +0000 |
| parents | f6d26796ef8b |
| children | 9da424c0c9c9 |
| files | lisp/org/org.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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