1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/subr.el b/lisp/subr.el
index 188f6b2eb73..ac512deab80 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -177,6 +177,8 @@ Accept any number of arguments, but ignore them."
 (fset 'beep 'ding) ;preserve lingual purtity
 (fset 'indent-to-column 'indent-to)
 (fset 'backward-delete-char 'delete-backward-char)
+(fset 'search-forward-regexp (symbol-function 're-search-forward))
+(fset 'search-backward-regexp (symbol-function 're-search-backward))
 
 (defvar global-map nil
   "Default global keymap mapping Emacs keyboard input into commands.