diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2023-05-13 17:03:20 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2023-05-13 17:41:40 +0200 |
| commit | a7dcc0d55c641d3a16ed64528e726fb297726cbf (patch) | |
| tree | fe9c2991b7e9a8d7ef94b7e78438cf412934c5e9 | |
| parent | 867b104010760c4b7cd700078884cc774a01860a (diff) | |
| download | emacs-a7dcc0d55c641d3a16ed64528e726fb297726cbf.tar.gz | |
Fix regexp bugs
* lisp/progmodes/idlwave.el (idlwave-make-tags):
* lisp/obsolete/mantemp.el (mantemp-insert-cxx-syntax):
Repair obviously over-escaped control characters.
| -rw-r--r-- | lisp/obsolete/mantemp.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/idlwave.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/obsolete/mantemp.el b/lisp/obsolete/mantemp.el index 5349ec32cab..9fd6c91cc4e 100644 --- a/lisp/obsolete/mantemp.el +++ b/lisp/obsolete/mantemp.el @@ -152,7 +152,7 @@ the lines." (while (re-search-forward "^.+" nil t) (progn (beginning-of-line) - (if (looking-at "struct[\\t ]+\\|class[\\t ]+") + (if (looking-at "struct[\t ]+\\|class[\t ]+") (insert "template ") (insert "template class ")))) (goto-char (point-min)) diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el index 0b5ed93068a..cafd7b95da7 100644 --- a/lisp/progmodes/idlwave.el +++ b/lisp/progmodes/idlwave.el @@ -3891,7 +3891,7 @@ you specify /." (while (and item) ;; ;; Call etags - (if (not (string-match "^[ \\t]*$" item)) + (if (not (string-match "^[ \t]*$" item)) (progn (message "%s" (concat "Tagging " item "...")) (setq errbuf (get-buffer-create "*idltags-error*")) |