diff options
| author | Luc Teirlinck | 2005-05-08 16:30:13 +0000 |
|---|---|---|
| committer | Luc Teirlinck | 2005-05-08 16:30:13 +0000 |
| commit | bd81fcf8dbeddcacf8efcdc8ea47ec2375b19001 (patch) | |
| tree | b614e7a27a5e7f1a462a5a8b6c068887433ed295 /src | |
| parent | 9f29e8065a14e5853eb094bd43c08e95f4752852 (diff) | |
| download | emacs-bd81fcf8dbeddcacf8efcdc8ea47ec2375b19001.tar.gz emacs-bd81fcf8dbeddcacf8efcdc8ea47ec2375b19001.zip | |
(Fdefvaralias): Remove any pre-existing variable-documentation
property of the alias.
Diffstat (limited to 'src')
| -rw-r--r-- | src/eval.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index 8b6c1885727..7f043daa555 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -747,6 +747,8 @@ The return value is ALIASED. */) | |||
| 747 | LOADHIST_ATTACH (symbol); | 747 | LOADHIST_ATTACH (symbol); |
| 748 | if (!NILP (docstring)) | 748 | if (!NILP (docstring)) |
| 749 | Fput (symbol, Qvariable_documentation, docstring); | 749 | Fput (symbol, Qvariable_documentation, docstring); |
| 750 | else | ||
| 751 | Fput (symbol, Qvariable_documentation, Qnil); | ||
| 750 | 752 | ||
| 751 | return aliased; | 753 | return aliased; |
| 752 | } | 754 | } |