Download
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
(prefer-coding-system 'utf-8)
(require 'dired-x)
(defalias 'perl-mode 'cperl-mode)
(setq visible-bell t
dired-dwim-target t)
(auto-compression-mode 1)
(column-number-mode 1)
(show-paren-mode 1)
(global-font-lock-mode 1)
(iswitchb-mode 1)
(server-start)
(add-to-list 'load-path "~/elisp")
(add-to-list 'auto-mode-alist '("\\.css$" . css-mode))
(autoload 'css-mode "css-mode" "Mode for editing CSS files" t)
(setq backup-by-copying t)
(put 'erase-buffer 'disabled nil)
(eldoc-mode 1)
(global-set-key (kbd "<f2>") 'occur)
(global-set-key (kbd "<f3>") 'comment-region)
(global-set-key (kbd "<f4>") 'indent-region)
(global-set-key (kbd "<f5>") 'dabbrev-expand)
(setq dired-recursive-copies 'always
dired-recursive-deletes 'top)
(global-set-key (kbd "C-x C-b") 'bs-show)
(add-to-list 'auto-mode-alist '("\\.py$" . python-mode))
(add-to-list 'interpreter-mode-alist '("python" . python-mode))
(autoload 'python-mode "python-mode" nil t)
(require 'session)
(add-hook 'after-init-hook 'session-initialize)
(define-generic-mode 'htaccess-mode
'(?#)
'(
"AcceptPathInfo" "AccessFileName" "AddDefaultCharset" "AddOutputFilterByType"
"AllowEncodedSlashes" "AllowOverride" "AuthName" "AuthType"
"CGIMapExtension" "ContentDigest" "DefaultType" "DocumentRoot"
"EnableMMAP" "EnableSendfile" "ErrorDocument" "ErrorLog"
"FileETag" "ForceType" "HostnameLookups" "IdentityCheck"
"Include" "KeepAlive" "KeepAliveTimeout" "LimitInternalRecursion"
"LimitRequestBody" "LimitRequestFields" "LimitRequestFieldSize" "LimitRequestLine"
"LimitXMLRequestBody" "LogLevel" "MaxKeepAliveRequests" "NameVirtualHost"
"Options" "Require" "RLimitCPU" "RLimitMEM"
"RLimitNPROC" "Satisfy" "ScriptInterpreterSource" "ServerAdmin"
"ServerAlias" "ServerName" "ServerPath" "ServerRoot"
"ServerSignature" "ServerTokens" "SetHandler" "SetInputFilter"
"SetOutputFilter" "TimeOut" "UseCanonicalName"
"AddHandler" "AuthUserFile" "AuthGroupFile"
"RewriteBase" "RewriteCond" "RewriteEngine" "RewriteLock" "RewriteLog"
"RewriteLogLevel" "RewriteMap" "RewriteOptions" "RewriteRule"
"Alias" "AliasMatch" "Redirect" "RedirectMatch" "RedirectPermanent"
"RedirectTemp" "ScriptAlias" "ScriptAliasMatch")
'(("%{\\([A-Z_]+\\)}" 1 font-lock-variable-name-face)
("\\b[0-9][0-9][0-9]\\b" . font-lock-constant-face)
("\\[.*\\]" . font-lock-type-face))
'(".htaccess\\'")
nil
"Generic mode for Apache .htaccess files.")
(recentf-mode 1)
(global-set-key (kbd "C-c f") 'recentf-open-files)
(global-set-key (kbd "C-z") 'eshell)
(setq eshell-save-history-on-exit t)
(add-hook 'eshell-mode-hook
(lambda ()
(local-set-key (kbd "C-z") 'bury-buffer)
(local-set-key (kbd "C-a") 'eshell-bol)
(local-set-key (kbd "<up>") 'previous-line)
(local-set-key (kbd "<down>") 'next-line)))
(defalias 'eshell/emacs 'find-file)
(defun eshell/dired () (dired (eshell/pwd)))
(defun eshell/fg () (bury-buffer))
(autoload 'eshell-here "eshell" nil t)
(require 'wdired)
(define-key dired-mode-map (kbd "C-c C-r") 'wdired-change-to-wdired-mode)
(put 'narrow-to-region 'disabled nil)
(autoload 'rcirc "rcirc" nil t)
(global-set-key (kbd "<deletechar>") 'backward-delete-char)
(global-set-key (kbd "ESC <deletechar>") 'backward-kill-word)
(set-face-foreground 'diff-context-face "grey60")