no longer ensuring that noweb style references are inside comments

it was slow buggy and brought in more requirements
This commit is contained in:
Eric Schulte 2009-08-01 19:33:01 -06:00
parent cbae0b231f
commit 132eb91b68

View file

@ -187,8 +187,7 @@ the source-code block which holds BODY."
(insert body) (goto-char (point-min))
(funcall (intern (concat lang "-mode")))
(setq index (point))
(while (and (re-search-forward "<<\\(.+\\)>>" nil t)
(save-match-data (comment-beginning)))
(while (and (re-search-forward "<<\\(.+\\)>>" nil t))
(save-match-data (setf source-name (match-string 1)))
;; add interval to new-body
(goto-char (match-end 0))