aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-08-10 01:27:40 +0000
committerGlenn Morris2008-08-10 01:27:40 +0000
commit3281cf1113b9d1f2a724707bdcb5201dea3bad47 (patch)
treea046216a305f8ca72adf47c64c8ae3700f86ff7a
parent3bf7bbe47a478addcd4e68a77d1252c59beb54e3 (diff)
downloademacs-3281cf1113b9d1f2a724707bdcb5201dea3bad47.tar.gz
emacs-3281cf1113b9d1f2a724707bdcb5201dea3bad47.zip
(org-renumber-ordered-list): Fix bob/bobp typo.
(org-extract-attributes): Let-bind `key', `value'. (org-make-tags-matcher): Let-bind `time-p'.
-rw-r--r--lisp/org/org.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org/org.el b/lisp/org/org.el
index f5598144d6f..79cb5cf4794 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -6042,7 +6042,7 @@ with something like \"1.\" or \"2)\"."
6042 (buffer-substring (point-at-bol) (match-beginning 3)))) 6042 (buffer-substring (point-at-bol) (match-beginning 3))))
6043 ;; (term (substring (match-string 3) -1)) 6043 ;; (term (substring (match-string 3) -1))
6044 ind1 (n (1- arg)) 6044 ind1 (n (1- arg))
6045 fmt bob) 6045 fmt bobp)
6046 ;; find where this list begins 6046 ;; find where this list begins
6047 (org-beginning-of-item-list) 6047 (org-beginning-of-item-list)
6048 (setq bobp (bobp)) 6048 (setq bobp (bobp))
@@ -7031,7 +7031,7 @@ used as the link location instead of reading one interactively."
7031 7031
7032(defun org-extract-attributes (s) 7032(defun org-extract-attributes (s)
7033 "Extract the attributes cookie from a string and set as text property." 7033 "Extract the attributes cookie from a string and set as text property."
7034 (let (a attr (start 0)) 7034 (let (a attr key value (start 0))
7035 (save-match-data 7035 (save-match-data
7036 (when (string-match "{{\\([^}]+\\)}}$" s) 7036 (when (string-match "{{\\([^}]+\\)}}$" s)
7037 (setq a (match-string 1 s) s (substring s 0 (match-beginning 0))) 7037 (setq a (match-string 1 s) s (substring s 0 (match-beginning 0)))
@@ -9436,7 +9436,7 @@ also TODO lines."
9436 minus tag mm 9436 minus tag mm
9437 tagsmatch todomatch tagsmatcher todomatcher kwd matcher 9437 tagsmatch todomatch tagsmatcher todomatcher kwd matcher
9438 orterms term orlist re-p str-p level-p level-op 9438 orterms term orlist re-p str-p level-p level-op
9439 prop-p pn pv po cat-p gv) 9439 prop-p pn pv po cat-p gv time-p)
9440 (if (string-match "/+" match) 9440 (if (string-match "/+" match)
9441 ;; match contains also a todo-matching request 9441 ;; match contains also a todo-matching request
9442 (progn 9442 (progn