-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path.emacs.elc
41 lines (37 loc) · 11.1 KB
/
.emacs.elc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
;ELC
;;; Compiled by on Sat Sep 27 19:37:47 2014
;;; from file /home/shant/.emacs.d/.emacs.el
;;; in Emacs version 24.3.1
;;; with all optimizations.
;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
(< (aref emacs-version (1- (length emacs-version))) ?A)
(string-lessp emacs-version "23")
(error "`%s' was compiled for Emacs 23 or later" #$))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\306\307\310\"\210\311\312\313\314#\204 r\315\316!q\210db\210\317 \210)\306\320\321\"\210\312\322!\210\311\323!\210\306\324\325\326#\210\327 \210\330\331!\210\332\333!\210\313\334\326\335\326!\210\336\337\326\"\210\340\326!\210\341\326!\210\342\336\343\313\"\210\344\345\346\"\210\347\350!\210\351\352\353\"\210\351\354\355\"\210\351\356\357\"\210\360\356\350\"\210\360\361\362\"\210\326\211\363@\364\313\365\"\210\366\367M\210\370\333!\210\326!\371A\326B\372\373\374\"\210\372\375\374\"\210\306\307\376\"\210\311\377!\210\201C \210\201D \201E \201F \201G \313$\210\201H \201E \326\"\207" [make-backup-files backup-directory-alist delete-auto-save-files standard-indent inhibit-startup-message require-final-newline add-to-list load-path "~/.emacs.d/el-get/el-get" require el-get nil noerror url-retrieve-synchronously "https://raw.github.com/dimitri/el-get/master/el-get-install.el" eval-print-last-sexp el-get-recipe-path "~/.emacs.d/el-get-user/recipes" sync package package-archives ("melpa" . "http://melpa.milkbox.net/packages/") t package-initialize load-library "paren" show-paren-mode 1 (("." . "~/.saves")) global-font-lock-mode set-default indicate-empty-lines transient-mark-mode column-number-mode 2 indent-tabs-mode global-set-key "\240" hippie-expand set-cursor-color "Red" set-face-background region "#26d840" show-paren-match-face "Blue" show-paren-mismatch-face "Magenta" set-face-foreground highlight "yellow" "%S: %f" modify-frame-parameters ((wait-for-wm)) yes-or-no-p y-or-n-p icomplete-mode ((format "[%s:%s]-[%s/%s/%s] " 24-hours minutes day month year)) add-hook save-buffer-hook delete-trailing-whitespace before-save-hook "~/.emacs.d/autopair" autopair frame-title-format display-time-string-forms scroll-preserve-screen-position autopair-global-mode ad-add-advice kill-region (slick-cut nil t (advice lambda nil "When called interactively with no active region, kill a single\nline instead." (interactive (if mark-active (list (region-beginning) (region-end)) (list (line-beginning-position) (line-beginning-position 2)))))) before ad-activate] 6)
#@35 comment or uncomment current line
(defalias 'toggle-comment-on-line #[nil "\300\301 \302 \"\207" [comment-or-uncomment-region line-beginning-position line-end-position] 3 (#$ . 2587) nil])
(byte-code "\306\307\310\"\210\306\311\312\"\210\306\313\314\"\210\306\315\316\"\210\306\317\320\"\210\321\322!\210\323\324\325!\210\326\327!\210\330\331\332\333\211\334'\335(\336\211)*\336+\337,\333-\336.\340\341\342\"\210\343\344\345\"\210\324\346!\207" [initial-scratch-message ido-save-directory-list-file ido-ignore-buffers ido-work-directory-list ido-case-fold ido-enable-last-directory-history global-set-key "g" goto-line "c" comment-or-uncomment-region "v" toggle-comment-on-line "" comment-box "" " \367" windmove-default-keybindings meta "⌬ keymetrics.io pimped emacs" require ido ido-mode both "~/.emacs.d/cache/ido.last" ("\\` " "^*Mess" "^*Back" ".*Completion" "^*Ido" "^*trace" "^*compilation" "^*GTAGS" "^session.*" "^*") ("~/" "~/Desktop" "~/Documents" "~src") t 30 50 nil 8 add-hook ido-minibuffer-setup-hook #[nil "\301\300!\210\302\211\207" [resize-minibuffer-window-max-height make-local-variable 1] 2] add-to-list load-path "~/.emacs.d/" nginx-mode ido-max-work-directory-list ido-max-work-file-list ido-use-filename-at-point ido-use-url-at-point ido-enable-flex-matching ido-max-prospects ido-confirm-unique-completion confirm-nonexistent-file-or-buffer] 4)
#@62 Pops up a shell-buffer and insert a "cd <file-dir>" command.
(autoload 'shell-toggle-cd "~/.emacs.d/shell-toggle.el" '(#$ . 3990) t)
(byte-code "\302\303!\210\304B\305 B\302\207" [auto-mode-alist interpreter-mode-alist require python-mode ("\\.py$" . python-mode) ("python" . python-mode)] 2)
#@22 Python editing mode.
(autoload 'python-mode "python-mode" '(#$ . 4292))
(byte-code "\306\307\310\"\210\306\311\312\"\210\313\314\315\"\210\316\317!\210\313\320\321\"\210\313\320\322\"\210\306\323\324\"\210\313\325\326\"\210\313\320\327\"\210\306\330\331\"\210\332\333\334\"\210\332\335\336\"\210\332\337\340\"\210\332\337\341\"\210\342\313\314\343\344!\"\210\316\345!\210\313\314\343\346!\"\210\316\347!\210\313\314\343\350!\"\210\316\351!\210\316\352!\210\313\320\353\"\210\313\320\354\"\210\313\320\355\"\210\313\314\343\356!\"\210\316\357!\210\313\320\360\"\210\313\320\361\"\210\313\314\343\362!\"\210\316\363!\210\313\320\364\"\210\365\366\367\"\210\365\370\371\"\210\365\372\373\"\210\365\374\375\"\210\376\377!\203\300 \377\201F !\210\376\201G !\203\320 \201G \201F !\210\376\201H !\203\340 \201H \201F !\210\316\201I !\210\201J \342!\210\201K \201L \201M \"\210\316\201N !\210\342\211\342\201O \201P \342@\201Q \211AB\201O C\342D\201O E\365\201R \201S \"\207" [js2-use-font-lock-faces speedbar-hide-button-brackets-flag speedbar-show-unknown-files speedbar-smart-directory-expand-flag speedbar-use-images speedbar-indentation-width add-hook css-mode-hook (lambda nil (local-set-key (kbd "RET") 'newline-and-indent)) html-mode-hook (lambda nil (local-set-key (kbd "RET") 'newline-and-indent)) add-to-list load-path "~/.emacs.d/js2-mode" require js2-mode auto-mode-alist ("\\.ejs$" . html-mode) ("\\.js$" . js2-mode) js-mode-hook js2-minor-mode interpreter-mode-alist ("node" . js2-mode) ("\\.json$" . js2-mode) js2-mode-hook (lambda nil (local-set-key (kbd "RET") 'newline-and-indent)) eval-after-load "autopair-autoloads" (progn (require 'autopair)) "autopair" (progn (autopair-global-mode 1) (setq my-autopair-off-modes 'nil) (dolist (m my-autopair-off-modes) (add-hook (intern (concat (symbol-name m) "-hook")) #'(lambda nil (setq autopair-dont-activate t))))) "js2-mode" (progn (if (and (boundp 'my-autopair-off-modes) (not (memq 'js2-mode my-autopair-off-modes))) (setq js2-mirror-mode nil))) (progn (setq js2-missing-semi-one-line-override t) (setq-default js2-basic-offset 2) (defun my-add-jslint-declarations nil (when (> (buffer-size) 0) (let ((btext (replace-regexp-in-string (rx ":" (* " ") "true") " " (replace-regexp-in-string (rx (+ (char "\n "))) " " (save-restriction (widen) (buffer-substring-no-properties (point-min) (min (1+ 1000) (point-max)))) t t)))) (mapc (apply-partially 'add-to-list 'js2-additional-externs) (split-string (if (string-match (rx "/*" (* " ") "global" (* " ") (group (*\? nonl)) (* " ") "*/") btext) (match-string-no-properties 1 btext) "") (rx (* " ") "," (* " ")) t))))) (add-hook 'js2-post-parse-callbacks 'my-add-jslint-declarations)) t expand-file-name "~/.emacs.d/rhtml-minor-mode" rhtml-mode "~/.emacs.d/yaml-mode" yaml-mode "~/.emacs.d/haml-mode" haml-mode web-mode ("\\.hbs$" . web-mode) ("\\.scss$" . css-mode) ("\\.css$" . css-mode) "~/.emacs.d/markdown-mode" markdown-mode ("\\.md$" . markdown-mode) ("\\.markdown$" . markdown-mode) "~/.emacs.d/coffee-mode" coffee-mode ("\\.coffee$" . coffee-mode) global-set-key [f5] shrink-window-horizontally [f6] enlarge-window-horizontally [f7] shrink-window [f8] enlarge-window fboundp scroll-bar-mode speedbar-update-flag sr-speedbar-width sr-speedbar-width-x sr-speedbar-auto-refresh sr-speedbar-skip-other-window-p sr-speedbar-right-side -1 tool-bar-mode menu-bar-mode highlight-current-line highlight-current-line-on set-face-background highlight-current-line-face "#010101" sr-speedbar nil 2 35 "p" sr-speedbar-toggle] 5)
(defvar last-selected-window (selected-window))
(byte-code "\300\301\302\303\304$\210\305\301\304\"\207" [ad-add-advice select-window (remember-selected-window nil t (advice lambda nil "Remember the last selected window." (unless (eq (selected-window) sr-speedbar-window) (setq last-selected-window (selected-window))))) after nil ad-activate] 5)
#@59 Function that hooks `speedbar-before-visiting-file-hook'.
(defalias 'sr-speedbar-before-visiting-file-hook #[nil "\301!\207" [last-selected-window select-window] 2 (#$ . 8187)])
#@58 Function that hooks `speedbar-before-visiting-tag-hook'.
(defalias 'sr-speedbar-before-visiting-tag-hook #[nil "\301!\207" [last-selected-window select-window] 2 (#$ . 8372)])
#@52 Function that hooks `speedbar-visiting-file-hook'.
(defalias 'sr-speedbar-visiting-file-hook #[nil "\301!\207" [last-selected-window select-window] 2 (#$ . 8555)])
#@51 Function that hooks `speedbar-visiting-tag-hook'.
(defalias 'sr-speedbar-visiting-tag-hook #[nil "\301!\207" [last-selected-window select-window] 2 (#$ . 8726)])
(byte-code "\303\304\211\203 @\305\306\307BB!\210 A\211\204 *\310\311!\210\312\313\314\315\"\210\310\316!\210\317\320!\210\321\322\323\"\210\313\314\324\"\210\310\325!\210\310\326!\210\313\327\330\"\210\313\327\331\"\207" [command --dolist-tail-- uniquify-buffer-name-style (yank yank-pop) nil eval defadvice ((after indent-region activate) (and (not current-prefix-arg) (member major-mode '(emacs-lisp-mode lisp-mode clojure-mode scheme-mode haskell-mode ruby-mode rspec-mode python-mode c-mode c++-mode js2-mode css-mode html-mode objc-mode latex-mode plain-tex-mode)) (let ((mark-even-if-inactive transient-mark-mode)) (indent-region (region-beginning) (region-end) nil)))) require uniquify forward add-to-list load-path "~/.emacs.d/plugins/yasnippet" yasnippet yas-global-mode 1 custom-set-variables (max-lisp-eval-depth 5000) (max-specpdl-size 50000) "~/.emacs.d/jade-mode" sws-mode jade-mode auto-mode-alist ("\\.styl$" . sws-mode) ("\\.jade$" . jade-mode)] 5)
#@59 Align on a single equals sign (with a space either side).
(defalias 'my-align-single-equals #[nil "\300\301 \302 \303\304\305\306&\207" [align-regexp region-beginning region-end "\\(\\s-*\\) = " 1 0 nil] 7 (#$ . 9871) nil])
(byte-code "\302\303\304\"\210\305\306!\210\307\310\311\312\"\210\313\314\315\316\"\210\305\317!\210\305\320!\210\321\322\323\"\210\324\325\326\327\330$\210\331\325\330\"\210\332\333\334\"\210\305\335!\210\336\337!\210\340\341\342!\343\"\207" [inferior-js-program-command inferior-js-mode-hook global-set-key "a" my-align-single-equals require js-comint "node" add-hook js2-mode-hook (lambda nil (local-set-key "" 'js-send-last-sexp) (local-set-key "\230" 'js-send-last-sexp-and-go) (local-set-key "b" 'js-send-buffer) (local-set-key "" 'js-send-buffer-and-go) (local-set-key "l" 'js-load-file-and-go)) #[nil "\300 \210\301\302\303\"\207" [ansi-color-for-comint-mode-on add-to-list comint-preoutput-filter-functions #[(output) "\301\302\303#\207" [output replace-regexp-in-string "\\[[0-9]+[GK]" ""] 4]] 3] setenv "NODE_NO_READLINE" "1" flymake-cursor php-mode defalias pipe shell-command-on-region ad-add-advice save-buffers-kill-emacs (no-query-kill-emacs nil t (advice lambda nil "Prevent annoying \"Active processes exist\" query when you quit Emacs." (flet ((process-list nil)) ad-do-it))) around nil ad-activate set-default tab-width 2 dtrt-indent dtrt-indent-mode 1 byte-recompile-directory expand-file-name "~/.emacs.d" 0] 5)