From 6403daf1a3223b3347a74666cda0f5396206ba52 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 7 Jan 2003 17:53:49 +0000 Subject: [PATCH] (Fapropos_internal): Don't gcpro apropos_predicate but set it to nil before returning. --- src/keymap.c | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/src/keymap.c b/src/keymap.c index 3f636f103ac..c4c5721a194 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -3293,13 +3293,12 @@ Return list of symbols found. */) struct gcpro gcpro1; Lisp_Object result; CHECK_STRING (regexp); - apropos_predicate = predicate; - GCPRO1 (apropos_predicate); + apropos_predicate = predicate; /* predicate protected by the call */ apropos_accumulate = Qnil; /* staticpro'd */ map_obarray (Vobarray, apropos_accum, regexp); result = Fsort (apropos_accumulate, Qstring_lessp); - UNGCPRO; apropos_accumulate = Qnil; /* Allow the result to be GCed. */ + apropos_predicate = Qnil; return result; } -- 2.39.5