emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r105839: org/org.el: Add FIXMEs for o


From: Stefan Monnier
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r105839: org/org.el: Add FIXMEs for odd chunks of code
Date: Mon, 19 Sep 2011 12:48:36 -0400
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 105839
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Mon 2011-09-19 12:48:36 -0400
message:
  org/org.el: Add FIXMEs for odd chunks of code
modified:
  lisp/org/org.el
=== modified file 'lisp/org/org.el'
--- a/lisp/org/org.el   2011-09-17 12:19:04 +0000
+++ b/lisp/org/org.el   2011-09-19 16:48:36 +0000
@@ -7516,7 +7516,7 @@
   (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 @@
                            (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 @@
                            (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))))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]