From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Baloff Newsgroups: gmane.emacs.help Subject: using the cc mode Date: 31 Jul 2005 05:29:34 +1000 Organization: iPrimus Customer - reports relating to abuse should be sent to abuse@iprimus.com.au Message-ID: <87ek9gqeht.fsf@wash.edu> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1122750768 13013 80.91.229.2 (30 Jul 2005 19:12:48 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 30 Jul 2005 19:12:48 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Jul 30 21:12:41 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1DywlD-0006UH-ES for geh-help-gnu-emacs@m.gmane.org; Sat, 30 Jul 2005 21:12:39 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Dywnm-0004F3-7E for geh-help-gnu-emacs@m.gmane.org; Sat, 30 Jul 2005 15:15:18 -0400 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!headwall.stanford.edu!newshub.sdsu.edu!feeder1.nntp.dca.giganews.com!border1.nntp.dca.giganews.com!news1.optus.net.au!optus!newsfeed.pacific.net.au!token.pipenetworks.com!218.100.2.58.MISMATCH!not-for-mail Original-Newsgroups: gnu.emacs.help User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.4 X-Original-NNTP-Posting-Host: 210.50.67.167 X-Original-NNTP-Posting-Host: 127.0.0.1 Original-Lines: 177 Original-NNTP-Posting-Host: 203.134.67.67 Original-X-Trace: 1122750598 un-2park-reader-02.sydney.pipenetworks.com.au 448 203.134.67.67:1042 Original-X-Complaints-To: Abuse, including message IDs to abuse@pipenetworks.com Original-Xref: shelby.stanford.edu gnu.emacs.help:132766 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:28290 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:28290 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 "washdc@wash.edu") (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))