summaryrefslogblamecommitdiffstats
path: root/emacs.elc
blob: cef909a1f5e7796bc560a783b36d06e602471fd0 (plain) (tree)
1
2
3
4
5
6
7
8
        


                                                           

                           
                                                                  
 



                                                                   
                                                                   

 




                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       

                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 


                                                                                                                                                                                                                                  
;ELC
;;; Compiled by alex@laptop.lan on Thu Jul 12 06:07:53 2012
;;; from file /home/alex/.dotfiles/emacs
;;; in Emacs version 23.4.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\211	\311B\312 \210\f\244\210+\313\314\311\315#\2030\316 \210
\204-\317 \210\2020\320 \210\3211\3222\323\324\325\"\210\307\326\315\"\210\3273\3304\3315\3326\333\332!\210\334\332!\210\335\332!\210\336\332!\210\323\337\340\"\210
\204j\341\342\343\"\210\3447B7\3458\3469\345:\347;\307\350!\210\345\211<=\351\352M\210\311>\313\353!\210\354\345!\210\355\345!\210\345?\356\345!\210\345@\313\357!\210\360A\311\207" [custom-file my-lisp-dir default-directory load-path orig-load-path window-system "~/.emacs.d/emacs-custom.el" load "~/.emacs.d/lisp" nil normal-top-level-add-subdirs-to-load-path 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" utf-8 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 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 (#$ . 3871))
(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#\203S\336\312\341\342\343\"\210\344 \210\345\346\347\336\"\210\310\350!\210\351\352C\"\310\353!\210\354\336!\210\355\336\312\211@A\336B\356C\312D\336E\310\357\312\313#\203\235\360\361!\203\230\361 \204\230\362 \210\322\363\364\"\210\310\365\312\313#\203\250\366 \210\367F\310\370\312\313#\203\273\371 \210\317\372\370\"\210\310\373\312\313#\203\312\374 \210\375\376!\210\310\377\312\313#\203\332\201^GBG\360\201_!\203\352\336H\201_I\312J\201`\336!\210\331\201a\201b\201c\312$\210\335\201a\336\"\210\335\201a!\210\331\201d\201e\201c\312$\210\335\201d\336\"\210\335\201d!\210\201f\201g!\210\310\201h\312\313#\203K\317\201i\201j\"\210\322\201k\201l\"\210\310\201m\312\313#\203e\322\327\201n\"\210\322\201o\201p\"\210\201qK\201rL\310\201s\312\313#\203\257\360\201t!\203\206\201t \210\201u \210\317\201v\201w\"\210\317\201x\201y\"\210\314\201z\201{\"\210\317\201|\201z\"\210\310\201}\312\313#\210\310\201~\312\313#\210\310\201\312\313#\203\331\201\200\201r!\210\201\201\201r!\210\360\201\202!\203\346\201\202 \210\201\203M\201\204\201\205#\210\310\201\206\312\313#\210\310\201\207\312\313#\2035\201\210\201r!\210\360\201\211!\203\201\211\201\212!\210\360\201\211!\2035\201\211\201r!\210\201\213\201\214!\210\310\201\215\312\313#\210\310\201\216\312\313#\203U\201\217 \210\317\201\220\201\221\"\210\310\201\222\312\313#\203f\346\201\223\336\"\210\310\201\224\312\313#\203y\322\201\225\201\226\"\210\310\201\227\312\313#\203\225\201\230N\201\231O\201\232P\336Q\310\201\233\312\313#\203\305\351\201\234\201\235\201\236\201\237\201\240\257G\"G\201\241R\201\242S\201\243T\310\201\244\312\313#\203\347\201\245U\351VWX#Y\322\201\246\201\247\"\210\310\201\250\312\313#\210\310\201\251\312\313#\203\201\252Z\201\253[\201\254\\\317\201\255\201\251\"\210\310\201\256\312\313#\203#\312]\201\257 \210\331\201\260\201\261\334\312$\210\335\201\260\312\"\207" [template-auto-insert template-message-prompt-format save-place-file completion-ignored-extensions ido-ignore-buffers ido-case-fold 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 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 "~/.emacs.d/snippets" html-php 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 ("\\.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])
(global-set-key [f12] 'open-buffer-shell)