Revert the change to `org-indent-line-function'.

This change was to avoid indentation in source code regions,
but the overhead is too large.
This commit is contained in:
Carsten Dominik 2008-09-19 16:14:09 +02:00
parent df098ce3f2
commit 08e7428858
2 changed files with 54 additions and 52 deletions

View File

@ -1,5 +1,8 @@
2008-09-19 Carsten Dominik <dominik@science.uva.nl> 2008-09-19 Carsten Dominik <dominik@science.uva.nl>
* org.el (org-indent-line-function): No longer check for src
regions, this is too much overhead.
* org-agenda.el (org-agenda-highlight-todo): Fix bugs with keyword * org-agenda.el (org-agenda-highlight-todo): Fix bugs with keyword
matching. matching.

View File

@ -14159,7 +14159,6 @@ which make use of the date at the cursor."
(defun org-indent-line-function () (defun org-indent-line-function ()
"Indent line like previous, but further if previous was headline or item." "Indent line like previous, but further if previous was headline or item."
(interactive) (interactive)
(unless (org-edit-src-find-region-and-lang)
(let* ((pos (point)) (let* ((pos (point))
(itemp (org-at-item-p)) (itemp (org-at-item-p))
column bpos bcol tpos tcol bullet btype bullet-type) column bpos bcol tpos tcol bullet btype bullet-type)
@ -14211,7 +14210,7 @@ which make use of the date at the cursor."
(replace-match (concat "\\1" (format org-property-format (replace-match (concat "\\1" (format org-property-format
(match-string 2) (match-string 3))) (match-string 2) (match-string 3)))
t nil)) t nil))
(org-move-to-column column)))) (org-move-to-column column)))
(defun org-set-autofill-regexps () (defun org-set-autofill-regexps ()
(interactive) (interactive)