summaryrefslogtreecommitdiffstats
path: root/shell/_emacs
diff options
context:
space:
mode:
authorTharre <tharre3@gmail.com>2015-09-14 20:19:14 +0200
committerTharre <tharre3@gmail.com>2016-10-07 20:13:36 +0000
commit98ba0e744bdf99ce0a894451700f11c39dc2579b (patch)
tree0586076ab8c7f3acde1bfef4375e6d4bdcd76003 /shell/_emacs
parent71a55046a49ea4f340638fc989fbad1a6b001ca7 (diff)
downloaddotfiles-98ba0e744bdf99ce0a894451700f11c39dc2579b.tar.gz
dotfiles-98ba0e744bdf99ce0a894451700f11c39dc2579b.tar.xz
dotfiles-98ba0e744bdf99ce0a894451700f11c39dc2579b.zip
emacs: actually install .emacs.d
Diffstat (limited to 'shell/_emacs')
-rw-r--r--shell/_emacs/.gitignore8
-rw-r--r--shell/_emacs/custom-var.el15
-rw-r--r--shell/_emacs/init.el215
-rw-r--r--shell/_emacs/org-fragments.el60
-rw-r--r--shell/_emacs/site-lisp/dconf-proxy.el14
-rw-r--r--shell/_emacs/site-lisp/site-lisp-autoloads.el5
-rw-r--r--shell/_emacs/site-lisp/util.el36
-rw-r--r--shell/_emacs/site-lisp/with-package.el31
-rw-r--r--shell/_emacs/tools/libs/jpeg62.dllbin127488 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/libXpm.dllbin504492 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/libpng-config124
-rw-r--r--shell/_emacs/tools/libs/libpng12-config124
-rw-r--r--shell/_emacs/tools/libs/libpng12.dllbin260096 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/libpng14-14.dllbin230529 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/libpng3.dllbin260096 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/libtiff3.dllbin376832 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/libungif4.dllbin31232 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/xpm4.dllbin52224 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/zip.exebin290816 -> 0 bytes
-rw-r--r--shell/_emacs/tools/libs/zlib1.dllbin75264 -> 0 bytes
-rw-r--r--shell/_emacs/tools/profiler/profile-dotemacs.el200
-rw-r--r--shell/_emacs/tools/profiler/run_profiler.el2
22 files changed, 0 insertions, 834 deletions
diff --git a/shell/_emacs/.gitignore b/shell/_emacs/.gitignore
deleted file mode 100644
index 88f820a..0000000
--- a/shell/_emacs/.gitignore
+++ /dev/null
@@ -1,8 +0,0 @@
-elpa/
-auto-save-list
-.smex-items
-ac-comphist.dat
-*.elc
-emacs.html
-*~
-url/
diff --git a/shell/_emacs/custom-var.el b/shell/_emacs/custom-var.el
deleted file mode 100644
index 431ff6e..0000000
--- a/shell/_emacs/custom-var.el
+++ /dev/null
@@ -1,15 +0,0 @@
-(custom-set-variables
- ;; custom-set-variables was added by Custom.
- ;; If you edit it by hand, you could mess it up, so be careful.
- ;; Your init file should contain only one such instance.
- ;; If there is more than one, they won't work right.
- '(evil-emacs-state-modes (quote (archive-mode bbdb-mode bookmark-bmenu-mode bookmark-edit-annotation-mode browse-kill-ring-mode bzr-annotate-mode calc-mode cfw:calendar-mode completion-list-mode Custom-mode debugger-mode delicious-search-mode desktop-menu-blist-mode desktop-menu-mode doc-view-mode dvc-bookmarks-mode dvc-diff-mode dvc-info-buffer-mode dvc-log-buffer-mode dvc-revlist-mode dvc-revlog-mode dvc-status-mode dvc-tips-mode ediff-mode ediff-meta-mode efs-mode Electric-buffer-menu-mode emms-browser-mode emms-mark-mode emms-metaplaylist-mode emms-playlist-mode etags-select-mode fj-mode gc-issues-mode gdb-breakpoints-mode gdb-disassembly-mode gdb-frames-mode gdb-locals-mode gdb-memory-mode gdb-registers-mode gdb-threads-mode gist-list-mode gnus-article-mode gnus-browse-mode gnus-group-mode gnus-server-mode gnus-summary-mode google-maps-static-mode ibuffer-mode jde-javadoc-checker-report-mode magit-commit-mode magit-diff-mode magit-key-mode magit-log-mode magit-mode magit-reflog-mode magit-show-branches-mode magit-branch-manager-mode magit-stash-mode magit-status-mode magit-wazzup-mode magit-process-mode mh-folder-mode monky-mode mu4e-main-mode mu4e-headers-mode mu4e-view-mode occur-mode org-agenda-mode package-menu-mode proced-mode rcirc-mode rebase-mode recentf-dialog-mode reftex-select-bib-mode reftex-select-label-mode reftex-toc-mode sldb-mode slime-inspector-mode slime-thread-control-mode slime-xref-mode sr-buttons-mode sr-mode sr-tree-mode sr-virtual-mode tar-mode tetris-mode tla-annotate-mode tla-archive-list-mode tla-bconfig-mode tla-bookmarks-mode tla-branch-list-mode tla-browse-mode tla-category-list-mode tla-changelog-mode tla-follow-symlinks-mode tla-inventory-file-mode tla-inventory-mode tla-lint-mode tla-logs-mode tla-revision-list-mode tla-revlog-mode tla-tree-lint-mode tla-version-list-mode twittering-mode urlview-mode vc-annotate-mode vc-dir-mode vc-git-log-view-mode vc-svn-log-view-mode vm-mode vm-summary-mode w3m-mode wab-compilation-mode xgit-annotate-mode xgit-changelog-mode xgit-diff-mode xgit-revlog-mode xhg-annotate-mode xhg-log-mode xhg-mode xhg-mq-mode xhg-mq-sub-mode xhg-status-extra-mode)))
- '(evil-motion-state-modes (quote (apropos-mode Buffer-menu-mode calendar-mode color-theme-mode command-history-mode compilation-mode dictionary-mode ert-results-mode help-mode Info-mode Man-mode speedbar-mode undo-tree-visualizer-mode view-mode woman-mode Custom-mode notmuch-hello-mode notmuch-search-mode)))
- '(evil-overriding-maps (quote ((Buffer-menu-mode-map) (color-theme-mode-map) (comint-mode-map) (compilation-mode-map) (dictionary-mode-map) (ert-results-mode-map . motion) (Info-mode-map . motion) (speedbar-key-map) (speedbar-file-key-map) (speedbar-buffers-key-map) (custom-mode-key-map) (notmuch-hello-key-map) (notmuch-search-key-map) (notmuch-show-key-map))))
- '(org-file-apps (quote ((auto-mode . emacs) ("\\.mm\\'" . default) ("\\.x?html?\\'" . "chromium %s") ("\\.pdf\\'" . default)))))
-(custom-set-faces
- ;; custom-set-faces was added by Custom.
- ;; If you edit it by hand, you could mess it up, so be careful.
- ;; Your init file should contain only one such instance.
- ;; If there is more than one, they won't work right.
- )
diff --git a/shell/_emacs/init.el b/shell/_emacs/init.el
deleted file mode 100644
index 921eace..0000000
--- a/shell/_emacs/init.el
+++ /dev/null
@@ -1,215 +0,0 @@
-;; VERSION: 0.9.0
-;; BUILD: 141
-;; TODO:
-;; - Dependencies:
-;; - Haskell: ghc-mod; hlint
-;; - Python: jedi (pip install jedi epc)
-;; - Arch: aspell-de
-;; - org-mode
-;; - imagemagick
-;; - Latex-preview: texlive-core
-
-;; TODO: eldoc for C looks awesome
-;; company for autocompletion?
-;;;; comments
-;; Fix custom-set-variables
-;; need a redo solution
-;; align-regexp
-;; need to fix color schemes
-;; fix evil state in list-packages buffer
-;; fix smooth scrolling (no jumps pls)
-;; fix jedi
-;; checkout evil-exchange https://github.com/Dewdrops/evil-exchange
-;; Learn how the minibuffer works
-
-;; Turn off mouse interface early to avoid momentary display
-(if (fboundp 'menu-bar-mode) (menu-bar-mode -1))
-(if (fboundp 'tool-bar-mode) (tool-bar-mode -1))
-(if (fboundp 'scroll-bar-mode) (scroll-bar-mode -1))
-
-;; No welcome screen
-(setq inhibit-startup-message t)
-
-;;;; autoloads
-(add-to-list 'load-path (concat user-emacs-directory "/site-lisp/"))
-(require 'site-lisp-autoloads)
-
-;;;; general settings
-(when window-system
- (setq frame-title-format '(buffer-file-name "%f" ("%b")))
- (blink-cursor-mode -1))
-
-(setq visible-bell t
- ;; color-theme-is-global t
- ;; shift-select-mode nil
- ;; mouse-yank-at-point t
- backup-directory-alist `((".".,(concat user-emacs-directory "backups"))))
-
-(defalias 'yes-or-no-p 'y-or-n-p)
-
-;; much better scrolling
-(setq scroll-margin 0
- scroll-conservatively 100000
- scroll-preserve-screen-position 1)
-
-;; Increase memory for tables
-(setq max-lisp-eval-depth '40000)
-(setq max-specpdl-size '100000)
-
-(require 'package)
-(add-to-list 'package-archives '("org" . "http://orgmode.org/elpa/"))
-(add-to-list 'package-archives
- '("marmalade" . "http://marmalade-repo.org/packages/"))
-(add-to-list 'package-archives
- '("melpa" . "http://melpa.milkbox.net/packages/"))
-(package-initialize)
-
-(refresh-proxy-settings)
-(when (not package-archive-contents)
- (package-refresh-contents))
-
-(require 'with-package)
-
-(with-package (ace-jump-buffer haskell-mode python-mode htmlize
- multiple-cursors column-marker
- ;; ess ;; statistic
- ;; key-chord ;; combination of keys for commands
- ;; no-easy-keys
- ;; pretty-symbols-mode ;; mode for pretty symbols
- ;; auto-complete
- ;; auto-complete-clang-async
- ;; auto-complete-c-headers
- ;; autopair
- ;; column-marker
- ;; fuzzy ;; better matching
- ;; jedi
- ;; maxframe
- ;; nav
- ;; yasnippet
- notmuch
- midnight
- org-plus-contrib
-))
-
-(with-package* (evil evil-nerd-commenter evil-numbers)
- (evil-mode t)
- (define-key evil-normal-state-map "m" 'tabbar-forward-tab)
- (define-key evil-normal-state-map "M" 'tabbar-backward-tab)
- (define-key evil-normal-state-map " " 'ace-jump-buffer)
- (define-key evil-normal-state-map (kbd ",ci")
- 'evilnc-comment-or-uncomment-lines)
- (define-key evil-normal-state-map (kbd ",cl")
- 'evilnc-comment-or-uncomment-to-the-line))
-
-(define-key evil-normal-state-map (kbd "RET") nil)
-(define-key evil-motion-state-map (kbd "RET") nil)
-
-;; TODO: test this more
-(with-package* key-chord
- (key-chord-mode t)
- (key-chord-define evil-insert-state-map "jk" 'evil-normal-state))
-
-;; Evil surround mode. See https://github.com/timcharper/evil-surround
-(with-package* surround
- (global-surround-mode 1))
-
-(with-package* anzu
- (global-anzu-mode))
-
-(with-package* solarized-theme
- (message "Solarized theme loaded!")
- (load-theme 'solarized-dark t))
-
-;; loading zenburn retriggers this with-package call, so only call it once
-;; (with-package* zenburn-theme
-;; (unless (symbolp 'zenburn-loaded)
-;; (setq 'zenburn-loaded t)
-;; (load-theme 'zenburn)))
-
-(with-package* (ido ido-ubiquitous smex)
- (ido-mode t)
- (ido-everywhere t)
- (setq ido-enable-flex-matching t)
- (ido-ubiquitous-mode)
- (setq ido-enable-last-directory-history nil
- ido-record-commands nil
- ido-max-work-directory-list 0
- ido-max-work-file-list 0)
- (setq smex-save-file (concat user-emacs-directory ".smex-items"))
- (global-set-key (kbd "M-x") 'smex))
-
-(with-package* diminish
- (diminish 'undo-tree-mode))
-
-(show-paren-mode 1)
-(global-linum-mode 1)
-
-;; chmod +x on save if shell script
-;; (add-hook 'after-save-hook
-;; 'executable-make-buffer-file-executable-if-script-p)
-
-;; see https://github.com/flycheck/flycheck
-;; for all the additional dependencies.
-(with-package* (flycheck flycheck-color-mode-line)
- (setq flycheck-check-syntax-automatically (quote (save mode-enabled)))
- ;; in case cabal isn't in path add path manually
- ;; FIXME: don't do this always use -^
- (setq flycheck-haskell-hlint-executable "~/.cabal/bin/hlint")
- (global-flycheck-mode t)
- (add-hook 'flycheck-mode-hook 'flycheck-color-mode-line-mode))
-
-(with-package magit
- (define-key magit-status-mode-map (kbd "j") 'magit-goto-next-section)
- (define-key magit-status-mode-map (kbd "k") 'magit-goto-previous-section)
- (define-key magit-status-mode-map (kbd "n") 'magit-discard-item))
-
-;;;; general
-(setq tab-width 4)
-
-;;;; python
-;; dependencies: pip install jedi epc
-(with-package* jedi
- (setq jedi:setup-keys t)
- (setq jedi:complete-on-dot t)
- (add-hook 'python-mode-hook 'jedi:setup))
-
-;;;; C
-(setq-default c-basic-offset 4)
-
-(add-hook 'prog-mode-hook
- (lambda ()
- (font-lock-add-keywords nil
- '(("\\<\\(FIX\\(ME\\)?\\|TODO\\|\ HACK\\|REFACTOR\\|NOCOMMIT\\):"
- 1 font-lock-warning-face t)))))
-
-;; highlight with-package*
-;; TODO: add-hook to emacs-lisp?
-(font-lock-add-keywords
- 'emacs-lisp-mode
- '(("(\\(with-package\\*?\\)\\(?:\\s-+(?\\([^()]+\\))?\\)?"
- (1 'font-lock-keyword-face)
- (2 'font-lock-constant-face nil t))))
-
-;; eval-and-replace
-(global-set-key (kbd "C-c C-e") 'eval-and-replace)
-
-;; Font size
-(define-key global-map (kbd "C-+") 'text-scale-increase)
-(define-key global-map (kbd "C--") 'text-scale-decrease)
-
-;; Show trailing spaces, set whitespace tabs to dim grey and delete trailing
-;; whitespaces on save.
-;; Note: this will break hard line breaks for markdown.
-;; TODO: Add exception for markdown-mode
-;; TODO: whitespace cleanup?
-;; (setq whitespace-style '(face tabs newline tab-mark)
-;; whitespace-line-column 80
-;; whitespace-tab '(:foreground "dim gray" :weight bold))
-;; (global-whitespace-mode t)
-;; (add-hook 'before-save-hook 'delete-trailing-whitespace)
-
-;; Marks the 81st column in a line.
-;; (column-marker-1 80)
-
-(setq custom-file (concat user-emacs-directory "custom-var.el"))
-(load custom-file)
diff --git a/shell/_emacs/org-fragments.el b/shell/_emacs/org-fragments.el
deleted file mode 100644
index 0e145ad..0000000
--- a/shell/_emacs/org-fragments.el
+++ /dev/null
@@ -1,60 +0,0 @@
-
-** org-mode settings
-
-*** Increase front size of latex previews
-
-#+BEGIN_SRC emacs-lisp
-(setq org-format-latex-options (plist-put 'org-format-latex-options :scale 2.0))
-#+END_SRC
-
-*** Other customizations
-TODO: create subgroups
-
-#+BEGIN_SRC emacs-lisp
-;; org-mode
-;; active Babel languages
-;; TODO: load on demand
- (org-babel-do-load-languages
- 'org-babel-load-languages
- '((R . t)
- (python . t)
- ))
-
-(add-hook 'org-babel-after-execute-hook 'org-display-inline-images)
-(add-hook 'org-mode-hook 'org-display-inline-images)
-(setq org-confirm-babel-evaluate nil)
-(setq org-export-html-validation-link nil)
-(setq org-export-allow-BIND t)
-(setq org-support-shift-select t)
-(setq org-src-fontify-natively t)
-
-
-;; iimage (show images inline)
-;; (when window-system
-;; (defun iimage-fix-underlining ()
-;; ;; (set-face-underline-p 'org-link nil) ;; deactivate underlining
-;; ) ;; TODO: needing something better aka unclickable links
-
-;; (defun iimage-refresh-iimages ()
-;; "Hacked refresh"
-;; (clear-image-cache nil)
-;; (iimage-mode nil)
-;; (iimage-mode t))
-
-;; (add-hook 'org-mode-hook 'iimage-mode)
-;; (add-hook 'after-save-hook 'iimage-refresh-iimages)
-;; (add-hook 'iimage-mode-hook 'iimage-fix-underlining)
-;; (iimage-mode nil)
-;; (add-to-list 'iimage-mode-image-regex-alist
-;; (cons (concat "\\[\\[file:\\(~?" iimage-mode-image-filename-regex
-;; "\\)\\]") 1))
-;; )
-#+END_SRC
-
-** increase memory for tables
-
-#+BEGIN_SRC emacs-lisp
-;; Increase memory for tables
-(setq max-lisp-eval-depth '40000)
-(setq max-specpdl-size '100000)
-#+END_SRC
diff --git a/shell/_emacs/site-lisp/dconf-proxy.el b/shell/_emacs/site-lisp/dconf-proxy.el
deleted file mode 100644
index 954852a..0000000
--- a/shell/_emacs/site-lisp/dconf-proxy.el
+++ /dev/null
@@ -1,14 +0,0 @@
-(defun refresh-proxy-settings ()
- (interactive)
- (if (string= (shell-command-to-string "dconf read /system/proxy/http/enabled") "true\n")
- (setq url-proxy-services
- `(("http" .
- ,(concat
- (car (split-string-and-unquote ;; split string to remove single quotes and newline
- (shell-command-to-string "dconf read /system/proxy/http/host") '"'"))
- ":"
- (car (split-string-and-unquote ;; split string to remove newline
- (shell-command-to-string "dconf read /system/proxy/http/port") '"\n"))))))
- (setq url-proxy-services nil)))
-
-(provide 'dconf-proxy)
diff --git a/shell/_emacs/site-lisp/site-lisp-autoloads.el b/shell/_emacs/site-lisp/site-lisp-autoloads.el
deleted file mode 100644
index 2b1e039..0000000
--- a/shell/_emacs/site-lisp/site-lisp-autoloads.el
+++ /dev/null
@@ -1,5 +0,0 @@
-
-(autoload 'refresh-proxy-settings "dconf-proxy" "Refresh proxy settings" t)
-(autoload 'eval-and-replace "util" "Eval and replace lisp expression" t)
-
-(provide 'site-lisp-autoloads)
diff --git a/shell/_emacs/site-lisp/util.el b/shell/_emacs/site-lisp/util.el
deleted file mode 100644
index b5bdc10..0000000
--- a/shell/_emacs/site-lisp/util.el
+++ /dev/null
@@ -1,36 +0,0 @@
-(defun eval-and-replace ()
- "Replace the preceding sexp with its value."
- (interactive)
- (forward-char) ;; for evil normal state
- (backward-kill-sexp)
- (condition-case nil
- (prin1 (eval (read (current-kill 0)))
- (current-buffer))
- (error (message "Invalid expression")
- (insert (current-kill 0)))))
-
-(defun lorem ()
- "Insert a lorem ipsum."
- (interactive)
- (insert "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do "
- "eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim"
- "ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut "
- "aliquip ex ea commodo consequat. Duis aute irure dolor in "
- "reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla "
- "pariatur. Excepteur sint occaecat cupidatat non proident, sunt in "
- "culpa qui officia deserunt mollit anim id est laborum."))
-
-(defun insert-date ()
- "Insert a time-stamp according to locale's date and time format."
- (interactive)
- (insert (format-time-string "%c" (current-time))))
-
-(defun indent-buffer ()
- (interactive)
- (indent-region (point-min) (point-max)))
-
-(defun untabify-buffer ()
- (interactive)
- (untabify (point-min) (point-max)))
-
-(provide 'util)
diff --git a/shell/_emacs/site-lisp/with-package.el b/shell/_emacs/site-lisp/with-package.el
deleted file mode 100644
index 3dfc52d..0000000
--- a/shell/_emacs/site-lisp/with-package.el
+++ /dev/null
@@ -1,31 +0,0 @@
-(require 'cl)
-
-;; will be available at emacs 24.4
-(unless (fboundp 'with-eval-after-load)
- "Do magic from the future"
- (defmacro with-eval-after-load (file &rest body)
- `(eval-after-load ,file
- `(funcall (function ,(lambda () ,@body))))))
-
-(defmacro with-package (packages &rest body)
- "After pkg macro"
- (declare (indent defun))
- (when (symbolp packages) ;; make a list if necessary
- (setf packages (list packages)))
- `(progn
- (dolist (p ',packages)
- (when (not (package-installed-p p))
- (package-install p))
- (with-eval-after-load p ,@body))))
-
-(defmacro with-package* (packages &rest body)
- "After pkg macro*"
- (declare (indent defun))
- (when (symbolp packages) ;; make a list if necessary
- (setf packages (list packages)))
- `(prog1
- (with-package ,packages ,@body)
- (dolist (p ',packages)
- (require p))))
-
-(provide 'with-package)
diff --git a/shell/_emacs/tools/libs/jpeg62.dll b/shell/_emacs/tools/libs/jpeg62.dll
deleted file mode 100644
index 21c03d5..0000000
--- a/shell/_emacs/tools/libs/jpeg62.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/libXpm.dll b/shell/_emacs/tools/libs/libXpm.dll
deleted file mode 100644
index 0dcb292..0000000
--- a/shell/_emacs/tools/libs/libXpm.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/libpng-config b/shell/_emacs/tools/libs/libpng-config
deleted file mode 100644
index 3c39bc9..0000000
--- a/shell/_emacs/tools/libs/libpng-config
+++ /dev/null
@@ -1,124 +0,0 @@
-#! /bin/sh
-
-# libpng-config
-# provides configuration info for libpng.
-
-# Copyright (C) 2002, 2004, 2006, 2007 Glenn Randers-Pehrson
-# For conditions of distribution and use, see copyright notice in png.h
-
-# Modeled after libxml-config.
-
-version="1.2.37"
-prefix="c:/progra~1/libpng"
-exec_prefix="${prefix}"
-libdir="${exec_prefix}/lib"
-includedir="${prefix}/include/libpng12"
-libs="-lpng12"
-all_libs="-lpng12 -lz
-I_opts="-I${includedir}"
-L_opts="-L${libdir}"
-R_opts=""
-cppflags=""
-ccopts=""
-ldopts=""
-
-usage()
-{
- cat <<EOF
-Usage: $0 [OPTION] ...
-
-Known values for OPTION are:
-
- --prefix print libpng prefix
- --libdir print path to directory containing library
- --libs print library linking information
- --ccopts print compiler options
- --cppflags print pre-processor flags
- --cflags print preprocessor flags, I_opts, and compiler options
- --I_opts print "-I" include options
- --L_opts print linker "-L" flags for dynamic linking
- --R_opts print dynamic linker "-R" or "-rpath" flags
- --ldopts print linker options
- --ldflags print linker flags (ldopts, L_opts, R_opts, and libs)
- --static revise subsequent outputs for static linking
- --help print this help and exit
- --version print version information
-EOF
-
- exit $1
-}
-
-if test $# -eq 0; then
- usage 1
-fi
-
-while test $# -gt 0; do
- case "$1" in
-
- --prefix)
- echo ${prefix}
- ;;
-
- --version)
- echo ${version}
- exit 0
- ;;
-
- --help)
- usage 0
- ;;
-
- --ccopts)
- echo ${ccopts}
- ;;
-
- --cppflags)
- echo ${cppflags}
- ;;
-
- --cflags)
- echo ${I_opts} ${cppflags} ${ccopts}
- ;;
-
- --libdir)
- echo ${libdir}
- ;;
-
- --libs)
- echo ${libs}
- ;;
-
- --I_opts)
- echo ${I_opts}
- ;;
-
- --L_opts)
- echo ${L_opts}
- ;;
-
- --R_opts)
- echo ${R_opts}
- ;;
-
- --ldopts)
- echo ${ldopts}
- ;;
-
- --ldflags)
- echo ${ldopts} ${L_opts} ${R_opts} ${libs}
- ;;
-
- --static)
- R_opts=""
- libs=${all_libs}
- ;;
-
- *)
- usage
- exit 1
- ;;
- esac
- shift
-done
-
-exit 0
diff --git a/shell/_emacs/tools/libs/libpng12-config b/shell/_emacs/tools/libs/libpng12-config
deleted file mode 100644
index 3c39bc9..0000000
--- a/shell/_emacs/tools/libs/libpng12-config
+++ /dev/null
@@ -1,124 +0,0 @@
-#! /bin/sh
-
-# libpng-config
-# provides configuration info for libpng.
-
-# Copyright (C) 2002, 2004, 2006, 2007 Glenn Randers-Pehrson
-# For conditions of distribution and use, see copyright notice in png.h
-
-# Modeled after libxml-config.
-
-version="1.2.37"
-prefix="c:/progra~1/libpng"
-exec_prefix="${prefix}"
-libdir="${exec_prefix}/lib"
-includedir="${prefix}/include/libpng12"
-libs="-lpng12"
-all_libs="-lpng12 -lz
-I_opts="-I${includedir}"
-L_opts="-L${libdir}"
-R_opts=""
-cppflags=""
-ccopts=""
-ldopts=""
-
-usage()
-{
- cat <<EOF
-Usage: $0 [OPTION] ...
-
-Known values for OPTION are:
-
- --prefix print libpng prefix
- --libdir print path to directory containing library
- --libs print library linking information
- --ccopts print compiler options
- --cppflags print pre-processor flags
- --cflags print preprocessor flags, I_opts, and compiler options
- --I_opts print "-I" include options
- --L_opts print linker "-L" flags for dynamic linking
- --R_opts print dynamic linker "-R" or "-rpath" flags
- --ldopts print linker options
- --ldflags print linker flags (ldopts, L_opts, R_opts, and libs)
- --static revise subsequent outputs for static linking
- --help print this help and exit
- --version print version information
-EOF
-
- exit $1
-}
-
-if test $# -eq 0; then
- usage 1
-fi
-
-while test $# -gt 0; do
- case "$1" in
-
- --prefix)
- echo ${prefix}
- ;;
-
- --version)
- echo ${version}
- exit 0
- ;;
-
- --help)
- usage 0
- ;;
-
- --ccopts)
- echo ${ccopts}
- ;;
-
- --cppflags)
- echo ${cppflags}
- ;;
-
- --cflags)
- echo ${I_opts} ${cppflags} ${ccopts}
- ;;
-
- --libdir)
- echo ${libdir}
- ;;
-
- --libs)
- echo ${libs}
- ;;
-
- --I_opts)
- echo ${I_opts}
- ;;
-
- --L_opts)
- echo ${L_opts}
- ;;
-
- --R_opts)
- echo ${R_opts}
- ;;
-
- --ldopts)
- echo ${ldopts}
- ;;
-
- --ldflags)
- echo ${ldopts} ${L_opts} ${R_opts} ${libs}
- ;;
-
- --static)
- R_opts=""
- libs=${all_libs}
- ;;
-
- *)
- usage
- exit 1
- ;;
- esac
- shift
-done
-
-exit 0
diff --git a/shell/_emacs/tools/libs/libpng12.dll b/shell/_emacs/tools/libs/libpng12.dll
deleted file mode 100644
index 25c0a7c..0000000
--- a/shell/_emacs/tools/libs/libpng12.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/libpng14-14.dll b/shell/_emacs/tools/libs/libpng14-14.dll
deleted file mode 100644
index 8b93b06..0000000
--- a/shell/_emacs/tools/libs/libpng14-14.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/libpng3.dll b/shell/_emacs/tools/libs/libpng3.dll
deleted file mode 100644
index 649ec64..0000000
--- a/shell/_emacs/tools/libs/libpng3.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/libtiff3.dll b/shell/_emacs/tools/libs/libtiff3.dll
deleted file mode 100644
index 9883c51..0000000
--- a/shell/_emacs/tools/libs/libtiff3.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/libungif4.dll b/shell/_emacs/tools/libs/libungif4.dll
deleted file mode 100644
index 2308352..0000000
--- a/shell/_emacs/tools/libs/libungif4.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/xpm4.dll b/shell/_emacs/tools/libs/xpm4.dll
deleted file mode 100644
index 0414d84..0000000
--- a/shell/_emacs/tools/libs/xpm4.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/zip.exe b/shell/_emacs/tools/libs/zip.exe
deleted file mode 100644
index 65de183..0000000
--- a/shell/_emacs/tools/libs/zip.exe
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/libs/zlib1.dll b/shell/_emacs/tools/libs/zlib1.dll
deleted file mode 100644
index 31996cd..0000000
--- a/shell/_emacs/tools/libs/zlib1.dll
+++ /dev/null
Binary files differ
diff --git a/shell/_emacs/tools/profiler/profile-dotemacs.el b/shell/_emacs/tools/profiler/profile-dotemacs.el
deleted file mode 100644
index 160b800..0000000
--- a/shell/_emacs/tools/profiler/profile-dotemacs.el
+++ /dev/null
@@ -1,200 +0,0 @@
-;;; profile-dotemacs.el --- Profile your Emacs init file
-
-;; Copyright (C) 2010, 2012 David Engster
-
-;; Author: David Engster <dengste@eml.cc>
-
-;; This file is NOT part of GNU Emacs.
-
-;; This program is free software; you can redistribute it and/or
-;; modify it under the terms of the GNU General Public License
-;; as published by the Free Software Foundation; either version 2
-;; of the License, or (at your option) any later version.
-;;
-;; This program is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-;;
-;; You should have received a copy of the GNU General Public License
-;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; This is to easily profile your Emacs init file (or any other
-;; script-like Emacs Lisp file, for that matter).
-
-;; It will go over all sexp's (balanced expressions) in the file and
-;; run them through `benchmark-run'. It will then show the file with
-;; overlays applied in a way that let you easily find out which sexp's
-;; take the most time. Since time is relative, it's not the absolute
-;; value that counts but the percentage of the total running time.
-;;
-;; * All other sexp's with a percentage greater than
-;; `profile-dotemacs-low-percentage' will be preceded by a
-;; highlighted line, showing the results from `benchmark-run'.
-;; Also, the more 'reddish' the background of the sexp, the more
-;; time it needs.
-
-;; * All other sexp's will be grayed out to indicate that their
-;; running time is miniscule. You can still see the benchmark
-;; results in the minibuffer by hovering over the sexp with the
-;; mouse.
-
-;; You can only benchmark full sexp's, so if you wrapped large parts
-;; of your init file in some conditional clause, you'll have to remove
-;; that for getting finer granularity.
-
-;;; Usage:
-
-;; Start emacs as follows:
-;;
-;; emacs -Q -l <PATH>/profile-dotemacs.el -f profile-dotemacs
-;;
-;; with <PATH> being the path to where this file resides.
-
-;;; Caveats (thanks to Raffaele Ricciardi for reporting those):
-
-;; - The usual `--debug-init' for debugging your init file won't work
-;; with profile-dotemacs, so you'll have to call
-;; `toggle-debug-on-error', either on the commandline or at the
-;; beginning of your init file.
-;; - `load-file-name' is nil when the init file is being loaded
-;; by the profiler. This might matter if you perform the
-;; bulk of initializations in a different file.
-;; - Starting external shells like IELM or eshell in your init file
-;; might mess with overlay creation, so this must not be done.
-
-;;; Download:
-
-;; You can always get the latest version from
-;; http://randomsample.de/profile-dotemacs.el
-
-;;; Code:
-
-(require 'thingatpt)
-(require 'benchmark)
-
-;; User variables
-
-(defvar profile-dotemacs-file "~/.emacs"
- "File to be profiled.")
-
-(defvar profile-dotemacs-low-percentage 3
- "Percentage which should be considered low.
-All sexp's with a running time below this percentage will be
-grayed out.")
-
-(defface profile-dotemacs-time-face
- '((((background dark)) (:background "OrangeRed1"))
- (t (:background "red3")))
- "Background color to indicate percentage of total time.")
-
-(defface profile-dotemacs-low-percentage-face
- '((((background dark)) (:foreground "gray25"))
- (t (:foreground "gray75")))
- "Face for sexps below `profile-dotemacs-low-percentage'.")
-
-(defface profile-dotemacs-highlight-face
- '((((background dark)) (:background "blue"))
- (t (:background "yellow")))
- "Highlight face for benchmark results.")
-
-;; Main function
-
-(defun profile-dotemacs ()
- "Load `profile-dotemacs-file' and benchmark its sexps."
- (interactive)
- (with-current-buffer (find-file-noselect profile-dotemacs-file t)
- (setq buffer-read-only t) ;; just to be sure
- (goto-char (point-min))
- (let (start end results)
- (while
- (< (point)
- (setq end (progn
- (forward-sexp 1)
- (point))))
- (forward-sexp -1)
- (setq start (point))
- (add-to-list
- 'results
- `(,start ,end
- ,(benchmark-run
- (eval (sexp-at-point)))))
- (goto-char end))
- (profile-dotemacs-show-results results)
- (switch-to-buffer (current-buffer)))))
-
-;; Helper functions
-
-(defun profile-dotemacs-show-results (results)
- "Show timings from RESULTS in current buffer."
- (let ((totaltime (profile-dotemacs-totaltime results))
- current percentage ov)
- (while results
- (let* ((current (pop results))
- (ov (make-overlay (car current) (cadr current)))
- (current (car (last current)))
- (percentage (/ (+ (car current) (nth 2 current))
- totaltime))
- col benchstr lowface)
- (setq col
- (profile-dotemacs-percentage-color
- percentage
- (face-background 'default)
- (face-background 'profile-dotemacs-time-face)))
- (setq percentage (round (* 100 percentage)))
- (setq benchstr (profile-dotemacs-make-benchstr current))
- (overlay-put ov 'help-echo benchstr)
- (if (and (numberp profile-dotemacs-low-percentage)
- (< percentage profile-dotemacs-low-percentage))
- (overlay-put ov 'face 'profile-dotemacs-low-percentage-face)
- (overlay-put ov 'before-string
- (propertize benchstr
- 'face 'profile-dotemacs-highlight-face))
- (overlay-put ov 'face
- `(:background ,col)))))
- (setq ov (make-overlay (1- (point-max)) (point-max)))
- (overlay-put ov 'after-string
- (propertize
- (format "\n-----------------\nTotal time: %.2fs\n"
- totaltime)
- 'face 'profile-dotemacs-highlight-face))))
-
-(defun profile-dotemacs-totaltime (results)
- "Calculate total time of RESULTS."
- (let ((totaltime 0))
- (mapc (lambda (x)
- (let ((cur (car (last x))))
- (setq totaltime (+ totaltime (car cur) (nth 2 cur)))))
- results)
- totaltime))
-
-(defun profile-dotemacs-percentage-color (percent col-begin col-end)
- "Calculate color according to PERCENT between COL-BEGIN and COL-END."
- (let* ((col1 (color-values col-begin))
- (col2 (color-values col-end))
- (col
- (mapcar (lambda (c)
- (round
- (+ (* (- 1 percent) (nth c col1))
- (* percent (nth c col2)))))
- '(0 1 2))))
- (format "RGB:%04x/%04x/%04x"
- (car col)
- (nth 1 col)
- (nth 2 col))))
-
-(defun profile-dotemacs-make-benchstr (timings)
- "Create descriptive benchmark string from TIMINGS."
- (format
- (concat
- "<Percentage: %d ; "
- "Time: %.2f ; "
- "Number of GC: %d ; "
- "Time for GC: %.2f>\n")
- percentage
- (car timings) (nth 1 timings) (nth 2 timings)))
-
-
-;; profile-dotemacs.el ends here
diff --git a/shell/_emacs/tools/profiler/run_profiler.el b/shell/_emacs/tools/profiler/run_profiler.el
deleted file mode 100644
index 39939c2..0000000
--- a/shell/_emacs/tools/profiler/run_profiler.el
+++ /dev/null
@@ -1,2 +0,0 @@
-;; won't work unless .emacs exists
-(eshell-command "emacs -Q -l ~/.emacs.d/tools/profiler/profile-dotemacs.el -f profile-dotemacs")