blob: 1720ff8f2d258e6d59b452f6860e764765b15e44 (
plain) (
tree)
|
|
;ELC
;;; Compiled by alexander@sulfrian.net on Thu Oct 18 16:56:56 2012
;;; from file /home/asulfrian/.dotfiles/emacs
;;; 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\211 \311B\312 \210\f\244\210+\313\314!\203# \315\314\316\"\210\317\320\311\321#\203; \322 \210
\2048 \323 \210\202; \324 \210\3255\3266\327\330\331\"\210\307\332\321\"\210\3337\3348\3359\336:\337\336!\210\340\336!\210\341\336!\210\342\336!\210\327\343\344\"\210
\204u \345\346\347\"\210\350;B;\351<\352=\351>\353?\307\354!\210\351\211@A\355\356M\210\311B\317\357!\210\360\351!\210\361\351!\210\351C\362\351!\210\351D\317\363!\210\364E\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 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 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 (#$ . 3976))
(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\201q K\201r L\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\203 M\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\230 N\201\231 O\201\232 P\336Q\310\201\233 \312\313#\203\305\351\201\234 \201\235 \201\236 \201\237 \201\240 \257G\"G\201\241 R\201\242 S\201\243 T\310\201\244 \312\313#\203\347\201\245 U\351VWX#Y\322\201\246 \201\247 \"\210\310\201\250 \312\313#\210\310\201\251 \312\313#\203\201\252 Z\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)
|