path: root/emacs.elc

;ELC
;;; Compiled by alexander@sulfrian.net on Thu Oct 22 05:33:59 2009
;;; from file /home/alex/.dotfiles/emacs
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters
;;; and therefore cannot be loaded into Emacs 21 or earlier.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "23")))
    (error "`emacs' was compiled for Emacs 23 or later"))

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


(byte-code "\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\377\201C\201D\201E\201F\201G\201H\201I\201J\201K\201L\201M\201N\201O\201P\201Q\201R\201S\201T\201U\201V\201W\201X\201Y\201Z\201[\201\\\201]\201^\201_\201`\201a\201b\201c\201d\201e\201f\201g\201h\201i\201j\201k\201l\201m\201n\201o\201p\201q\201r\201s\201t\201u\201v\201w\201x\201y\201z\201{\201|\201}\201~\201\201\200\201\201\201\202\201\203\201\204\201\205\201\206\201\207\201\210\201\211\201\212\201\213\201\214\201\215\201\216\201\217\201\220&\207\210\201\221\201\222\201\223\201\224\201\225\201\226\201\227\201\230\201\231\201\232\201\233\201\234\201\235\201\236\201\237\201\240\201\241\201\242\201\243\201\244\201\245\201\246\201\247\201\250\201\251\201\252\201\253\201\254\201\255\201\256\201\257\201\260\201\261\201\262\201\263\201\264\201\265\201\266\201\267\201\270\201\271\201\272&)\210\201\273\201\274\201\275\"\210\201\273\201\276\201\277\"\210\201\300\201\301!\210\201\302\201\303\201\304\201\305\201\306\201\307\201\306!\210\201\310\201\306!\210\201\311\201\306!\210\201\312\201\306!\210\201\313
B\201\314\211@A
B@\201\315B\201\316 \210
B\244\210+\201\315\207" [text-mode-hook fill-column semanticdb-default-save-directory ispell-extra-args locale-coding-system load-path custom-set-variables (Buffer-menu-use-frame-buffer-list nil) (abbrev-mode t) (all-christian-calendar-holidays t) (auto-compression-mode t nil (jka-compr)) (auto-insert-mode t) (auto-insert-query nil) (backward-delete-char-untabify-method nil) (bubblet-high-score 286 t) (bubblet-high-stats '(47 131) t) (bubblet-num-games 1 t) (bubblet-total-score 286 t) (bubblet-total-stats '(47 131) t) (c-basic-offset 8) (c-syntactic-indentation t) (c-syntactic-indentation-in-macros nil) (c-tab-always-indent nil) (calendar-week-start-day 1) (case-fold-search t) (column-number-mode t) (compilation-skip-threshold 2) (confirm-kill-emacs 'y-or-n-p) (current-language-environment "English") (delphi-case-label-indent 2) (delphi-indent-level 2) (delphi-tab-always-indents nil) (display-time-24hr-format t) (display-time-day-and-date t) (display-time-interval 60) (display-time-mail-file 'none) (display-time-string-forms '((if (and (not display-time-format) display-time-day-and-date) (format-time-string "---%a %b %e " now) #1="") (propertize (format-time-string (or display-time-format (if display-time-24hr-format "%H:%M" "%-I:%M%p")) now) 'help-echo (format-time-string "%a %b %e, %Y" now)) load (if mail (concat " " (propertize display-time-mail-string 'display `(when (and display-time-use-mail-icon (display-graphic-p)) ,@display-time-mail-icon ,@(if (and display-time-mail-face (memq (plist-get (cdr display-time-mail-icon) :type) '(pbm xbm))) (let ((bg (face-attribute display-time-mail-face :background))) (if (stringp bg) (list :background bg))))) 'face display-time-mail-face 'help-echo "You have new mail; mouse-2: Read mail" 'mouse-face 'mode-line-highlight 'local-map (make-mode-line-mouse-map 'mouse-2 read-mail-command))) #1#))) (double-mode nil t (double)) (ecb-compile-window-height 6) (ecb-compile-window-width 'frame) (ecb-directories-menu-user-extension '(("Version Control" (ecb-dir-popup-cvs-status "CVS Status") (ecb-dir-popup-cvs-examine "CVS Examine") (ecb-dir-popup-cvs-update "CVS Update")))) (ecb-history-sort-method nil) (ecb-layout-name "left7") (ecb-layout-window-sizes '(("left7" (0.21844660194174756 . 0.5873015873015873) (0.21844660194174756 . 0.15873015873015872) (0.21844660194174756 . 0.23809523809523808)))) (ecb-options-version "2.40") (ecb-primary-secondary-mouse-buttons 'mouse-1--mouse-2) (ecb-process-non-semantic-files t) (ecb-show-help-format 'info) (ecb-source-path '(("/" "/") ("/home/alex/" "~/") #("/home/alex/chat" 0 15 (help-echo "Mouse-2 toggles maximizing, mouse-3 displays a popup-menu")) ("/home/alex/projects/uni/ti3" "ti3") ("/home/alex/projects/c/antispam" "antispamm") ("/home/alex/projects/c/antispam" "antispam") ("/home/alex/projects/todolist" "todolist"))) (ecb-stealthy-tasks-delay 0.5) (ecb-tag-display-function '((default . ecb--semantic-format-tag-uml-prototype))) (ecb-tip-of-the-day nil) (ecb-use-speedbar-instead-native-tree-buffer nil) (fill-individual-varying-indent t) (focus-follows-mouse t) (font-lock-support-mode 'jit-lock-mode) (frame-background-mode nil) (fringe-mode nil nil (fringe)) (global-font-lock-mode t nil (font-lock)) (global-hl-line-mode t nil (hl-line)) (gnus-audio-au-player "/usr/bin/aplay") (gnus-audio-wav-player "/usr/bin/aplay") (grep-command "grep --color -nH -e ") (gud-tooltip-mode nil) my-lisp-dir default-directory orig-load-path (hl-line-face 'highlight) (holiday-general-holidays '((holiday-fixed 1 1 "New Year's Day") (holiday-fixed 2 14 "Valentine's Day") (holiday-fixed 4 1 "April Fools' Day") (holiday-float 5 0 2 "Mother's Day") (holiday-fixed 10 31 "Halloween"))) (indicate-buffer-boundaries 'left) (indicate-empty-lines t) (inhibit-eol-conversion nil) (inhibit-startup-screen t) (inverse-video nil) (jde-run-option-application-args '("10")) (jit-lock-defer-time 0.5) (jit-lock-stealth-time nil) (make-backup-files nil) (mark-holidays-in-calendar t) (mouse-1-click-in-non-selected-windows nil) (mouse-autoselect-window t) (mouse-avoidance-mode 'jump nil (avoid)) (mouse-sel-mode nil) (mouse-wheel-follow-mouse nil) (mouse-wheel-mode t nil (mwheel)) (msb-mode t nil (msb)) (newsticker-url-list-defaults '(("Debian Security Advisories" "http://www.debian.org/security/dsa.en.rdf") ("Heise News (german)" "http://www.heise.de/newsticker/heise.rdf"))) (org-modules '(org-bbdb org-bibtex org-gnus org-info org-jsinfo org-irc org-mew org-mhe org-rmail org-vm org-wl org-mouse org-bookmark org-depend org-eval org-man org-screen org-toc)) (pcomplete-autolist t) (require-final-newline t) (ruler-mode-show-tab-stops nil) (savehist-mode t nil (savehist)) (scalable-fonts-allowed t) (scroll-bar-mode 'right) (server-mode t) (show-trailing-whitespace nil) (speedbar-directory-button-trim-method 'trim) (speedbar-frame-parameters '((minibuffer) (width . 30) (height . 60) (border-width . 0) (menu-bar-lines . 0) (tool-bar-lines . 0) (unsplittable . t) (left-fringe . 0))) (speedbar-frame-plist '(minibuffer nil width 30 height 60 border-width 0 internal-border-width 0 unsplittable t default-toolbar-visible-p nil has-modeline-p nil menubar-visible-p nil default-gutter-visible-p nil)) (speedbar-indentation-width 2) (speedbar-show-unknown-files t) (speedbar-track-mouse-flag t) (speedbar-use-images nil) (speedbar-visiting-tag-hook '(speedbar-highlight-one-tag-line speedbar-recenter-to-top)) (sql-product 'mysql) (sql-server #1#) (sql-user #1#) (standard-indent 8) (tab-always-indent nil) (tab-stop-list '(8 16 24 32 40 48 56 64 72 80 88 96 104 112 120)) (tab-width 8) (tabkey2-mode nil) (timeclock-modeline-display t nil (timeclock)) (timeclock-relative nil) (timeclock-workday 0) (tls-process-connection-type t) (tab-bar-mode -1) (tooltip-delay 0.5) (tooltip-frame-parameters '((name . "tooltip") (internal-border-width . 1) (border-width . 1))) (tooltip-use-echo-area nil) (tooltip-x-offset 10) (tooltip-y-offset 10) (transient-mark-mode t) (truncate-lines nil) (truncate-partial-width-windows nil) (uniquify-buffer-name-style 'post-forward-angle-brackets nil (uniquify)) (user-mail-address "alexander@sulfrian.net") (view-calendar-holidays-initially t) (view-read-only t) (visible-bell nil) (whitespace-auto-cleanup nil) (whitespace-check-ateol-whitespace nil) (whitespace-check-indent-whitespace nil) (whitespace-check-leading-whitespace nil) (whitespace-check-spacetab-whitespace nil) (whitespace-check-trailing-whitespace nil) (whitespace-display-in-modeline nil) (whitespace-display-spaces-in-color t) (whitespace-global-mode nil) (whitespace-indent-regexp "^	*\\(    \\)+") (whitespace-rescan-timer-time 0) (windmove-wrap-around nil) (x-gtk-whole-detached-tool-bar nil) (x-select-enable-clipboard t) (x-stretch-cursor nil) custom-set-faces (default ((t (:stipple nil :background "black" :foreground "grey90" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 92 :width normal :family "xos4-terminus")))) (border ((t (:background "gray50")))) (custom-face-tag ((t (:weight bold)))) (custom-group-tag ((((min-colors 88) (class color) (background light)) (:foreground "blue1" :weight bold)))) (custom-group-tag-1 ((((min-colors 88) (class color) (background light)) (:foreground "red1" :weight bold :height 1.2)))) (custom-variable-tag ((((min-colors 88) (class color) (background light)) (:foreground "blue1" :weight bold)))) (fixed-pitch ((t (:family "terminus")))) (font-lock-comment-face ((nil (:foreground "green3")))) (font-lock-constant-face ((nil (:weight bold)))) (font-lock-negation-char-face ((t (:foreground "red" :weight bold)))) (font-lock-preprocessor-face ((t (:inherit font-lock-builtin-face :foreground "magenta")))) (font-lock-string-face ((nil (:foreground "red2")))) (font-lock-warning-face ((t (:foreground "Red" :weight bold)))) (fringe ((((class color) (background light)) (:background "gray80")))) (highlight ((nil (:background "grey10")))) (isearch ((((class color) (min-colors 88) (background dark)) (:background "yellow3" :foreground "black" :weight bold)))) (italic ((((supports :underline t)) (:underline t)))) (link ((((class color) (min-colors 88) (background dark)) (:foreground "cyan1" :underline t)))) (menu ((t nil))) (mode-line ((t (:box (:line-width 1 :color "grey75"))))) (mode-line-highlight ((((class color) (min-colors 88)) (:box (:line-width 2 :color "grey40" :style released-button))))) (mode-line-inactive ((default (:inherit mode-line :foreground "gray60")) (nil nil))) (mumamo-background-chunk-major ((((class color) (min-colors 88) (background light)) nil))) (mumamo-background-chunk-submode ((((class color) (min-colors 88) (background light)) nil))) (newsticker-immortal-item-face ((t (:foreground "blue" :slant italic :weight bold)))) (newsticker-new-item-face ((t (:weight bold)))) (newsticker-obsolete-item-face ((t (:strike-through t :weight bold)))) (newsticker-old-item-face ((t (:foreground "red4" :weight bold)))) (region ((((class color) (min-colors 88) (background dark)) (:inverse-video t)))) (scroll-bar ((t (:background "black" :foreground "gray25")))) (shadow ((((class color grayscale) (min-colors 88) (background dark)) (:foreground "grey50")))) (tooltip ((((class color)) (:background "lightyellow" :foreground "black" :height 0.5)))) (variable-pitch ((t (:family "terminus")))) (vhdl-font-lock-attribute-face ((((class color) (background light)) (:foreground "Orchid")))) (vhdl-font-lock-directive-face ((((class color) (background light)) (:foreground "cyan3")))) (vhdl-font-lock-prompt-face ((t (:foreground "Red")))) (widget-button ((t (:background "grey75" :foreground "black" :box (:line-width 2 :color "grey75" :style released-button))))) (widget-button-face ((t (:box (:line-width 2 :color "grey75" :style released-button)))) t) (widget-field ((t (:background "grey10" :box (:line-width 1 :color "grey75" :style pressed-button))))) (widget-field-face ((t (:background "gray85"))) t) (widget-single-line-field-face ((t (:background "gray85"))) t) global-set-key [mouse-3] imenu [(f1)] #[nil "\300\301 !\207" [manual-entry current-word] 2 nil nil] load "/usr/share/emacs/site-lisp/site-gentoo" turn-on-auto-fill 72 "~/.emacs.d/semantic" ("-Tlatin15" "-d" "/usr/lib/ispell/german" "-w" "äöüÄÖÜß") utf-8 set-terminal-coding-system set-keyboard-coding-system set-selection-coding-system prefer-coding-system "/usr/share/maxima/5.9.0/emacs" "~/.emacs.d/lisp" nil normal-top-level-add-subdirs-to-load-path] 137)
#@13 Maxima mode
(autoload 'maxima-mode "maxima" '(#$ . 12494) t)
#@20 Maxima interactive
(autoload 'maxima "maxima" '(#$ . 12561) t)
(byte-code "\301B\302\207" [auto-mode-alist (".max" . maxima-mode) nil] 2)
#@9 EMaxima
(autoload 'emaxima-mode "emaxima" '(#$ . 12706) t)
(byte-code "\306\307\310\"\210\311B\312B\313\314\315!\210\316\317\n\"\203!\210\202%\nB)\320\313\321*\313\211+,\322\323M\210\324-\314\325!\210\326\313!\210\327\313\211\"\210\313.\330\313!\210\313/\314\331!\210\3320\3131\3332\3343\335\336\337\"\210\306\340\341\"\210\342\343\344\"\210\3454\346\347#\210\342\350\351\"\207" [auto-mode-alist compilation-scroll-output x compilation-error-regexp-alist cssm-indent-level cssm-newline-before-closing-bracket add-hook emaxima-mode-hook emaxima-mark-file-as-emaxima ("README" . text-mode) ("\\.pas" . delphi-mode) t require compile ("^\\([-a-zA-Z0-9\\.\\/_~]+\\)(\\([0-9]+\\),\\([0-9]+\\)) \\([Ff]atal:\\|[Nn]ote:\\|[Ww]arning:\\|[Ee]rror:\\) \\(.*$\\)" 1 2 3) memql 4 cssm-c-style-indenter yes-or-no-p y-or-n-p nil paren show-paren-mode global-font-lock-mode follow-mode uniquify reverse 8 "linux" c-set-offset arglist-cont-nonempty (c-lineup-arglist-tabs-only c-lineup-gcc-asm-reg) c-mode-common-hook (lambda nil (turn-on-auto-fill) (setq fill-column 80) (setq comment-column 60) (modify-syntax-entry 95 "w") (c-set-style "linux")) global-set-key [C-return] dabbrev-expand define-key [C-return] dabbrev-completion [f12] indent-region cssm-indent-function inhibit-startup-message require-final-newline next-line-add-newlines font-lock-maximum-decoration vc-follow-symlinks uniquify-buffer-name-style indent-tabs-mode tab-width c-default-style esc-map] 5)
(defalias 'indent-region-with-tab #[nil "\212`\301 W\203\302 \210\301 `\303 U\203\304\305!\210\303 b\210`Y\2051\303 b\210\306c\210\304\305!\210\202*\207" [save-mark mark exchange-point-and-mark line-beginning-position previous-line 1 "	"] 2 nil nil])
(defalias 'unindent-region-with-tab #[nil "\212`\301 W\203\302 \210\301 `\303 U\203\304\305!\210\303 b\210`Y\205;\303 b\210\306\307!`fU\2034\310\305!\210\304\305!\210\202*\207" [save-mark mark exchange-point-and-mark line-beginning-position previous-line 1 string-to-char "	" delete-char] 2 nil nil])
(byte-code "\300\301\302\"\210\300\303\304\"\207" [global-set-key [C-tab] indent-region-with-tab [C-S-iso-lefttab] unindent-region-with-tab] 3)
#@28 compile itself if ~/.emacs
(defalias 'autocompile #[nil "\300\301!\210\302 \303\304!\230\204\302 \303\305!\230\205\306\305!\207" [require bytecomp buffer-file-name expand-file-name "~/.emacs" "~/.dotfiles/emacs" byte-compile-file] 3 (#$ . 14907) nil])
(byte-code "\306\307\310\"\210\311\312\313!\210\314\315\316\317\"\210\312\320!\210\312\321!\210\322\317!\210\323\317\311\211\317)\324*\317+\312\325!\210\326\327\330\"\210\326\331\332\"\210\326\333\334\"\210\326\335\336\"\210\337 \210\340 \210\341,\312\342!\210\343 \210\326\344\342\"\210\312\345!\210\346 \210\347\350!\207" [template-query save-place-file ido-ignore-buffers ido-case-fold ido-use-filename-at-point ido-use-url-at-point add-hook after-save-hook autocompile nil require template-simple "~/.emacs.d/saveplace" set-default save-place t saveplace ido ido-mode ("\\` " "^*Mess" "^*Back" ".*Completion" "^*Ido") 6 rect-mark global-set-key [24 114 67108896] rm-set-mark "" (lambda (b e) (interactive "r") (if rm-mark-active (rm-kill-region b e) (kill-region b e))) [134217847] (lambda (b e) (interactive "r") (if rm-mark-active (rm-kill-ring-save b e) (kill-ring-save b e))) "" (lambda (&optional p) (interactive "p") (if rm-mark-active (rm-exchange-point-and-mark p) (exchange-point-and-mark p))) server-start ecb-activate "~/.emacs.d/smex.save" smex smex-initialize [134217816] yasnippet yas/initialize yas/load-directory "~/.emacs.d/snippets" ido-enable-flex-matching ido-max-prospects ido-confirm-unique-completion smex-save-file] 4)