diff options
| author | Pip Cet <pipcet@gmail.com> | 2021-05-16 15:44:26 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-05-16 15:44:26 +0200 |
| commit | 9b6992a794c391c5d663b4a82b5acc9de611e2ac (patch) | |
| tree | 2af6fe2df10e3a9fa29f8cb1e7a41f3f0de10cb6 /src/json.c | |
| parent | bf8b8cc6c57e051e11306aa9c409dc4ed8c442bc (diff) | |
| download | emacs-scratch/no-purespace-old.tar.gz | |
Remove purespace from Emacsscratch/no-purespace-old
Diffstat (limited to 'src/json.c')
| -rw-r--r-- | src/json.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/json.c b/src/json.c index 3f1d27ad7fb..ccb0405c4e0 100644 --- a/src/json.c +++ b/src/json.c @@ -1110,8 +1110,8 @@ define_error (Lisp_Object name, const char *message, Lisp_Object parent) eassert (CONSP (parent_conditions)); eassert (!NILP (Fmemq (parent, parent_conditions))); eassert (NILP (Fmemq (name, parent_conditions))); - Fput (name, Qerror_conditions, pure_cons (name, parent_conditions)); - Fput (name, Qerror_message, build_pure_c_string (message)); + Fput (name, Qerror_conditions, Fcons (name, parent_conditions)); + Fput (name, Qerror_message, build_string (message)); } void |