(defstruct): Set 'doc-string-elt property.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d3f7c9e175c9c80e8926e81a1efc109fd4542454..120457322ef9313dc5eee09f7d2e332a0fb17dd8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-06-07  David McCabe  <davemccabe@gmail.com>  (tiny change)
+
+       * emacs-lisp/lisp-mode.el (defstruct): Set 'doc-string-elt property.
+
 2005-06-06  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * international/iso-cvt.el (iso-sgml2iso-trans-tab): Add NBSP.

diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index bb815481bf005b7f445d4e63d11967de6ed7de1f..729244171091becd5ec71ece97c73e9c364d529a 100644 (file)
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -129,6 +129,7 @@
 (put 'defmacro 'doc-string-elt 3)
 (put 'defmacro* 'doc-string-elt 3)
 (put 'defsubst 'doc-string-elt 3)
+(put 'defstruct 'doc-string-elt 2)
 (put 'define-skeleton 'doc-string-elt 2)
 (put 'define-derived-mode 'doc-string-elt 4)
 (put 'define-compilation-mode 'doc-string-elt 3)
@@ -194,7 +195,7 @@
   (setq comment-start-skip "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\);+ *")
   (make-local-variable 'font-lock-comment-start-skip)
   ;; Font lock mode uses this only when it KNOWS a comment is starting.
-  (setq font-lock-comment-start-skip ";+ *") 
+  (setq font-lock-comment-start-skip ";+ *")
   (make-local-variable 'comment-add)
   (setq comment-add 1)                 ;default to `;;' in comment-region
   (make-local-variable 'comment-column)