diff options
| author | Kim F. Storm | 2005-06-08 22:37:23 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2005-06-08 22:37:23 +0000 |
| commit | a0ef72dfd7802827b20f1ff1c844c5832073300a (patch) | |
| tree | 96abe282278532a80283f0da920c2104452dd314 | |
| parent | 10ddc30eee98ce9af97d0b78021dd5bcf9192413 (diff) | |
| download | emacs-a0ef72dfd7802827b20f1ff1c844c5832073300a.tar.gz emacs-a0ef72dfd7802827b20f1ff1c844c5832073300a.zip | |
(save-match-data): Add RESEAT arg `evaporate' to
set-match-data to free markers in match-data.
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 45bcccbb6e5..585ec920458 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -1970,7 +1970,7 @@ The value returned is the value of the last form in BODY." | |||
| 1970 | '((save-match-data-internal (match-data))) | 1970 | '((save-match-data-internal (match-data))) |
| 1971 | (list 'unwind-protect | 1971 | (list 'unwind-protect |
| 1972 | (cons 'progn body) | 1972 | (cons 'progn body) |
| 1973 | '(set-match-data save-match-data-internal)))) | 1973 | '(set-match-data save-match-data-internal 'evaporate)))) |
| 1974 | 1974 | ||
| 1975 | (defun match-string (num &optional string) | 1975 | (defun match-string (num &optional string) |
| 1976 | "Return string of text matched by last search. | 1976 | "Return string of text matched by last search. |