From d353f8febfdb7b510bc8b6cb005ff2018e2a9308 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 2 Sep 1996 17:03:33 +0000 Subject: [PATCH] (save-match-data): Definition deleted. --- lisp/progmodes/simula.el | 11 ----------- 1 file changed, 11 deletions(-) diff --git a/lisp/progmodes/simula.el b/lisp/progmodes/simula.el index 661fc68f45e..31cae0b0fc5 100644 --- a/lisp/progmodes/simula.el +++ b/lisp/progmodes/simula.el @@ -1621,17 +1621,6 @@ If not nil and not t, move to limit of search and return nil." ;; save point for later calls to this function (setq simula-find-comment-point (if end (point) -1)) (and end (cons start end)))) - -(if (not (fboundp 'save-match-data)) - (defmacro save-match-data (&rest body) - "Execute the BODY forms, restoring the global value of the match data." - (let ((original (make-symbol "match-data"))) - (list - 'let (list (list original '(match-data))) - (list 'unwind-protect - (cons 'progn body) - (list 'store-match-data original)))))) - ;; defuns for submitting bug reports -- 2.39.2