Bug fixes.
This commit is contained in:
parent
1508d31b6e
commit
2ee5c7e9d1
|
@ -348,6 +348,14 @@ This is the compiled version of the format.")
|
|||
(org-overlay-put ov 'org-columns-pom pom)
|
||||
(org-overlay-put ov 'org-columns-format f)
|
||||
(when (featurep 'xemacs)
|
||||
(if (or (not (char-after beg))
|
||||
(equal (char-after beg) ?\n))
|
||||
(let ((inhibit-read-only t))
|
||||
(save-excursion
|
||||
(goto-char beg)
|
||||
(org-unmodified (insert " "))
|
||||
;; FIXME: add props and remove later?
|
||||
)))
|
||||
(goto-char beg)
|
||||
(org-columns-new-overlay
|
||||
beg (1+ beg) nil 'org-columns-space)
|
||||
|
|
|
@ -9695,6 +9695,8 @@ formats in the current buffer."
|
|||
(setq hiddenp (org-invisible-p))
|
||||
(end-of-line 1)
|
||||
(and (equal (char-after) ?\n) (forward-char 1))
|
||||
(while (looking-at "^[ \t]*\\(:CLOCK:\\|CLOCK\\|:END:\\)")
|
||||
(beginning-of-line 2))
|
||||
(org-skip-over-state-notes)
|
||||
(skip-chars-backward " \t\n\r")
|
||||
(if (eq (char-before) ?*) (forward-char 1))
|
||||
|
|
Loading…
Reference in New Issue