changeset 19805:e804ac04eec1

(c-mode-base-map): Don't define C-c C-e here. (c-mode-map, c++-mode-map): Define C-c C-e here. (objc-mode-map): Define C-c C-e, not /. (java-mode-map, idl-mode-map): Don't define /.
author Richard M. Stallman <rms@gnu.org>
date Mon, 08 Sep 1997 03:20:17 +0000
parents 37e25ff5a7f1
children dc7a5df6e4b9
files lisp/progmodes/cc-langs.el
diffstat 1 files changed, 10 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/cc-langs.el	Mon Sep 08 03:20:02 1997 +0000
+++ b/lisp/progmodes/cc-langs.el	Mon Sep 08 03:20:17 1997 +0000
@@ -7,7 +7,7 @@
 ;;             1985 Richard M. Stallman
 ;; Maintainer: cc-mode-help@python.org
 ;; Created:    22-Apr-1997 (split from cc-mode.el)
-;; Version:    5.16
+;; Version:    5.17
 ;; Keywords:   c languages oop
 
 ;; This file is part of GNU Emacs.
@@ -375,7 +375,6 @@
   (define-key c-mode-base-map "\C-c\C-b"  'c-submit-bug-report)
   (define-key c-mode-base-map "\C-c\C-c"  'comment-region)
   (define-key c-mode-base-map "\C-c\C-d"  'c-toggle-hungry-state)
-  (define-key c-mode-base-map "\C-c\C-e"  'c-macro-expand)
   (define-key c-mode-base-map "\C-c\C-o"  'c-set-offset)
   (define-key c-mode-base-map "\C-c\C-s"  'c-show-syntactic-information)
   (define-key c-mode-base-map "\C-c\C-t"  'c-toggle-auto-hungry-state)
@@ -429,6 +428,7 @@
     nil
   (setq c-mode-map (c-make-inherited-keymap))
   ;; add bindings which are only useful for C
+  (define-key c-mode-map "\C-c\C-e"  'c-macro-expand)
   )
 
 ;;;###autoload
@@ -455,9 +455,10 @@
     nil
   (setq c++-mode-map (c-make-inherited-keymap))
   ;; add bindings which are only useful for C++
-  (define-key c++-mode-map "\C-c:"  'c-scope-operator)
-  (define-key c++-mode-map "<"      'c-electric-lt-gt)
-  (define-key c++-mode-map ">"      'c-electric-lt-gt))
+  (define-key c++-mode-map "\C-c\C-e" 'c-macro-expand)
+  (define-key c++-mode-map "\C-c:"    'c-scope-operator)
+  (define-key c++-mode-map "<"        'c-electric-lt-gt)
+  (define-key c++-mode-map ">"        'c-electric-lt-gt))
 
 ;;;###autoload
 (defvar c++-mode-syntax-table nil
@@ -491,7 +492,7 @@
     nil
   (setq objc-mode-map (c-make-inherited-keymap))
   ;; add bindings which are only useful for Objective-C
-  (define-key objc-mode-map "/"      'c-electric-slash))
+  (define-key objc-mode-map "\C-c\C-e" 'c-macro-expand))
 
 ;;;###autoload
 (defvar objc-mode-syntax-table nil
@@ -519,7 +520,7 @@
     nil
   (setq java-mode-map (c-make-inherited-keymap))
   ;; add bindings which are only useful for Java
-  (define-key java-mode-map "/"      'c-electric-slash))
+  )
 
 ;;;###autoload
 (defvar java-mode-syntax-table nil
@@ -544,8 +545,8 @@
 (if idl-mode-map
     nil
   (setq idl-mode-map (c-make-inherited-keymap))
-  ;; additional bindings
-  (define-key idl-mode-map "/" 'c-electric-slash))
+  ;; add bindings which are only useful for IDL
+  )
 
 ;;;###autoload
 (defvar idl-mode-syntax-table nil