# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 775780106 0
# Node ID ec05bbe4ef1ce45c389828f0676356bea8bb4e4f
# Parent  8a8d2cdd42185ee99e079815401643810233e5ac
(Ffset): Don't call Fget unless SYM's plist is consp.

diff -r 8a8d2cdd4218 -r ec05bbe4ef1c src/data.c
--- 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;