]> git.eshelyaron.com Git - emacs.git/commitdiff
(Ffset): Don't call Fget unless SYM's plist is consp.
authorRoland McGrath <roland@gnu.org>
Mon, 1 Aug 1994 22:28:26 +0000 (22:28 +0000)
committerRoland McGrath <roland@gnu.org>
Mon, 1 Aug 1994 22:28:26 +0000 (22:28 +0000)
src/data.c

index c87ec249d5b7d021e8f418ca9d51b43887a7608f..e00ab4dc5f8a7b4686ac7421349f6277f3ee8fc4 100644 (file)
@@ -556,7 +556,7 @@ DEFUN ("fset", Ffset, Sfset, 2, 2, 0,
                             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;