From: Richard M. Stallman Date: Mon, 2 Sep 1996 17:03:33 +0000 (+0000) Subject: (save-match-data): Definition deleted. X-Git-Tag: emacs-20.1~3872 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d353f8febfdb7b510bc8b6cb005ff2018e2a9308;p=emacs.git (save-match-data): Definition deleted. --- 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