From d6c3fad2282acfa78fa26a76ae43ba7ef78cf211 Mon Sep 17 00:00:00 2001 From: Serguei Chmod777 Date: Thu, 14 Apr 2016 08:12:40 +0200 Subject: [PATCH] new file: .emacs --- .emacs | 69 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 69 insertions(+) create mode 100644 .emacs diff --git a/.emacs b/.emacs new file mode 100644 index 0000000..a081d31 --- /dev/null +++ b/.emacs @@ -0,0 +1,69 @@ +;; Some bascis, necessary for a good working Emacs : +;; (Extracted from Pr. Paul Garrett's .emacs) + + +(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. + '(case-fold-search t) + '(column-number-mode 1) + '(line-number-mode 1) + '(current-language-environment "English") + '(default-input-method "rfc1345") + '(global-font-lock-mode t nil (font-lock)) + '(setq show-paren-delay t) + '(show-paren-mode t nil (paren)) + '(tab-width 4) + '(transient-mark-mode 1)) + + + +(defun good-colors () + (progn + (set-background-color "DimGray") + (set-foreground-color "LightGray") + (set-cursor-color "DarkSlateBlue") + (set-border-color "DimGray") + (set-mouse-color "DarkSlateBlue") + + (set-face-background 'default "DimGray") + (set-face-background 'region "DarkSlateGray") + (set-face-background 'highlight "DarkSlateBlue") + (set-face-background 'modeline "DarkSlateBlue") ;;; CornflowerBlue") + + (set-face-foreground 'default "LightGray") + (set-face-foreground 'region "Ivory") + (set-face-foreground 'highlight "LightGray") ;;; DimGray") + (set-face-foreground 'modeline "LightGray") + )) + +(good-colors) ;; calls the previously-defined function + +;; Set default window size at start : + +(add-to-list 'default-frame-alist '(height . 44)) + +(add-to-list 'default-frame-alist '(width . 82)) + +;; Some X environment colors and behavior : + +(setq default-major-mode 'text-mode) +(setq-default auto-fill-function 'do-auto-fill) +(add-hook 'text-mode-hook + 'turn-on-auto-fill + 'set-fill-column 94) + +;; Associate matlab source code to octave for syntax colors : + +(add-to-list + 'auto-mode-alist + '("\\.m$" . octave-mode)) + +;; Arudino syntax coloration : + +(add-to-list 'load-path "~/.emacs.d/vendor/arduino-mode") +(setq auto-mode-alist (cons '("\\.\\(pde\\|ino\\)$" . arduino-mode) + auto-mode-alist)) +(autoload 'arduino-mode "arduino-mode" "Arduino editing mode." 1) + +