changeset 8415:ec05bbe4ef1c

(Ffset): Don't call Fget unless SYM's plist is consp.
author Roland McGrath <roland@gnu.org>
date Mon, 01 Aug 1994 22:28:26 +0000
parents 8a8d2cdd4218
children 31a71761eeae
files src/data.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/data.c	Mon Aug 01 21:29:46 1994 +0000
+++ b/src/data.c	Mon Aug 01 22:28:26 1994 +0000
@@ -556,7 +556,7 @@
 			     Vautoload_queue);
   XSYMBOL (sym)->function = newdef;
   /* Handle automatic advice activation */
-  if (!NILP (Fget (sym, Qadvice_info)))
+  if (CONSP (XSYMBOL (sym)->plist) && !NILP (Fget (sym, Qadvice_info)))
     {
       call2 (Qactivate_advice, sym, Fbyte_code_function_p (newdef));
       newdef = XSYMBOL (sym)->function;