Mercurial > emacs
changeset 44158:8bfb4deffa5f
(substring-no-properties): Function deleted (now in C).
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 26 Mar 2002 09:17:56 +0000 |
| parents | 1965fb963598 |
| children | 61c15819e528 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 0 insertions(+), 13 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Tue Mar 26 09:12:23 2002 +0000 +++ b/lisp/subr.el Tue Mar 26 09:17:56 2002 +0000 @@ -1483,19 +1483,6 @@ (cons 'progn body) '(set-match-data save-match-data-internal)))) -(defun substring-no-properties (string &optional from to) - "Return a substring of STRING, with no text properties. -The substring starts at index FROM and ends before TO. -If FROM is nil or omitted, it defaults to the beginning of STRING. -If TO is nil or omitted, it defaults to the end of STRING. -If FROM or TO is negative, it counts from the end. - -Simply (substring-no-properties STRING) copies a string without -its properties." - (let ((str (substring string (or from 0) to))) - (set-text-properties 0 (length str) nil str) - str)) - (defun match-string (num &optional string) "Return string of text matched by last search. NUM specifies which parenthesized expression in the last regexp.