diff options
| author | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-07-21 10:13:36 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-08-18 10:41:31 +0200 |
| commit | a7600032d00fa9346853630232de5eebd2f12778 (patch) | |
| tree | d39b4ddd32801d9df80444a0a17aa8e204491abb | |
| parent | b955d7539f946f6b485a551c18fd21577a847bf3 (diff) | |
| download | org-mode-a7600032d00fa9346853630232de5eebd2f12778.tar.gz | |
org-indent: remove unused variable org-indent-outline-re
* lisp/org-indent.el (org-indent-notify-deleted-headline,
org-indent-refresh-maybe): replace `org-indent-outline-re' with
`org-outline-regexp-bol'.
| -rw-r--r-- | lisp/org-indent.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/org-indent.el b/lisp/org-indent.el index f554abf..9b8599a 100644 --- a/lisp/org-indent.el +++ b/lisp/org-indent.el @@ -63,8 +63,6 @@ It will be set in `org-indent-initialize'.") It will be set in `org-indent-initialize'.") (defvar org-hide-leading-stars-before-indent-mode nil "Used locally.") -(defvar org-indent-outline-re (concat "^" outline-regexp) - "Regexp matching and headline or inline task.") (defvar org-indent-deleted-headline-flag nil "Non nil if the last deletion acted on an headline. It is modified by `org-indent-notify-deleted-headline'.") @@ -286,7 +284,6 @@ Flag will be non-nil if command is going to delete an headline." (and (/= beg end) (save-excursion (goto-char beg) - (re-search-forward org-indent-outline-re end t))))) (save-match-data (re-search-forward org-outline-regexp-bol end t)))))) @@ -309,7 +306,7 @@ This function is meant to be called by `after-change-functions'." ((and (/= beg end) (save-excursion (goto-char beg) - (re-search-forward org-indent-outline-re end t))) + (re-search-forward org-outline-regexp-bol end t))) (let ((end (save-excursion (goto-char end) (outline-next-heading) (point)))) (org-indent-remove-properties beg end) |