Mercurial > emacs
changeset 18051:b985b9739beb
(intern): Don't make a pure string here, since Fintern does that.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 31 May 1997 00:43:47 +0000 |
| parents | 506b35a4537e |
| children | 64a265eaa6d7 |
| files | src/lread.c |
| diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lread.c Sat May 31 00:34:13 1997 +0000 +++ b/src/lread.c Sat May 31 00:43:47 1997 +0000 @@ -2033,10 +2033,7 @@ tem = oblookup (obarray, str, len); if (SYMBOLP (tem)) return tem; - return Fintern ((!NILP (Vpurify_flag) - ? make_pure_string (str, len) - : make_string (str, len)), - obarray); + return Fintern (make_string (str, len), obarray); } /* Create an uninterned symbol with name STR. */