diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-08-11 22:11:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-08-11 22:11:27 +0000 |
| commit | 611c76a75cd669317de0ae20d0101149cad38c02 (patch) | |
| tree | 17c81fd1f0b5160c7cb89c20723075f18ad2ccbd /lisp/progmodes/cc-mode.el | |
| parent | d278ad4fd2957232b1668d6d8be0302d8cc23b69 (diff) | |
| download | emacs-611c76a75cd669317de0ae20d0101149cad38c02.tar.gz | |
(c-initialize-cc-mode): Set c-buffer-is-cc-mode to t.
(c-initialize-cc-mode): Require 'cc-mode-19
if functionp is not bound. Check cc-mode-19 interface requirements.
(c-mode, c++-mode, objc-mode, java-mode, idl-mode):
Don't set comment-multi-line here.
(c-mode): c-comment-start-regexp uses
c-C++-comment-start-regexp to support line oriented comments.
Diffstat (limited to 'lisp/progmodes/cc-mode.el')
| -rw-r--r-- | lisp/progmodes/cc-mode.el | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el index 2474b68857a..cd38565480b 100644 --- a/lisp/progmodes/cc-mode.el +++ b/lisp/progmodes/cc-mode.el @@ -7,7 +7,7 @@ ;; 1985 Richard M. Stallman ;; Maintainer: cc-mode-help@python.org ;; Created: a long, long, time ago. adapted from the original c-mode.el -;; Version: 5.14 +;; Version: 5.15 ;; Keywords: c languages oop ;; NOTE: Read the commentary below for the right way to submit bug reports! @@ -91,6 +91,13 @@ ;;;###autoload (defun c-initialize-cc-mode () + (setq c-buffer-is-cc-mode t) + ;; sigh. give in to the pressure, but make really sure all the + ;; definitions we need are here + (if (or (not (fboundp 'functionp)) + (not (fboundp 'char-before)) + (not (c-safe (char-after) t))) + (require 'cc-mode-19)) ;; make sure all necessary components of CC Mode are loaded in. (let ((initprop 'cc-mode-is-initialized)) (require 'cc-vars) @@ -136,11 +143,10 @@ Key bindings: (c-common-init) (setq comment-start "/* " comment-end " */" - comment-multi-line t c-conditional-key c-C-conditional-key c-class-key c-C-class-key c-baseclass-key nil - c-comment-start-regexp c-C-comment-start-regexp + c-comment-start-regexp c-C++-comment-start-regexp imenu-generic-expression cc-imenu-c-generic-expression) (run-hooks 'c-mode-common-hook) (run-hooks 'c-mode-hook) @@ -175,7 +181,6 @@ Key bindings: (c-common-init) (setq comment-start "// " comment-end "" - comment-multi-line nil c-conditional-key c-C++-conditional-key c-comment-start-regexp c-C++-comment-start-regexp c-class-key c-C++-class-key @@ -216,7 +221,6 @@ Key bindings: (c-common-init) (setq comment-start "// " comment-end "" - comment-multi-line nil c-conditional-key c-C-conditional-key c-comment-start-regexp c-C++-comment-start-regexp c-class-key c-ObjC-class-key @@ -259,7 +263,6 @@ Key bindings: (c-common-init) (setq comment-start "// " comment-end "" - comment-multi-line nil c-conditional-key c-Java-conditional-key c-comment-start-regexp c-Java-comment-start-regexp c-class-key c-Java-class-key @@ -305,7 +308,6 @@ Key bindings: (c-common-init) (setq comment-start "// " comment-end "" - comment-multi-line nil c-conditional-key c-C++-conditional-key c-comment-start-regexp c-C++-comment-start-regexp c-class-key c-C++-class-key @@ -319,7 +321,7 @@ Key bindings: ;; defuns for submitting bug reports -(defconst c-version "5.14" +(defconst c-version "5.15" "CC Mode version number.") (defconst c-mode-help-address |