# HG changeset patch
# User Thien-Thi Nguyen <ttn@gnuvola.org>
# Date 1094641754 0
# Node ID 5418c6e288fc50ab6976965893ca3ab3e89ae0ac
# Parent  fd1be95301bfda06c0334eb1048e0c1305dab8d6
(define-compilation-mode): Specify `doc-string-elt' property.

diff -r fd1be95301bf -r 5418c6e288fc lisp/emacs-lisp/lisp-mode.el
--- a/lisp/emacs-lisp/lisp-mode.el	Wed Sep 08 11:06:23 2004 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Wed Sep 08 11:09:14 2004 +0000
@@ -129,6 +129,7 @@
 (put 'defsubst 'doc-string-elt 3)
 (put 'define-skeleton 'doc-string-elt 2)
 (put 'define-derived-mode 'doc-string-elt 4)
+(put 'define-compilation-mode 'doc-string-elt 3)
 (put 'easy-mmode-define-minor-mode 'doc-string-elt 2)
 (put 'define-minor-mode 'doc-string-elt 2)
 (put 'define-generic-mode 'doc-string-elt 7)
@@ -489,7 +490,7 @@
 	 (and string
 	      (= (car (read-from-string string)) char)
 	      string))))
-	 
+
 
 (defun eval-last-sexp-1 (eval-last-sexp-arg-internal)
   "Evaluate sexp before point; print value in minibuffer.