path: root/emacs.d/init.elc

;ELC
;;; Compiled by alexander@sulfrian.net on Mon Apr 14 20:24:22 2014
;;; from file /home/asulfrian/.dotfiles/emacs.d/init.el
;;; in Emacs version 23.2.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\306\307!\210\310\311\211\f\n\310B\312 \210\f
\244\210+\313\314!\203%\315\314\316\"\210\317\320\310\321#\203>\322 \2105\204;\323 \210\202>\324 \210\3256\3267\327\330\331\"\210\307\332\321\"\210\3338\3349\335:\336;\337\336!\210\340\336!\210\341\336!\210\342\336!\210\327\343\344\"\2105\204y\345\346\347\"\210\350<B<\351=\352>\351?\353@\307\354!\210\351\211AB\355\356M\210\310C\317\357!\210\360\351!\210\361\351!\210\351D\362\351!\210\351E\317\363!\210\364F\310\207" [custom-file warning-suppress-types my-lisp-dir default-directory load-path orig-load-path "~/.emacs.d/emacs-custom.el" load nil "~/.emacs.d/lisp" normal-top-level-add-subdirs-to-load-path boundp bidi-paragraph-direction set-default left-to-right require color-theme noerror color-theme-initialize color-theme-alex-console color-theme-alex "Alexander Sulfrian" "alexander@sulfrian.net" global-set-key [(f1)] #[nil "\300\301 !\207" [manual-entry current-word] 2 nil nil] "/usr/share/emacs/site-lisp/site-gentoo" turn-on-auto-fill 72 "~/.emacs.d/semantic" latin-1 set-terminal-coding-system set-keyboard-coding-system set-selection-coding-system prefer-coding-system [mouse-3] imenu mapc #[(map) "\303\304	\211A@)!\304	@!#\207" [function-key-map map x define-key read-kbd-macro] 6] (("<S-tab>" "M-[ Z") ("<S-up>" "<select>") ("<S-down>" "M-[ b") ("<S-right>" "M-[ c") ("<S-left>" "M-[ d") ("<M-up>" "ESC M-O A") ("<M-down>" "ESC M-O B") ("<M-right>" "ESC M-O C") ("<M-left>" "ESC M-O D") ("<C-up>" "M-O a") ("<C-down>" "M-O b") ("<C-right>" "M-O c") ("<C-left>" "M-O d") ("<C-M-up>" "ESC M-O a") ("<C-M-down>" "ESC M-O b") ("<C-M-right>" "ESC M-O c") ("<C-M-left>" "ESC M-O d") ("<M-S-up>" "ESC M-[ a") ("<M-S-down>" "ESC M-[ b") ("<M-S-right>" "ESC M-[ c") ("<M-S-left>" "ESC M-[ d")) ("README" . text-mode) t 4 cssm-c-style-indenter "delphi-mode-ench.el" yes-or-no-p y-or-n-p paren show-paren-mode global-font-lock-mode follow-mode uniquify reverse window-system user-full-name user-mail-address text-mode-hook fill-column semanticdb-default-save-directory locale-coding-system auto-mode-alist compilation-scroll-output cssm-indent-level cssm-newline-before-closing-bracket cssm-indent-function inhibit-startup-message require-final-newline next-line-add-newlines font-lock-maximum-decoration vc-follow-symlinks uniquify-buffer-name-style] 5)
(defalias 'back-to-indentation-or-beginning #[nil "`\300 \210`U\205\301 \207" [back-to-indentation beginning-of-line] 2 nil nil])
(byte-code "\305\306\307\"\210\310\311\312\313\314\"\210\315\316\317\"\210\305\320\321\"\210\322\n\323\324#\210\305\325\326\"\210\327\330\331\332#\2030\315\333\334\"\210\335\336\331\207" [indent-tabs-mode c-default-style esc-map ispell-program-name ispell-extra-args global-set-key [home] back-to-indentation-or-beginning t "linux" c-set-offset arglist-cont-nonempty (c-lineup-arglist-tabs-only c-lineup-gcc-asm-reg) add-hook c-mode-common-hook #[nil "\301\302 \210\303\304\305\"\210\306\307!\210\310\311\312\"\210\310\313\314\"\210\310\315\316\"\207" [fill-column 80 turn-on-auto-fill modify-syntax-entry 95 "w" c-set-style "linux" local-set-key [134217837] eassist-list-methods "" semantic-complete-jump-local "o" ff-find-other-file] 3] [C-return] dabbrev-expand define-key [C-return] dabbrev-completion [f12] indent-region require doxymacs nil noerror font-lock-mode-hook (lambda nil (if (or (eq major-mode 'c-mode) (eq major-mode 'c++-mode)) (doxymacs-font-lock))) "aspell" ("--sug-mode=ultra")] 4)
#@147 Dictionary name, that should be set during find-file for flyspell-mode.
If this is set during find-file, flyspell mode gets enabled automaticaly.
(defvar flyspell-dict nil (#$ . 4018))
(byte-code "\306\307!\210\310\311\312\313#\2039\314\315\316\"\210\317\320\315\"\210\310\321\312\313#\2039\322\323\324\"\210\322\325\326\"\210\322\327\330\"\210\331\332\333\334\312$\210\335\332\336\"\210\310\337\312\313#\210\310\340\312\313#\203X\336\312\341\342!C\343\344\345\"\210\346 \210\347\350\351\336\"\210\310\352!\210\353\354C\f\"\310\355!\210\356\336!\210\357\336@\312\211AB\336C\360D\312E\336F\310\361\312\313#\203\243\362\363!\203\236\363 \204\236\364 \210\322\365\366\"\210\310\367\312\313#\203\256\370 \210\371G\310\372\312\313#\203\301\373 \210\317\374\372\"\210\310\375\312\313#\203\322\376 \210\377\201_!\210\310\201`\312\313#\203\344\201aHBH\362\201b!\203\364\336I\201bJ\312K\201c\336!\210\331\201d\201e\201f\312$\210\335\201d\336\"\210\335\201d!\210\331\201g\201h\201f\312$\210\335\201g\336\"\210\335\201g!\210\201i\201j!\210\310\201k\312\313#\203U
\317\201l\201m\"\210\322\201n\201o\"\210\310\201p\312\313#\203o
\322\327\201q\"\210\322\201r\201s\"\210\201tL\201uM\310\201v\312\313#\203\271
\362\201w!\203\220
\201w \210\201x \210\317\201y\201z\"\210\317\201{\201|\"\210\314\201}\201~\"\210\317\201\201}\"\210\310\201\200\312\313#\210\310\201\201\312\313#\210\310\201\202\312\313#\203\343
\201\203\201u!\210\201\204\201u!\210\362\201\205!\203\360
\201\205 \210\201\206N\201\207\201\210#\210\310\201\211\312\313#\210\310\201\212\312\313#\203?\201\213\201u!\210\362\201\214!\203'\201\214\201\215!\210\362\201\214!\203?\201\214\201u!\210\201\216\201\217!\210\310\201\220\312\313#\210\310\201\221\312\313#\203_\201\222 \210\317\201\223\201\224\"\210\310\201\225\312\313#\203p\350\201\226\336\"\210\310\201\227\312\313#\203\203\322\201\230\201\231\"\210\310\201\232\312\313#\203\237\201\233O\201\234P\201\235Q\336R\310\201\236\312\313#\203\317\353\201\237\201\240\201\241\201\242\201\243\257H\"H\201\244S\201\245T\201\246U\310\201\247\312\313#\203\361\201\250V\353WXY#Z\322\201\251\201\252\"\210\310\201\253\312\313#\210\310\201\254\312\313#\203\201\255[\201\256\\\201\257]\317\201\260\201\254\"\210\310\201\261\312\313#\203-\312^\201\262 \210\331\201\263\201\264\334\312$\210\335\201\263\312\"\207" [template-auto-insert template-message-prompt-format template-default-directories save-place-file completion-ignored-extensions ido-ignore-buffers make-variable-buffer-local flyspell-dict require ispell nil noerror defalias switch-dictionary #[nil "\211\304\230\203\f\305\202
\304\306\n!\210\307\310	\n#\210\205 \212\311 )*\207" [ispell-current-dictionary dic change flyspell-mode "german" "english" ispell-change-dictionary message "Dictionary switched from %s to %s" flyspell-buffer] 5 nil nil] global-set-key [f8] flyspell add-hook flyspell-mode-hook #[nil "\205\301 \207" [flyspell-mode flyspell-buffer] 1] flyspell-incorrect-hook #[(left right undef) "\212b\210\301 \210\302\303!\205\304)\207" [left beginning-of-line looking-at "#include" t] 2] find-file-hook #[nil "\205\301!\210\302\303!\207" [flyspell-dict ispell-change-dictionary flyspell-mode t] 2] ad-add-advice ispell-pdict-save (advice nil t (advice lambda nil (save-excursion (flyspell-buffer)))) after ad-activate t self-compile-mode template expand-file-name "~/.emacs.d/templates/" add-to-list template-find-file-commands ido-exit-minibuffer template-initialize "~/.emacs.d/saveplace" set-default save-place saveplace append ".d" ido ido-mode ("\\` " "^*Mess" "^*Back" ".*Completion" "^*Ido") 10 server fboundp server-running-p server-start server-switch-hook #[nil "\301 \203\f\302\303\301 !!\210\205\304\305\306\"\207" [server-buffer-clients current-local-map use-local-map copy-keymap local-set-key "k" server-edit] 3] ecb ecb-activate "~/.emacs.d/smex.save" smex smex-initialize [134217816] yasnippet yas/initialize yas/load-directory ido-case-fold ido-use-filename-at-point ido-use-url-at-point ido-enable-flex-matching ido-max-prospects ido-enable-tramp-completion ido-confirm-unique-completion smex-save-file auto-mode-alist x-select-enable-clipboard interprogram-paste-function cua-enable-cua-keys bookmark-default-file bookmark-save-flag lisp-mode-shared-map org-todo-keywords org-todo-keyword-faces org-startup-folded org-startup-indented promela-block-indent promela-selection-indent promela-selection-option-indent dired-omit-files dired-latex-unclean-extensions dired-bibtex-unclean-extensions dired-texinfo-unclean-extensions dired-omit-extensions deft-extension deft-directory deft-text-mode edit-server-new-frame "~/.emacs.d/snippets" html-php ("\\.php" . html-php-mode) x-cut-buffer-or-selection-value cua-mode kill-ring-save (slick-copy nil t (advice lambda nil (interactive (if mark-active (list (region-beginning) (region-end)) (message "Copied line") (list (line-beginning-position) (line-beginning-position 2)))))) before kill-region (slick-cut nil t (advice lambda nil (interactive (if mark-active (list (region-beginning) (region-end)) (list (line-beginning-position) (line-beginning-position 2)))))) load "rudel-loaddefs.el" magit [f5] magit-status magit-log-edit-mode-hook #[nil "\300\301!\207" [flyspell-mode 1] 2] linum-narrow #[nil "\300\301!\207" [linum-mode 1] 2] lisp-interaction-mode-hook #[nil "\300\301!\207" [linum-mode 1] 2] "~/.emacs.d/bookmarks" 1 winring ecb-winman-winring-enable-support winring-initialize "j" winring-jump-to-configuration "n" winring-new-configuration winring-ask-delete-configuration #[nil "\300\301!\205\302 \207" [y-or-n-p "Delete winring configuration? " winring-delete-configuration] 2 nil nil] "K" etags-table auto-complete-etags cursor-chg toggle-cursor-type-when-idle change-cursor-mode windmove-default-keybindings define-key [134217837] eassist-list-methods dir-locals sml-modeline sml-modeline-mode scroll-bar-mode -1 set-scroll-bar-mode right smooth-scrolling browse-kill-ring browse-kill-ring-default-keybindings "y" (lambda nil (interactive) (popup-menu 'yank-menu)) filladapt filladapt-mode flymake-jshint js-mode-hook #[nil "\300\301!\207" [flymake-mode t] 2] org ((sequence "TODO(t)" "PROGRESS(p!)" "WAIT(w@/!)" "|" "CANCELED(c@/!)" "DONE(d!)")) (("TODO" . org-warning) ("PROGRESS" . "yellow") ("CANCELED" :foreground "blue" :weight bold)) content promela-mode ("\\.promela\\'" . promela-mode) ("\\.spin\\'" . promela-mode) ("\\.pml\\'" . promela-mode) ("\\.prm\\'" . promela-mode) ("\\.porm\\'" . promela-mode) 2 0 3 dired-x "^\\.?#\\|~$\\|^svn$\\|\\.pyc$\\|^\\.git$\\|\\.d$\\|\\.o$" dired-mode-hook #[nil "\300\301!\207" [dired-omit-mode 1] 2] arduino-mode deft "org" "~/.org/deft/" org-mode [f9] edit-server edit-server-start raise-frame (make-it-work nil t (advice lambda (&optional frame) "Work around some bug? in raise-frame/Emacs/GTK/Metacity/something.\n     Katsumi Yamaoka <yamaoka@jpl.org> posted this in\n     http://article.gmane.org/gmane.emacs.devel:39702" (call-process "wmctrl" nil nil nil "-i" "-R" (frame-parameter (or frame (selected-frame)) 'outer-window-id))))] 7)
(defalias 'dirname #[(file) "\301\302\303#\207" [file replace-regexp-in-string "[^/]*$" ""] 4])
(defalias 'open-buffer-shell #[nil "\203\301\302\303\304\305!\306Q#\207\307\310!\207" [buffer-file-name start-process-shell-command "urxvt" nil "DIR=" dirname " urxvt" message "Buffer does not contain a file."] 6 nil nil])
(byte-code "\301\302\303\"\210\304\305\306\307#\203=\310\311\312\"\210\313\314\315\"\210\310\316\314\"\210\317\312\320\321\306$\210\322\312\323\"\210\313\324\325\"\210\326\327\324#\210\313\330\331\"\210\310\332\330\"\210\306\207" [fold-keymap global-set-key [f12] open-buffer-shell require foldingo nil noerror add-hook find-file-hooks install-fold-mode-if-needed defalias alex-fold-mode-hook #[nil "\300\301\302\"\207" [set-default fold-implicit-fold-threshold 1000000] 3] fold-mode-hook ad-add-advice (alex-foldingo-fold-all nil t (advice lambda nil (if (and fold-mode foldingo-close) (fold-close-all-folds)))) after ad-activate t alex-fold-toggle-current-fold #[nil "\300\301 !\207" [fold-toggle fold-current-fold] 2 nil nil] define-key "" alex-fold-refresh-after-save #[nil "\205
	\203\302 \207\303 \207" [fold-mode foldingo-close fold-enter-fold-mode-close-all-folds fold-enter-mode] 1] after-save-hook] 5)