Commit 6f562445 authored by Per Cederqvist's avatar Per Cederqvist

(renumber-lyskom-send-simple-expect): Handle extracting_expect.

parent 729da472
......@@ -10,5 +10,7 @@
(let ((pos (point))
(limit (re-search-forward "^\\(send\\)\\|\\(talk_to\\)" nil t)))
(goto-char pos)
(while (re-search-forward "^simple_expect \"[%=]\\([0-9]+\\)" limit t)
(replace-match (format "%d" ref-nr) t t nil 1))))))
(while (re-search-forward
"^\\(simple\\|extracting\\)_expect \"[%=]\\([0-9]+\\)"
limit t)
(replace-match (format "%d" ref-nr) t t nil 2))))))
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment