aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/org
diff options
context:
space:
mode:
authorStefan Monnier <[email protected]>2011-09-19 12:48:36 -0400
committerStefan Monnier <[email protected]>2011-09-19 12:48:36 -0400
commit85cb5d5706296814be7d116cbbd497f6e5b1ac4c (patch)
tree76200d0bafcacfd1f40a3cf7b8eb3e9663b16dbe /lisp/org
parentc5b01d8c63cfd14c95a029540a6fb0da84537726 (diff)
org/org.el: Add FIXMEs for odd chunks of code
Diffstat (limited to 'lisp/org')
-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 419ff022cf..32ca5288d6 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -7516,7 +7516,7 @@ the inserted text when done."
(org-with-limited-levels
(let* ((visp (not (outline-invisible-p)))
(txt tree)
- (^re_ (concat "\\(\\*+\\)[ \t]*"))
+ (^re_ (concat "\\(\\*+\\)[ \t]*")) ;FIXME: Why `concat'?
(old-level (if (string-match org-outline-regexp-bol txt)
(- (match-end 0) (match-beginning 0) 1)
-1))
@@ -7534,7 +7534,7 @@ the inserted text when done."
(condition-case nil
(progn
(outline-previous-visible-heading 1)
- (if (looking-at re)
+ (if (looking-at re) ;FIXME: What's `re'?
(- (match-end 0) (match-beginning 0) 1)
1))
(error 1))))
@@ -7543,7 +7543,7 @@ the inserted text when done."
(progn
(or (looking-at org-outline-regexp)
(outline-next-visible-heading 1))
- (if (looking-at re)
+ (if (looking-at re) ;FIXME: What's `re'?
(- (match-end 0) (match-beginning 0) 1)
1))
(error 1))))