summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-07-14 00:06:09 +0000
committerKarl Heuer <kwzh@gnu.org>1996-07-14 00:06:09 +0000
commit185d52d8ebc484a87b382175f142487903f63afc (patch)
tree41e01b4059d24d53308e5c1dc5ae1335fafdd3cd
parentd0b49d0be25b8595a219f00e9e356cae11e1db5b (diff)
downloademacs-185d52d8ebc484a87b382175f142487903f63afc.tar.gz
(Fmatch_data): If no matching done yet, return Qnil.
-rw-r--r--src/search.c2
1 files changed, 1 insertions, 1 deletions
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));