(byte-compile-inline-expand):

[gnu-emacs] / lisp / generic.el

diff --git a/lisp/generic.el b/lisp/generic.el
index fd7117c3a789ee32b4ff1332aa2cb2cdf7ac0beb..407795541b6c8d1f9271190fc969603a67f4c0ce 100644 (file)
--- a/lisp/generic.el
+++ b/lisp/generic.el
@@ -224,7 +224,7 @@ to determine if files in fundamental mode should be put into
 ;; Functions
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-;;;### autoload
+;;;###autoload
 (defun define-generic-mode (name comment-list    keyword-list   font-lock-list 
                                 auto-mode-list  function-list  
                                 &optional description)
@@ -341,7 +341,7 @@ If DESCRIPTION is provided, it is used as the docstring."
      generic-keywords-list        (nth 2 generic-mode-list)
      generic-font-lock-expressions (nth 3 generic-mode-list)
      generic-mode-function-list           (nth 5 generic-mode-list)
-     major-mode                           'generic-mode
+     major-mode                           type
      mode-name                    (symbol-name type)
      )
 
@@ -581,7 +581,7 @@ The regexp is highlighted with FACE."
                "\\)\\>"
                (or suffix ""))
        1
-       face)))
+       face))
 
 (provide 'generic)