From c36bcf1b4a142fb5a1396ad0bb681a5349c8fe50 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sun, 14 Jul 1996 00:06:09 +0000 Subject: [PATCH] (Fmatch_data): If no matching done yet, return Qnil. --- src/search.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/search.c b/src/search.c index 85c15a0de47..53187c2c485 100644 --- a/src/search.c +++ b/src/search.c @@ -1839,7 +1839,7 @@ Use `store-match-data' to reinstate the data in this list.") int i, len; if (NILP (last_thing_searched)) - error ("match-data called before any match found"); + return Qnil; data = (Lisp_Object *) alloca ((2 * search_regs.num_regs) * sizeof (Lisp_Object)); -- 2.39.2