diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-02-26 12:16:34 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-02-26 12:16:34 +0100 |
commit | e445894c0d35e670faf1566a3af365e719746172 (patch) | |
tree | f44af77d080d7129d58161ef9d84e1394e1045df | |
parent | 5e8fa136104b0088ac8f9bd7a647c3f5289ae799 (diff) | |
parent | a0104599dc2fd030df60b9a056fb912ac9284bc1 (diff) | |
download | org-mode-e445894c0d35e670faf1566a3af365e719746172.tar.gz |
Merge branch 'maint'
-rw-r--r-- | lisp/org.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/org.el b/lisp/org.el index 557d533..7417742 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -8275,7 +8275,6 @@ When REMOVE is non-nil, remove the subtree from the clipboard." (org-with-limited-levels (let* ((visp (not (org-invisible-p))) (txt tree) - (^re_ "\\(\\*+\\)[ \t]*") (old-level (if (string-match org-outline-regexp-bol txt) (- (match-end 0) (match-beginning 0) 1) -1)) @@ -8292,7 +8291,7 @@ When REMOVE is non-nil, remove the subtree from the clipboard." (condition-case nil (progn (outline-previous-visible-heading 1) - (if (looking-at ^re_) + (if (looking-at org-outline-regexp-bol) (- (match-end 0) (match-beginning 0) 1) 1)) (error 1)))) @@ -8301,7 +8300,7 @@ When REMOVE is non-nil, remove the subtree from the clipboard." (progn (or (looking-at org-outline-regexp) (outline-next-visible-heading 1)) - (if (looking-at ^re_) + (if (looking-at org-outline-regexp-bol) (- (match-end 0) (match-beginning 0) 1) 1)) (error 1)))) |