From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 10 Aug 1995 20:31:27 +0000 (+0000)
Subject: Fix defvar equivalent expression.
X-Git-Tag: emacs-19.34~3039
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=25ef19c5f4c2955cf053379889ac584225146dc8;p=emacs.git

Fix defvar equivalent expression.
---

diff --git a/lispref/variables.texi b/lispref/variables.texi
index dbc922a8bd8..c3bd61541d8 100644
--- a/lispref/variables.texi
+++ b/lispref/variables.texi
@@ -484,7 +484,8 @@ Here is an equivalent expression for the @code{defvar} special form:
 (progn
   (if (not (boundp '@var{symbol}))
       (setq @var{symbol} @var{value}))
-  (put '@var{symbol} 'variable-documentation '@var{doc-string})
+  (if '@var{doc-string}
+    (put '@var{symbol} 'variable-documentation '@var{doc-string}))
   '@var{symbol})
 @end group
 @end example