forked from mirrors/org-mode
no longer ensuring that noweb style references are inside comments
it was slow buggy and brought in more requirements
This commit is contained in:
parent
cbae0b231f
commit
132eb91b68
|
@ -187,8 +187,7 @@ the source-code block which holds BODY."
|
||||||
(insert body) (goto-char (point-min))
|
(insert body) (goto-char (point-min))
|
||||||
(funcall (intern (concat lang "-mode")))
|
(funcall (intern (concat lang "-mode")))
|
||||||
(setq index (point))
|
(setq index (point))
|
||||||
(while (and (re-search-forward "<<\\(.+\\)>>" nil t)
|
(while (and (re-search-forward "<<\\(.+\\)>>" nil t))
|
||||||
(save-match-data (comment-beginning)))
|
|
||||||
(save-match-data (setf source-name (match-string 1)))
|
(save-match-data (setf source-name (match-string 1)))
|
||||||
;; add interval to new-body
|
;; add interval to new-body
|
||||||
(goto-char (match-end 0))
|
(goto-char (match-end 0))
|
||||||
|
|
Loading…
Reference in a new issue