# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1115569813 0
# Node ID 91b45e7531ea9ab1bb52e81e3be9c5775b9546df
# Parent  33a95bb3bfe68654be3292fb1226bf818035b5ba
(Fdefvaralias): Remove any pre-existing variable-documentation
property of the alias.

diff -r 33a95bb3bfe6 -r 91b45e7531ea src/eval.c
--- a/src/eval.c	Sun May 08 16:28:35 2005 +0000
+++ b/src/eval.c	Sun May 08 16:30:13 2005 +0000
@@ -747,6 +747,8 @@
   LOADHIST_ATTACH (symbol);
   if (!NILP (docstring))
     Fput (symbol, Qvariable_documentation, docstring);
+  else
+    Fput (symbol, Qvariable_documentation, Qnil);
 
   return aliased;
 }