Dot Emacs Snippets

.emacs

(defun msg (arg)
  (message (format "%S" arg)))

(server-start)

(blink-cursor-mode 0)
(tool-bar-mode -1)
(setq column-number-mode t)
(show-paren-mode 1)
(setq-default blink-matching-paren nil)

backup.el

(defconst backup-directory "~/.emacs.d/backup"
  "Name of the backup directory.")
(setq backup-directory-alist
      `((".*" . ,backup-directory)))
(setq auto-save-file-name-transforms
      `((".*" ,backup-directory t)))

de_DE.el

(setq calendar-week-start-day 1
      calendar-day-name-array ["Sonntag" "Montag" "Dienstag" "Mittwoch"
                               "Donnerstag" "Freitag" "Samstag"]
      calendar-month-name-array ["Januar" "Februar" "März" "April" "Mai"
                                 "Juni" "Juli" "August" "September"
                                 "Oktober" "November" "Dezember"])

indentation.el

(setq-default indent-tabs-mode nil)

(setq-default c-basic-offset 2)
(setq-default perl-indent-level 2)
(setq-default js-indent-level 2)
(setq-default sh-basic-offset 2)
(setq-default sh-indentation 2)

load-path.el

(add-to-list 'load-path "~/.emacs.d/lisp/")

markdown.el

(autoload 'markdown-mode "markdown-mode"
  "Major mode for editing Markdown files" t)
(add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode))
(add-to-list 'auto-mode-alist '("README\\'" . markdown-mode))

tramp.el

(require 'tramp)
(require 'tramp-sh)
(setq password-cache-expiry nil)
(add-to-list 'tramp-remote-process-environment "TMOUT=")