diff options
| -rw-r--r-- | src/lread.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/lread.c b/src/lread.c index c6b5f89c755..147114743b6 100644 --- a/src/lread.c +++ b/src/lread.c @@ -2033,10 +2033,7 @@ intern (str) 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. */ |