mirrors
/
ambevar-dotfiles
mirror of https://gitlab.com/ambrevar/dotfiles/
1
0
Fork 0
Code Issues Releases Wiki Activity

*** empty log message ***

master
Pierre Neidhardt 2013-03-08 21:40:06 +01:00
parent 1b603a109a
commit 889e28d077
1 changed files with 11 additions and 46 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

57
.emacs.d/modes.el
View File

@ -7,62 +7,30 @@
;;============================================================================== ;;==============================================================================
;; rc files support ;; rc files support
(setq auto-mode-alist (setq auto-mode-alist (append '(("rc\\'" . sh-mode)) auto-mode-alist))
(append
'(("rc\\'" . sh-mode)
)
auto-mode-alist)
)
;; Shell support ;; Shell support
;; We do not put 'sh' only because it could get messy. Emacs knows it anyway. ;; We do not put 'sh' only because it could get messy. Emacs knows it anyway.
(setq auto-mode-alist (setq auto-mode-alist
(append (append
'(("\\(bash\\'\\|zsh\\'\\|csh\\'\\|tcsh\\'\\|ksh\\'\\)" . sh-mode) '(("\\(bash\\'\\|zsh\\'\\|csh\\'\\|tcsh\\'\\|ksh\\'\\)" . sh-mode))
) auto-mode-alist))
auto-mode-alist)
)
;; Read Matlab files in Octave mode. ;; Read Matlab files in Octave mode.
(setq auto-mode-alist (setq auto-mode-alist (append '(("\\.m\\'" . octave-mode)) auto-mode-alist))
(append
'(("\\.m\\'" . octave-mode)
)
auto-mode-alist)
)
;; Read pl files in prolog mode. ;; Read pl files in prolog mode.
;; WARNING: this extension is shared with Perl. ;; WARNING: this extension is shared with Perl.
(setq auto-mode-alist ;; (setq auto-mode-alist (append '(("\\.pl\\'" . prolog-mode)) auto-mode-alist))
(append
'(("\\.pl\\'" . prolog-mode)
)
auto-mode-alist)
)
;; Mutt support. ;; Mutt support.
(setq auto-mode-alist (setq auto-mode-alist (append '(("/tmp/mutt.*" . mail-mode)) auto-mode-alist))
(append
'(("/tmp/mutt.*" . mail-mode)
)
auto-mode-alist)
)
;; Arch Linux PKGBUILD ;; Arch Linux PKGBUILD
(setq auto-mode-alist (setq auto-mode-alist (append '(("PKGBUILD" . sh-mode)) auto-mode-alist))
(append
'(("PKGBUILD" . sh-mode)
)
auto-mode-alist)
)
;; README ;; README files.
(setq auto-mode-alist (setq auto-mode-alist (append '(("README" . text-mode)) auto-mode-alist))
(append
'(("README" . text-mode)
)
auto-mode-alist)
)
;;============================================================================== ;;==============================================================================
;; Auto-Insert ;; Auto-Insert
@ -409,13 +377,10 @@ properly escaped with double-quotes in case it has spaces."
(lambda () (lambda ()
(local-set-key (kbd "C-c C-c") 'c-compile) (local-set-key (kbd "C-c C-c") 'c-compile)
(local-set-key (kbd "M-TAB") 'semantic-complete-analyze-inline) (local-set-key (kbd "M-TAB") 'semantic-complete-analyze-inline)
(local-set-key "." 'semantic-complete-self-insert) ;; (local-set-key "." 'semantic-complete-self-insert) ; This is a bit slow.
(local-set-key ">" 'semantic-complete-self-insert) ;; (local-set-key ">" 'semantic-complete-self-insert)
(local-set-key (kbd "<f12>") 'next-error))) (local-set-key (kbd "<f12>") 'next-error)))
;; (defun my-c-mode-cedet-hook ()
;; (add-hook 'c-mode-common-hook 'my-c-mode-cedet-hook)
;;============================================================================== ;;==============================================================================
;; Common LISP ;; Common LISP
;;============================================================================== ;;==============================================================================