org.el (org-paste-subtree): Remove useless (concat ...).

* org.el (org-paste-subtree): Remove useless (concat ...).

See change from Stefan Monnier here:
https://lists.gnu.org/archive/html/emacs-diffs/2011-09/msg00224.html
This commit is contained in:
Bastien Guerry 2011-09-20 08:37:23 +02:00
parent 9da40a0d6e
commit fcdbb5e6c9
1 changed files with 1 additions and 1 deletions

View File

@ -7576,7 +7576,7 @@ the inserted text when done."
(org-with-limited-levels
(let* ((visp (not (outline-invisible-p)))
(txt tree)
(^re_ (concat "\\(\\*+\\)[ \t]*"))
(^re_ "\\(\\*+\\)[ \t]*")
(old-level (if (string-match org-outline-regexp-bol txt)
(- (match-end 0) (match-beginning 0) 1)
-1))