Hello when I am writing stuff in a .cpp file, emacs is using the cc mode by default? correct in the mode line I have (C++/ah Abbrev Fill). If I have stuff in my .emacs, does that cancel the default cc mode or adds to it?
not before I study emacs and Lisp in more details will I be able to answer my question. so here is my .emacs .......... many thanks (load "~/.emacs-mc394") ;; This defines the mc304-style. We put it in a ;; load file so that we can use it or not, as needed (add-hook 'octave-mode-hook '(lambda () (local-set-key [f9] 'octave-send-line))) (add-hook 'c++-mode-hook '(lambda () (turn-on-auto-fill) ;;Insert a newline if line gets to long. (c-toggle-auto-state 1) ;;Make ; and { and } and : all electric (c-set-style "mc394-style"))) ;; Color highlighting stuff (defvar xemacs-p (string-match "XEmacs" emacs-version)) (if (not xemacs-p) (progn (global-font-lock-mode t) ; If using global-font-lock-mode, make control-L update colors (global-set-key "\C-l" (function (lambda (arg) (interactive "P") (font-lock-fontify-block 100) (recenter arg)))))) (setq auto-mode-alist (append '(("\\.h$" . c++-mode)) auto-mode-alist)) (setq auto-mode-alist (append '( ("configure.in" . m4-mode) ("\\.m4\\'" . m4-mode) ("\\.am\\'" . makefile-mode)) auto-mode-alist)) (defun other-window-backward (&optional n) "Select Nth previous window" (interactive "P") (other-window (- (prefix-numeric-value n)))) (global-set-key "\C-x\C-p" 'other-window-backward) (windmove-default-keybindings) (global-set-key [f5] 'cut-ctrlM) ; cut all ^M. (defun cut-ctrlM () "Cut all visible ^M." (interactive) (beginning-of-buffer) (while (search-forward "\r" nil t) (replace-match "" nil t)) ) (global-set-key [f6] 'setnu-mode) ;set-number use twice after C-y (global-set-key "\C-x\C-b" 'buffer-menu) ;binds the key C-x C-b to buffer-menu (global-set-key [f7] (kbd "M-h C-c C-c")) ;comment region (global-set-key [f8] (kbd "M-h C-u C-c C-c")) ;uncomment region (global-set-key [f11] 'compile) ;compiles a program (global-set-key [f12] 'clipboard-kill-ring-save);copy marked region to Primary Selection, M-w copies to Clipboard, middle mouse botton to paste Primary, M-y pastes the clipboard contents (setq user-full-name "Baloff") (setq user-mail-address "[EMAIL PROTECTED]") (setq fill-column 70) ;Text lines limited to 70 chars (setq make-backup-files nil) ;don't make backup files (setq kill-whole-line t) ;killing line also deletes \n (setq next-line-add-newlines nil) ;down arror won't add \n at end (setq line-number-mode t) ;put line number in display (setq column-number-mode t) ;put column number in display (setq inhibit-startup-message t) ;disable startup message (setq display-time-24hr-format t) ;display 24h time formate (display-time) (setq transient-mark-mode t) ;highlight marked (setq default-major-mode 'text-mode) ;new buffers are text mode (add-hook 'text-mode-hook 'turn-on-auto-fill) ;line limit in text mode (add-hook 'text-mode-hook 'flyspell-mode t) ; check spelling (add-hook 'text-mode-hook 'text-mode-hook-identify) (setq scroll-step 1) ;scroll 1 line at a time (setq-default visible-bell t) ; no beeps, flash on errors (setq semantic-load-turn-useful-things-on t) ;; Replace the path below with the install location. (load-file "/usr/share/emacs/site-lisp/cedet-common/cedet.el") (setq semanticdb-project-roots (list "/Exercies/ThinkingInC++/Vol1/C03/9/main.cpp" "/Exercies/ThinkingInC++/Vol1/C03/8/main.cpp" "/Exercies/ThinkingInC++/Vol1/C03/7/main.cpp" "/Exercies/ThinkingInC++/Vol1/C03/6/main.cpp")) (add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on);ls not show ^[[0m (add-hook 'comint-output-filter-functions 'comint-watch-for-password-prompt) ;don't show password (defun htv-horizontal-to-vertical () ;makes a vertical split along the horisontal line (interactive) (let ((one-buf (window-buffer (selected-window))) (buf-point (point))) (other-window 1) (delete-other-windows) (split-window-horizontally) (switch-to-buffer one-buf) (goto-char buf-point))) (defun vth-vertical-to-horizontal () ;makes a vertical split along the horisontal line (interactive) (let ((one-buf (window-buffer (selected-window))) (buf-point (point))) (other-window 1) (delete-other-windows) (split-window-vertically) (switch-to-buffer one-buf) (goto-char buf-point))) (add-hook 'c++-mode-hook 'setnu-mode) ;line numbers (add-hook 'c++-mode-hook 'bar-cursor-mode) ;cursor to a bar (add-hook 'c++-mode-hook 'show-paren-mode) ;marrying brackets show (require 'xcscope) ;"$man cscope" for more info (custom-set-variables ;; custom-set-variables was added by Custom -- don't edit or cut/paste it! ;; Your init file should contain only one such instance. '(ecb-options-version "2.27")) (custom-set-faces ;; custom-set-faces was added by Custom -- don't edit or cut/paste it! ;; Your init file should contain only one such instance. ) ;; Modified by Mike Hvidsten from MC38J emacs file ;; Feb. 4, 2004 (c-add-style "mc394-style" '("cc-mode" (c-basic-offset . 3) ; In general, indent 3 spaces (c-hanging-braces-alist (defun-open after)) ; brace that opens a function definition (c-cleanup-list brace-else-brace brace-elseif-brace empty-defun-braces defun-close-semi scope-operator) (c-hanging-braces-alist ; These determine whether a newline appears before ; and/or after a brace in various situations. (brace-list-open) (block-open after) ; statement block open brace (defun-open after) ; brace that opens a function definition (substatement-open after); the brace that opens a substatement block (block-close . c-snug-do-while)) (c-hanging-colons-alist (access-label after)) ; Newline after protected: or private: (c-hungry-delete-key t))) ; delete black space all at once ;; Variable should be t if we are running xemacs. (defvar xemacs-p (string-match "XEmacs" emacs-version)) (if (not xemacs-p) (progn (global-font-lock-mode t) ; If using global-font-lock-mode, make control-L update colors (global-set-key "\C-l" (function (lambda (arg) (interactive "P") (font-lock-fontify-block 100) (recenter arg)))))) (setq auto-mode-alist (append '(("\\.h$" . c++-mode)) auto-mode-alist)) _______________________________________________ Help-gnu-emacs mailing list Help-gnu-emacs@gnu.org http://lists.gnu.org/mailman/listinfo/help-gnu-emacs