From 3b2cf68142df8dd9973b834d1fd357e5ab58665e Mon Sep 17 00:00:00 2001 From: Gergely Polonkai Date: Mon, 24 Oct 2016 12:49:15 +0200 Subject: [PATCH] Remove the elpa/ directory from version control All my packages are now installed via `use-package`. --- .gitignore | 2 + .../ace-window-autoloads.el | 68 - .../ace-window-pkg.el | 2 - elpa/ace-window-20161018.1624/ace-window.el | 563 - elpa/ag-20161021.2133/ag-autoloads.el | 122 - elpa/ag-20161021.2133/ag-pkg.el | 2 - elpa/ag-20161021.2133/ag.el | 676 - elpa/alert-20160824.821/alert-autoloads.el | 92 - elpa/alert-20160824.821/alert-pkg.el | 2 - elpa/alert-20160824.821/alert.el | 1045 - .../ascii-art-to-unicode-autoloads.el | 73 - .../ascii-art-to-unicode-pkg.el | 2 - .../ascii-art-to-unicode.el | 510 - elpa/async-20161010.2322/async-autoloads.el | 131 - elpa/async-20161010.2322/async-bytecomp.el | 177 - elpa/async-20161010.2322/async-pkg.el | 6 - elpa/async-20161010.2322/async.el | 303 - elpa/async-20161010.2322/dired-async.el | 333 - elpa/async-20161010.2322/smtpmail-async.el | 73 - elpa/avy-20160814.250/avy-autoloads.el | 218 - elpa/avy-20160814.250/avy-pkg.el | 2 - elpa/avy-20160814.250/avy.el | 1699 -- elpa/beacon-20161004.756/beacon-autoloads.el | 43 - elpa/beacon-20161004.756/beacon-pkg.el | 2 - elpa/beacon-20161004.756/beacon.el | 481 - .../bind-key-autoloads.el | 72 - elpa/bind-key-20160227.48/bind-key-pkg.el | 2 - elpa/bind-key-20160227.48/bind-key.el | 414 - .../cheatsheet-autoloads.el | 27 - .../cheatsheet-20151203.151/cheatsheet-pkg.el | 2 - elpa/cheatsheet-20151203.151/cheatsheet.el | 145 - .../coffee-mode-autoloads.el | 32 - .../coffee-mode-pkg.el | 2 - elpa/coffee-mode-20160808.1712/coffee-mode.el | 1357 - .../command-log-mode-autoloads.el | 27 - .../command-log-mode-pkg.el | 2 - .../command-log-mode.el | 323 - elpa/company-20160829.1206/company-abbrev.el | 50 - .../company-autoloads.el | 298 - elpa/company-20160829.1206/company-bbdb.el | 61 - elpa/company-20160829.1206/company-capf.el | 167 - elpa/company-20160829.1206/company-clang.el | 331 - elpa/company-20160829.1206/company-cmake.el | 198 - elpa/company-20160829.1206/company-css.el | 442 - .../company-dabbrev-code.el | 104 - elpa/company-20160829.1206/company-dabbrev.el | 195 - elpa/company-20160829.1206/company-eclim.el | 186 - elpa/company-20160829.1206/company-elisp.el | 225 - elpa/company-20160829.1206/company-etags.el | 107 - elpa/company-20160829.1206/company-files.el | 148 - elpa/company-20160829.1206/company-gtags.el | 117 - elpa/company-20160829.1206/company-ispell.el | 82 - .../company-20160829.1206/company-keywords.el | 263 - elpa/company-20160829.1206/company-nxml.el | 142 - elpa/company-20160829.1206/company-oddmuse.el | 57 - elpa/company-20160829.1206/company-pkg.el | 8 - .../company-20160829.1206/company-semantic.el | 167 - .../company-20160829.1206/company-template.el | 214 - elpa/company-20160829.1206/company-tempo.el | 71 - elpa/company-20160829.1206/company-xcode.el | 123 - .../company-yasnippet.el | 147 - elpa/company-20160829.1206/company.el | 3109 -- .../company-c-headers-autoloads.el | 22 - .../company-c-headers-pkg.el | 1 - .../company-c-headers.el | 188 - .../company-emoji-autoloads.el | 34 - .../company-emoji-pkg.el | 2 - .../company-emoji.el | 1319 - .../company-restclient-autoloads.el | 23 - .../company-restclient-pkg.el | 2 - .../company-restclient.el | 140 - .../company-shell-autoloads.el | 32 - .../company-shell-pkg.el | 2 - .../company-shell.el | 184 - elpa/dash-20161018.136/dash-autoloads.el | 15 - elpa/dash-20161018.136/dash-pkg.el | 2 - elpa/dash-20161018.136/dash.el | 2517 -- .../diminish-autoloads.el | 57 - elpa/diminish-20151215.915/diminish-pkg.el | 2 - elpa/diminish-20151215.915/diminish.el | 293 - .../drag-stuff-autoloads.el | 78 - .../drag-stuff-pkg.el | 4 - elpa/drag-stuff-20160520.1159/drag-stuff.el | 366 - .../electric-case-autoloads.el | 16 - .../electric-case-pkg.el | 1 - .../electric-case.el | 383 - .../electric-spacing-autoloads.el | 29 - .../electric-spacing-pkg.el | 1 - .../electric-spacing.el | 405 - elpa/emamux-20160602.653/emamux-autoloads.el | 108 - elpa/emamux-20160602.653/emamux-pkg.el | 1 - elpa/emamux-20160602.653/emamux.el | 576 - elpa/epl-20150517.433/epl-autoloads.el | 15 - elpa/epl-20150517.433/epl-pkg.el | 1 - elpa/epl-20150517.433/epl.el | 695 - elpa/esxml-20160703.1417/esxml-autoloads.el | 15 - elpa/esxml-20160703.1417/esxml-pkg.el | 2 - elpa/esxml-20160703.1417/esxml.el | 261 - .../flycheck-autoloads.el | 240 - .../flycheck-buttercup.el | 144 - elpa/flycheck-20161023.738/flycheck-ert.el | 432 - elpa/flycheck-20161023.738/flycheck-pkg.el | 11 - elpa/flycheck-20161023.738/flycheck.el | 9329 ------ .../flycheck-pkg-config-autoloads.el | 23 - .../flycheck-pkg-config-pkg.el | 1 - .../flycheck-pkg-config.el | 85 - elpa/focus-20161013.401/focus-autoloads.el | 26 - elpa/focus-20161013.401/focus-pkg.el | 2 - elpa/focus-20161013.401/focus.el | 306 - elpa/ggtags-20161022.251/ggtags-autoloads.el | 51 - elpa/ggtags-20161022.251/ggtags-pkg.el | 2 - elpa/ggtags-20161022.251/ggtags.el | 2405 -- .../git-commit-autoloads.el | 36 - .../git-commit-pkg.el | 2 - elpa/git-commit-20161011.1738/git-commit.el | 721 - .../git-gutter-autoloads.el | 58 - .../git-gutter-20160903.852/git-gutter-pkg.el | 1 - elpa/git-gutter-20160903.852/git-gutter.el | 1070 - .../git-messenger-autoloads.el | 22 - .../git-messenger-pkg.el | 1 - .../git-messenger.el | 406 - .../git-timemachine-autoloads.el | 32 - .../git-timemachine-pkg.el | 2 - .../git-timemachine.el | 286 - .../gitconfig-mode-autoloads.el | 24 - .../gitconfig-mode-pkg.el | 1 - .../gitconfig-mode.el | 138 - .../gitignore-mode-autoloads.el | 24 - .../gitignore-mode-pkg.el | 1 - .../gitignore-mode.el | 61 - elpa/gntp-20141024.1950/gntp-autoloads.el | 22 - elpa/gntp-20141024.1950/gntp-pkg.el | 2 - elpa/gntp-20141024.1950/gntp.el | 243 - elpa/gnugo-3.0.0/.dir-locals.el | 5 - elpa/gnugo-3.0.0/ChangeLog | 2486 -- elpa/gnugo-3.0.0/HACKING | 82 - elpa/gnugo-3.0.0/NEWS | 205 - elpa/gnugo-3.0.0/README | 6 - elpa/gnugo-3.0.0/gnugo-autoloads.el | 94 - elpa/gnugo-3.0.0/gnugo-frolic.el | 509 - elpa/gnugo-3.0.0/gnugo-imgen.el | 247 - elpa/gnugo-3.0.0/gnugo-pkg.el | 2 - elpa/gnugo-3.0.0/gnugo.el | 2753 -- elpa/gobgen-20161020.823/gobgen-autoloads.el | 21 - elpa/gobgen-20161020.823/gobgen-pkg.el | 2 - elpa/gobgen-20161020.823/gobgen.el | 521 - elpa/google-20140416.1048/google-autoloads.el | 15 - elpa/google-20140416.1048/google-pkg.el | 1 - elpa/google-20140416.1048/google.el | 181 - .../goto-last-change-autoloads.el | 25 - .../goto-last-change-pkg.el | 2 - .../goto-last-change.el | 142 - .../haml-mode-autoloads.el | 26 - elpa/haml-mode-20150508.2011/haml-mode-pkg.el | 1 - elpa/haml-mode-20150508.2011/haml-mode.el | 888 - elpa/helm-20161023.1200/emacs-helm.sh | 106 - elpa/helm-20161023.1200/helm-adaptive.el | 234 - elpa/helm-20161023.1200/helm-apt.el | 298 - elpa/helm-20161023.1200/helm-autoloads.el | 989 - elpa/helm-20161023.1200/helm-bookmark.el | 790 - elpa/helm-20161023.1200/helm-buffers.el | 924 - elpa/helm-20161023.1200/helm-color.el | 170 - elpa/helm-20161023.1200/helm-command.el | 294 - elpa/helm-20161023.1200/helm-config.el | 170 - elpa/helm-20161023.1200/helm-dabbrev.el | 327 - elpa/helm-20161023.1200/helm-easymenu.el | 90 - elpa/helm-20161023.1200/helm-elisp-package.el | 440 - elpa/helm-20161023.1200/helm-elisp.el | 948 - elpa/helm-20161023.1200/helm-elscreen.el | 102 - elpa/helm-20161023.1200/helm-eshell.el | 272 - elpa/helm-20161023.1200/helm-eval.el | 204 - elpa/helm-20161023.1200/helm-external.el | 213 - elpa/helm-20161023.1200/helm-files.el | 3778 --- elpa/helm-20161023.1200/helm-font.el | 201 - elpa/helm-20161023.1200/helm-grep.el | 1533 - elpa/helm-20161023.1200/helm-help.el | 1124 - elpa/helm-20161023.1200/helm-id-utils.el | 133 - elpa/helm-20161023.1200/helm-imenu.el | 287 - elpa/helm-20161023.1200/helm-info.el | 247 - elpa/helm-20161023.1200/helm-locate.el | 410 - elpa/helm-20161023.1200/helm-man.el | 115 - elpa/helm-20161023.1200/helm-misc.el | 344 - elpa/helm-20161023.1200/helm-mode.el | 1205 - elpa/helm-20161023.1200/helm-net.el | 521 - elpa/helm-20161023.1200/helm-org.el | 339 - elpa/helm-20161023.1200/helm-pkg.el | 9 - elpa/helm-20161023.1200/helm-regexp.el | 644 - elpa/helm-20161023.1200/helm-ring.el | 469 - elpa/helm-20161023.1200/helm-semantic.el | 223 - elpa/helm-20161023.1200/helm-sys.el | 449 - elpa/helm-20161023.1200/helm-tags.el | 341 - elpa/helm-20161023.1200/helm-types.el | 283 - elpa/helm-20161023.1200/helm-utils.el | 830 - .../helm-ag-20161020.952/helm-ag-autoloads.el | 67 - elpa/helm-ag-20161020.952/helm-ag-pkg.el | 2 - elpa/helm-ag-20161020.952/helm-ag.el | 1168 - .../helm-chrome-autoloads.el | 22 - .../helm-chrome-pkg.el | 1 - elpa/helm-chrome-20160718.2220/helm-chrome.el | 137 - .../helm-company-autoloads.el | 23 - .../helm-company-pkg.el | 2 - elpa/helm-company-20161010.59/helm-company.el | 195 - .../helm-core-autoloads.el | 200 - elpa/helm-core-20161022.251/helm-core-pkg.el | 7 - elpa/helm-core-20161022.251/helm-lib.el | 903 - .../helm-multi-match.el | 368 - elpa/helm-core-20161022.251/helm-source.el | 1003 - elpa/helm-core-20161022.251/helm.el | 5486 ---- .../helm-descbinds-autoloads.el | 65 - .../helm-descbinds-pkg.el | 2 - .../helm-descbinds.el | 293 - .../helm-describe-modes-autoloads.el | 26 - .../helm-describe-modes-pkg.el | 2 - .../helm-describe-modes.el | 185 - .../helm-flycheck-autoloads.el | 22 - .../helm-flycheck-pkg.el | 1 - .../helm-flycheck.el | 197 - .../helm-flyspell-autoloads.el | 23 - .../helm-flyspell-pkg.el | 2 - .../helm-flyspell.el | 135 - .../helm-github-stars-autoloads.el | 22 - .../helm-github-stars-pkg.el | 2 - .../helm-github-stars.el | 424 - .../helm-google-autoloads.el | 22 - .../helm-google-pkg.el | 1 - elpa/helm-google-20160620.1149/helm-google.el | 255 - .../helm-gtags-autoloads.el | 148 - .../helm-gtags-pkg.el | 1 - elpa/helm-gtags-20160917.2238/helm-gtags.el | 1327 - .../helm-projectile-autoloads.el | 76 - .../helm-projectile-pkg.el | 2 - .../helm-projectile.el | 900 - .../helm-smex-autoloads.el | 27 - elpa/helm-smex-20160530.1236/helm-smex-pkg.el | 2 - elpa/helm-smex-20160530.1236/helm-smex.el | 98 - .../helm-swoop-autoloads.el | 81 - .../helm-swoop-20160619.953/helm-swoop-pkg.el | 1 - elpa/helm-swoop-20160619.953/helm-swoop.el | 1677 - .../hungarian-holidays-autoloads.el | 22 - .../hungarian-holidays-pkg.el | 2 - .../hungarian-holidays.el | 75 - .../hungry-delete-autoloads.el | 87 - .../hungry-delete-pkg.el | 2 - .../hungry-delete.el | 225 - elpa/hyde-20160507.2008/hyde-autoloads.el | 16 - elpa/hyde-20160507.2008/hyde-git.el | 96 - elpa/hyde-20160507.2008/hyde-md.el | 96 - elpa/hyde-20160507.2008/hyde-pkg.el | 4 - elpa/hyde-20160507.2008/hyde.el | 524 - elpa/hyde-20160507.2008/sample-dot-hyde.el | 9 - .../id-manager-autoloads.el | 27 - .../id-manager-20160425.216/id-manager-pkg.el | 1 - elpa/id-manager-20160425.216/id-manager.el | 831 - .../bbdb-identica.el | 381 - elpa/identica-mode-20130204.1453/dir | 19 - elpa/identica-mode-20130204.1453/fdl.info | 430 - .../identica-friends.el | 793 - .../identica-mode-autoloads.el | 27 - .../identica-mode-pkg.el | 5 - .../identica-mode.el | 2494 -- .../identica-mode.info | 859 - .../jinja2-mode-autoloads.el | 24 - .../jinja2-mode-pkg.el | 1 - elpa/jinja2-mode-20141128.207/jinja2-mode.el | 329 - .../js2-mode-20161016.156/js2-imenu-extras.el | 349 - .../js2-mode-autoloads.el | 68 - elpa/js2-mode-20161016.156/js2-mode-pkg.el | 8 - elpa/js2-mode-20161016.156/js2-mode.el | 12726 -------- elpa/js2-mode-20161016.156/js2-old-indent.el | 708 - .../json-mode-autoloads.el | 36 - elpa/json-mode-20160803.1606/json-mode-pkg.el | 2 - elpa/json-mode-20160803.1606/json-mode.el | 108 - .../json-reformat-autoloads.el | 26 - .../json-reformat-pkg.el | 1 - .../json-reformat.el | 221 - .../json-snatcher-autoloads.el | 22 - .../json-snatcher-pkg.el | 1 - .../json-snatcher.el | 351 - .../http-headers.el | 138 - .../http-methods.el | 38 - .../http-relations.el | 96 - .../http-status-codes.el | 169 - .../know-your-http-well-autoloads.el | 71 - .../know-your-http-well-pkg.el | 4 - .../know-your-http-well.el | 11 - .../media-types.el | 417 - elpa/let-alist-1.0.4/let-alist-autoloads.el | 50 - elpa/let-alist-1.0.4/let-alist-pkg.el | 1 - elpa/let-alist-1.0.4/let-alist.el | 170 - elpa/log4e-20150105.505/log4e-autoloads.el | 15 - elpa/log4e-20150105.505/log4e-pkg.el | 2 - elpa/log4e-20150105.505/log4e.el | 590 - elpa/magit-20161022.1845/AUTHORS.md | 255 - elpa/magit-20161022.1845/COPYING | 676 - elpa/magit-20161022.1845/dir | 18 - elpa/magit-20161022.1845/git-rebase.el | 514 - elpa/magit-20161022.1845/magit-apply.el | 592 - elpa/magit-20161022.1845/magit-autoloads.el | 1751 -- elpa/magit-20161022.1845/magit-autorevert.el | 260 - elpa/magit-20161022.1845/magit-bisect.el | 209 - elpa/magit-20161022.1845/magit-blame.el | 525 - elpa/magit-20161022.1845/magit-commit.el | 416 - elpa/magit-20161022.1845/magit-core.el | 77 - elpa/magit-20161022.1845/magit-diff.el | 2410 -- elpa/magit-20161022.1845/magit-ediff.el | 508 - elpa/magit-20161022.1845/magit-extras.el | 203 - elpa/magit-20161022.1845/magit-git.el | 1542 - elpa/magit-20161022.1845/magit-log.el | 1521 - elpa/magit-20161022.1845/magit-mode.el | 1121 - elpa/magit-20161022.1845/magit-pkg.el | 12 - elpa/magit-20161022.1845/magit-process.el | 879 - elpa/magit-20161022.1845/magit-remote.el | 776 - elpa/magit-20161022.1845/magit-section.el | 1164 - elpa/magit-20161022.1845/magit-sequence.el | 665 - elpa/magit-20161022.1845/magit-stash.el | 401 - elpa/magit-20161022.1845/magit-submodule.el | 349 - elpa/magit-20161022.1845/magit-subtree.el | 143 - elpa/magit-20161022.1845/magit-utils.el | 534 - elpa/magit-20161022.1845/magit-wip.el | 288 - elpa/magit-20161022.1845/magit.el | 3543 --- elpa/magit-20161022.1845/magit.info | 177 - elpa/magit-20161022.1845/magit.info-1 | 7919 ----- elpa/magit-20161022.1845/magit.info-2 | Bin 56853 -> 0 bytes .../magit-gerrit-autoloads.el | 16 - .../magit-gerrit-pkg.el | 1 - .../magit-gerrit-20160226.130/magit-gerrit.el | 595 - elpa/magit-popup-20161009.1506/dir | 18 - .../magit-popup-autoloads.el | 16 - .../magit-popup-pkg.el | 9 - elpa/magit-popup-20161009.1506/magit-popup.el | 1281 - .../magit-popup.info | 712 - .../magithub-autoloads.el | 17 - elpa/magithub-20161013.2332/magithub-cache.el | 88 - elpa/magithub-20161013.2332/magithub-ci.el | 294 - elpa/magithub-20161013.2332/magithub-core.el | 239 - elpa/magithub-20161013.2332/magithub-issue.el | 305 - elpa/magithub-20161013.2332/magithub-pkg.el | 11 - elpa/magithub-20161013.2332/magithub.el | 235 - .../markdown-mode-autoloads.el | 31 - .../markdown-mode-pkg.el | 2 - .../markdown-mode.el | 6845 ----- elpa/mc-extras-20150218.234/mc-compare.el | 88 - elpa/mc-extras-20150218.234/mc-cua.el | 153 - .../mc-extras-autoloads.el | 109 - elpa/mc-extras-20150218.234/mc-extras-pkg.el | 7 - elpa/mc-extras-20150218.234/mc-extras.el | 78 - elpa/mc-extras-20150218.234/mc-freeze.el | 129 - elpa/mc-extras-20150218.234/mc-rect.el | 85 - elpa/mc-extras-20150218.234/mc-remove.el | 82 - .../mc-cycle-cursors.el | 119 - .../mc-edit-lines.el | 110 - .../mc-hide-unmatched-lines-mode.el | 107 - .../mc-mark-more.el | 712 - .../mc-mark-pop.el | 22 - .../mc-separate-operations.el | 155 - .../multiple-cursors-autoloads.el | 341 - .../multiple-cursors-core.el | 792 - .../multiple-cursors-pkg.el | 5 - .../multiple-cursors.el | 199 - .../rectangular-region-mode.el | 125 - elpa/ng2-mode-20160910.820/ng2-html.el | 93 - .../ng2-mode-autoloads.el | 54 - elpa/ng2-mode-20160910.820/ng2-mode-pkg.el | 7 - elpa/ng2-mode-20160910.820/ng2-mode.el | 80 - elpa/ng2-mode-20160910.820/ng2-ts.el | 99 - .../img/nyan-frame-1.xpm | 170 - .../img/nyan-frame-2.xpm | 157 - .../img/nyan-frame-3.xpm | 159 - .../img/nyan-frame-4.xpm | 157 - .../img/nyan-frame-5.xpm | 157 - .../img/nyan-frame-6.xpm | 165 - elpa/nyan-mode-20160429.1323/img/nyan.xpm | 157 - .../img/outerspace.xpm | 142 - elpa/nyan-mode-20160429.1323/img/rainbow.xpm | 42 - .../mus/nyanlooped.mp3 | Bin 433006 -> 0 bytes .../nyan-mode-autoloads.el | 40 - elpa/nyan-mode-20160429.1323/nyan-mode-pkg.el | 5 - elpa/nyan-mode-20160429.1323/nyan-mode.el | 295 - elpa/nyan-prompt-20140809.2208/img/nyan.xpm | 167 - .../nyan-prompt-autoloads.el | 27 - .../nyan-prompt-pkg.el | 5 - elpa/nyan-prompt-20140809.2208/nyan-prompt.el | 59 - elpa/org-20161017/COPYING | 674 - elpa/org-20161017/README_ELPA | 41 - elpa/org-20161017/dir | 18 - elpa/org-20161017/etc/ORG-NEWS | 3119 -- .../etc/styles/OrgOdtContentTemplate.xml | 275 - elpa/org-20161017/etc/styles/OrgOdtStyles.xml | 861 - elpa/org-20161017/etc/styles/README | 36 - elpa/org-20161017/ob-C.el | 439 - elpa/org-20161017/ob-J.el | 179 - elpa/org-20161017/ob-R.el | 469 - elpa/org-20161017/ob-abc.el | 94 - elpa/org-20161017/ob-asymptote.el | 147 - elpa/org-20161017/ob-awk.el | 112 - elpa/org-20161017/ob-calc.el | 108 - elpa/org-20161017/ob-clojure.el | 119 - elpa/org-20161017/ob-comint.el | 164 - elpa/org-20161017/ob-coq.el | 77 - elpa/org-20161017/ob-core.el | 3143 -- elpa/org-20161017/ob-css.el | 48 - elpa/org-20161017/ob-ditaa.el | 126 - elpa/org-20161017/ob-dot.el | 91 - elpa/org-20161017/ob-ebnf.el | 85 - elpa/org-20161017/ob-emacs-lisp.el | 79 - elpa/org-20161017/ob-eval.el | 150 - elpa/org-20161017/ob-exp.el | 448 - elpa/org-20161017/ob-forth.el | 86 - elpa/org-20161017/ob-fortran.el | 169 - elpa/org-20161017/ob-gnuplot.el | 280 - elpa/org-20161017/ob-groovy.el | 118 - elpa/org-20161017/ob-haskell.el | 220 - elpa/org-20161017/ob-io.el | 110 - elpa/org-20161017/ob-java.el | 87 - elpa/org-20161017/ob-js.el | 163 - elpa/org-20161017/ob-keys.el | 106 - elpa/org-20161017/ob-latex.el | 223 - elpa/org-20161017/ob-ledger.el | 71 - elpa/org-20161017/ob-lilypond.el | 419 - elpa/org-20161017/ob-lisp.el | 111 - elpa/org-20161017/ob-lob.el | 179 - elpa/org-20161017/ob-makefile.el | 48 - elpa/org-20161017/ob-matlab.el | 47 - elpa/org-20161017/ob-maxima.el | 127 - elpa/org-20161017/ob-mscgen.el | 84 - elpa/org-20161017/ob-ocaml.el | 173 - elpa/org-20161017/ob-octave.el | 276 - elpa/org-20161017/ob-org.el | 72 - elpa/org-20161017/ob-perl.el | 158 - elpa/org-20161017/ob-picolisp.el | 189 - elpa/org-20161017/ob-plantuml.el | 85 - elpa/org-20161017/ob-processing.el | 197 - elpa/org-20161017/ob-python.el | 346 - elpa/org-20161017/ob-ref.el | 281 - elpa/org-20161017/ob-ruby.el | 267 - elpa/org-20161017/ob-sass.el | 71 - elpa/org-20161017/ob-scala.el | 116 - elpa/org-20161017/ob-scheme.el | 208 - elpa/org-20161017/ob-screen.el | 145 - elpa/org-20161017/ob-sed.el | 107 - elpa/org-20161017/ob-shell.el | 266 - elpa/org-20161017/ob-shen.el | 79 - elpa/org-20161017/ob-sql.el | 228 - elpa/org-20161017/ob-sqlite.el | 162 - elpa/org-20161017/ob-stan.el | 0 elpa/org-20161017/ob-table.el | 151 - elpa/org-20161017/ob-tangle.el | 609 - elpa/org-20161017/ob.el | 43 - elpa/org-20161017/org | 22223 -------------- elpa/org-20161017/org-agenda.el | 10233 ------- elpa/org-20161017/org-archive.el | 607 - elpa/org-20161017/org-attach.el | 507 - elpa/org-20161017/org-autoloads.el | 703 - elpa/org-20161017/org-bbdb.el | 448 - elpa/org-20161017/org-bibtex.el | 739 - elpa/org-20161017/org-capture.el | 1855 -- elpa/org-20161017/org-clock.el | 3044 -- elpa/org-20161017/org-colview.el | 1604 - elpa/org-20161017/org-compat.el | 566 - elpa/org-20161017/org-crypt.el | 276 - elpa/org-20161017/org-ctags.el | 542 - elpa/org-20161017/org-datetree.el | 219 - elpa/org-20161017/org-docview.el | 102 - elpa/org-20161017/org-element.el | 6042 ---- elpa/org-20161017/org-entities.el | 611 - elpa/org-20161017/org-eshell.el | 65 - elpa/org-20161017/org-faces.el | 811 - elpa/org-20161017/org-feed.el | 705 - elpa/org-20161017/org-footnote.el | 989 - elpa/org-20161017/org-gnus.el | 307 - elpa/org-20161017/org-habit.el | 424 - elpa/org-20161017/org-id.el | 690 - elpa/org-20161017/org-indent.el | 384 - elpa/org-20161017/org-info.el | 99 - elpa/org-20161017/org-inlinetask.el | 350 - elpa/org-20161017/org-install.el | 17 - elpa/org-20161017/org-irc.el | 259 - elpa/org-20161017/org-lint.el | 1151 - elpa/org-20161017/org-list.el | 3315 -- elpa/org-20161017/org-loaddefs.el | 3408 --- elpa/org-20161017/org-macro.el | 283 - elpa/org-20161017/org-macs.el | 398 - elpa/org-20161017/org-mhe.el | 228 - elpa/org-20161017/org-mobile.el | 1147 - elpa/org-20161017/org-mouse.el | 1110 - elpa/org-20161017/org-pcomplete.el | 404 - elpa/org-20161017/org-pkg.el | 3 - elpa/org-20161017/org-plot.el | 355 - elpa/org-20161017/org-protocol.el | 638 - elpa/org-20161017/org-rmail.el | 125 - elpa/org-20161017/org-src.el | 979 - elpa/org-20161017/org-table.el | 5487 ---- elpa/org-20161017/org-timer.el | 507 - elpa/org-20161017/org-version.el | 27 - elpa/org-20161017/org-w3m.el | 183 - elpa/org-20161017/org.el | 25328 ---------------- elpa/org-20161017/orgcard.pdf | Bin 124864 -> 0 bytes elpa/org-20161017/ox-ascii.el | 2143 -- elpa/org-20161017/ox-beamer.el | 1198 - elpa/org-20161017/ox-html.el | 3607 --- elpa/org-20161017/ox-icalendar.el | 966 - elpa/org-20161017/ox-latex.el | 3547 --- elpa/org-20161017/ox-man.el | 1260 - elpa/org-20161017/ox-md.el | 568 - elpa/org-20161017/ox-odt.el | 4414 --- elpa/org-20161017/ox-org.el | 327 - elpa/org-20161017/ox-publish.el | 1340 - elpa/org-20161017/ox-texinfo.el | 1674 - elpa/org-20161017/ox.el | 6519 ---- .../org-bullets-autoloads.el | 22 - .../org-bullets-pkg.el | 1 - elpa/org-bullets-20140918.1137/org-bullets.el | 127 - .../org-jekyll-autoloads.el | 38 - .../org-jekyll-20130508.239/org-jekyll-pkg.el | 2 - elpa/org-jekyll-20130508.239/org-jekyll.el | 257 - .../org-projectile-autoloads.el | 47 - .../org-projectile-pkg.el | 1 - .../org-projectile.el | 559 - .../org-random-todo-autoloads.el | 39 - .../org-random-todo-pkg.el | 2 - .../org-random-todo.el | 159 - .../org-rtm-20160214.436/org-rtm-autoloads.el | 15 - elpa/org-rtm-20160214.436/org-rtm-pkg.el | 2 - elpa/org-rtm-20160214.436/org-rtm.el | 140 - .../origami-20160924.218/origami-autoloads.el | 58 - elpa/origami-20160924.218/origami-parsers.el | 265 - elpa/origami-20160924.218/origami-pkg.el | 9 - elpa/origami-20160924.218/origami.el | 826 - .../pkg-info-autoloads.el | 122 - elpa/pkg-info-20150517.443/pkg-info-pkg.el | 1 - elpa/pkg-info-20150517.443/pkg-info.el | 331 - .../plantuml-mode-autoloads.el | 27 - .../plantuml-mode-pkg.el | 2 - .../plantuml-mode.el | 382 - elpa/popup-20160709.729/popup-autoloads.el | 15 - elpa/popup-20160709.729/popup-pkg.el | 1 - elpa/popup-20160709.729/popup.el | 1432 - .../powerline-autoloads.el | 86 - elpa/powerline-20160702.1931/powerline-pkg.el | 7 - .../powerline-separators.el | 594 - .../powerline-themes.el | 267 - elpa/powerline-20160702.1931/powerline.el | 582 - .../projectile-autoloads.el | 445 - elpa/projectile-20161008.47/projectile-pkg.el | 2 - elpa/projectile-20161008.47/projectile.el | 3492 --- .../rainbow-delimiters-autoloads.el | 32 - .../rainbow-delimiters-pkg.el | 2 - .../rainbow-delimiters.el | 293 - .../rainbow-mode-autoloads.el | 23 - elpa/rainbow-mode-0.12/rainbow-mode-pkg.el | 2 - elpa/rainbow-mode-0.12/rainbow-mode.el | 1254 - .../restclient-autoloads.el | 44 - .../restclient-20160801.707/restclient-pkg.el | 2 - elpa/restclient-20160801.707/restclient.el | 553 - .../restclient-helm-autoloads.el | 22 - .../restclient-helm-pkg.el | 2 - .../restclient-helm.el | 76 - .../rich-minority-autoloads.el | 40 - .../rich-minority-pkg.el | 1 - .../rich-minority.el | 299 - elpa/rtm-20160116.927/rtm-autoloads.el | 15 - elpa/rtm-20160116.927/rtm-pkg.el | 2 - elpa/rtm-20160116.927/rtm.el | 697 - elpa/s-20160928.636/s-autoloads.el | 15 - elpa/s-20160928.636/s-pkg.el | 2 - elpa/s-20160928.636/s.el | 632 - .../sass-mode-autoloads.el | 26 - elpa/sass-mode-20161006.2326/sass-mode-pkg.el | 2 - elpa/sass-mode-20161006.2326/sass-mode.el | 280 - elpa/seq-2.16/ChangeLog | 142 - elpa/seq-2.16/seq-24.el | 464 - elpa/seq-2.16/seq-25.el | 498 - elpa/seq-2.16/seq-autoloads.el | 16 - elpa/seq-2.16/seq-pkg.el | 2 - elpa/seq-2.16/seq.el | 48 - elpa/seq-2.16/tests/seq-tests.el | 354 - .../smart-mode-line-autoloads.el | 58 - .../smart-mode-line-dark-theme.el | 49 - .../smart-mode-line-light-theme.el | 47 - .../smart-mode-line-pkg.el | 8 - .../smart-mode-line-respectful-theme.el | 49 - .../smart-mode-line.el | 1739 -- .../smart-mode-line-light-powerline-theme.el | 116 - ...art-mode-line-powerline-theme-autoloads.el | 32 - .../smart-mode-line-powerline-theme-pkg.el | 9 - .../smart-mode-line-powerline-theme.el | 126 - .../smartparens-autoloads.el | 198 - .../smartparens-clojure.el | 56 - .../smartparens-config.el | 119 - .../smartparens-ess.el | 207 - .../smartparens-haskell.el | 86 - .../smartparens-html.el | 172 - .../smartparens-latex.el | 170 - .../smartparens-lua.el | 89 - .../smartparens-pkg.el | 6 - .../smartparens-python.el | 84 - .../smartparens-racket.el | 55 - .../smartparens-ruby.el | 374 - .../smartparens-rust.el | 96 - .../smartparens-scala.el | 57 - elpa/smartparens-20161015.1227/smartparens.el | 8482 ------ elpa/smex-20151212.1409/smex-autoloads.el | 31 - elpa/smex-20151212.1409/smex-pkg.el | 2 - elpa/smex-20151212.1409/smex.el | 484 - elpa/spinner-1.7.1/spinner-autoloads.el | 67 - elpa/spinner-1.7.1/spinner-pkg.el | 1 - elpa/spinner-1.7.1/spinner.el | 394 - elpa/sx-20160125.1601/sx-auth.el | 196 - elpa/sx-20160125.1601/sx-autoloads.el | 154 - elpa/sx-20160125.1601/sx-babel.el | 133 - elpa/sx-20160125.1601/sx-button.el | 215 - elpa/sx-20160125.1601/sx-cache.el | 119 - elpa/sx-20160125.1601/sx-compose.el | 355 - elpa/sx-20160125.1601/sx-encoding.el | 179 - elpa/sx-20160125.1601/sx-favorites.el | 83 - elpa/sx-20160125.1601/sx-filter.el | 172 - elpa/sx-20160125.1601/sx-inbox.el | 216 - elpa/sx-20160125.1601/sx-interaction.el | 577 - elpa/sx-20160125.1601/sx-load.el | 56 - elpa/sx-20160125.1601/sx-method.el | 184 - elpa/sx-20160125.1601/sx-networks.el | 105 - elpa/sx-20160125.1601/sx-notify.el | 86 - elpa/sx-20160125.1601/sx-pkg.el | 11 - elpa/sx-20160125.1601/sx-question-list.el | 674 - elpa/sx-20160125.1601/sx-question-mode.el | 309 - elpa/sx-20160125.1601/sx-question-print.el | 816 - elpa/sx-20160125.1601/sx-question.el | 236 - elpa/sx-20160125.1601/sx-request.el | 338 - elpa/sx-20160125.1601/sx-search.el | 153 - elpa/sx-20160125.1601/sx-site.el | 68 - elpa/sx-20160125.1601/sx-switchto.el | 63 - elpa/sx-20160125.1601/sx-tab.el | 253 - elpa/sx-20160125.1601/sx-tag.el | 179 - elpa/sx-20160125.1601/sx-time.el | 84 - elpa/sx-20160125.1601/sx-user.el | 203 - elpa/sx-20160125.1601/sx.el | 505 - .../typescript-mode-autoloads.el | 30 - .../typescript-mode-pkg.el | 2 - .../typescript-mode.el | 2097 -- .../use-package-autoloads.el | 72 - .../use-package-pkg.el | 2 - elpa/use-package-20161017.1640/use-package.el | 1195 - .../vala-mode-autoloads.el | 35 - elpa/vala-mode-20150324.1525/vala-mode-pkg.el | 1 - elpa/vala-mode-20150324.1525/vala-mode.el | 401 - .../vala-mode/classes/class.yasnippet | 7 - .../vala-mode/classes/constructor.yasnippet | 7 - .../vala-mode/classes/property.yasnippet | 9 - .../vala-mode/classes/signal.yasnippet | 5 - .../classes/simple-property.yasnippet | 5 - .../snippets/vala-mode/cmain.yasnippet | 8 - .../vala-mode/controlflow/do-while.yasnippet | 7 - .../vala-mode/controlflow/for.yasnippet | 7 - .../vala-mode/controlflow/foreach.yasnippet | 7 - .../controlflow/if-else-else.yasnippet | 11 - .../vala-mode/controlflow/if-else.yasnippet | 9 - .../vala-mode/controlflow/if.yasnippet | 7 - .../vala-mode/controlflow/switch.yasnippet | 8 - .../vala-mode/controlflow/while.yasnippet | 7 - .../snippets/vala-mode/enum.yasnippet | 7 - .../exceptions/try-finally.yasnippet | 11 - .../vala-mode/exceptions/try.yasnippet | 9 - .../snippets/vala-mode/fixme.yasnippet | 5 - .../snippets/vala-mode/main.yasnippet | 8 - .../snippets/vala-mode/new.yasnippet | 5 - .../snippets/vala-mode/print-string.yasnippet | 5 - .../snippets/vala-mode/print.yasnippet | 5 - .../snippets/vala-mode/struct.yasnippet | 7 - .../snippets/vala-mode/todo.yasnippet | 5 - .../snippets/vala-mode/var.yasnippet | 5 - .../vala-snippets-autoloads.el | 29 - .../vala-snippets-pkg.el | 6 - .../vala-snippets.el | 31 - .../wakatime-mode-autoloads.el | 44 - .../wakatime-mode-pkg.el | 2 - .../wakatime-mode.el | 276 - elpa/with-editor-20161009.917/dir | 18 - .../with-editor-autoloads.el | 16 - .../with-editor-pkg.el | 9 - elpa/with-editor-20161009.917/with-editor.el | 777 - .../with-editor-20161009.917/with-editor.info | 340 - elpa/xlicense-1.1/COPYING | 674 - elpa/xlicense-1.1/licenses/._BOOST | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._BSD | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._BSD-new | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._BSD-old | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._FREEBSD | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._GPL-2.0 | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._GPL-3.0 | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._LGPL | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/._MIT | Bin 244 -> 0 bytes elpa/xlicense-1.1/licenses/APACHE-2.0 | 13 - elpa/xlicense-1.1/licenses/BOOST | 28 - elpa/xlicense-1.1/licenses/BSD | 29 - elpa/xlicense-1.1/licenses/BSD-new | 29 - elpa/xlicense-1.1/licenses/BSD-old | 29 - elpa/xlicense-1.1/licenses/FREEBSD | 29 - elpa/xlicense-1.1/licenses/GPL-2.0 | 15 - elpa/xlicense-1.1/licenses/GPL-3.0 | 13 - elpa/xlicense-1.1/licenses/LGPL | 15 - elpa/xlicense-1.1/licenses/MIT | 24 - elpa/xlicense-1.1/xlicense-autoloads.el | 18 - elpa/xlicense-1.1/xlicense-pkg.el | 2 - elpa/xlicense-1.1/xlicense.el | 193 - elpa/xpm-1.0.3/.elpaignore | 6 - elpa/xpm-1.0.3/ChangeLog | 170 - elpa/xpm-1.0.3/NEWS | 27 - elpa/xpm-1.0.3/xpm-autoloads.el | 90 - elpa/xpm-1.0.3/xpm-m2z.el | 101 - elpa/xpm-1.0.3/xpm-pkg.el | 2 - elpa/xpm-1.0.3/xpm.el | 437 - .../yaml-mode-autoloads.el | 28 - elpa/yaml-mode-20160902.1142/yaml-mode-pkg.el | 1 - elpa/yaml-mode-20160902.1142/yaml-mode.el | 440 - .../snippets/.gitignore | 1 - .../yasnippet-20161022.646/snippets/.nosearch | 1 - .../snippets/CONTRIBUTORS.txt | 4 - elpa/yasnippet-20161022.646/snippets/LICENSE | 18 - .../yasnippet-20161022.646/snippets/README.md | 40 - .../snippets/antlr-mode/project | 8 - .../snippets/antlr-mode/property | 6 - .../snippets/antlr-mode/target | 7 - .../snippets/applescript-mode/.yas-parents | 1 - .../snippets/c++-mode/.yas-parents | 1 - .../snippets/c++-mode/.yas-setup.el | 10 - .../snippets/c++-mode/assert | 5 - .../snippets/c++-mode/beginend | 5 - .../snippets/c++-mode/boost_require | 7 - .../snippets/c++-mode/cerr | 5 - .../snippets/c++-mode/cin | 5 - .../snippets/c++-mode/class | 11 - .../snippets/c++-mode/class11 | 44 - .../snippets/c++-mode/const_[] | 8 - .../snippets/c++-mode/constructor | 8 - .../snippets/c++-mode/cout | 8 - .../snippets/c++-mode/cpp | 5 - .../snippets/c++-mode/cstd | 5 - .../snippets/c++-mode/d+= | 5 - .../snippets/c++-mode/d_operator | 5 - .../snippets/c++-mode/d_operator[] | 5 - .../snippets/c++-mode/d_operator[]_const | 5 - .../snippets/c++-mode/d_operator_istream | 5 - .../snippets/c++-mode/d_operator_ostream | 5 - .../snippets/c++-mode/delete | 5 - .../snippets/c++-mode/delete[] | 5 - .../snippets/c++-mode/doc | 7 - .../snippets/c++-mode/dynamic_casting | 5 - .../snippets/c++-mode/enum | 7 - .../snippets/c++-mode/fixture | 9 - .../snippets/c++-mode/fori | 7 - .../snippets/c++-mode/friend | 5 - .../snippets/c++-mode/fun_declaration | 5 - .../snippets/c++-mode/function | 8 - .../snippets/c++-mode/gtest | 6 - .../snippets/c++-mode/ignore | 5 - .../snippets/c++-mode/inline | 5 - .../snippets/c++-mode/io | 5 - .../snippets/c++-mode/iterator | 5 - .../snippets/c++-mode/map | 5 - .../snippets/c++-mode/module | 8 - .../snippets/c++-mode/namespace | 9 - .../snippets/c++-mode/ns | 4 - .../snippets/c++-mode/operator!= | 9 - .../snippets/c++-mode/operator+ | 11 - .../snippets/c++-mode/operator+= | 10 - .../snippets/c++-mode/operator= | 14 - .../snippets/c++-mode/operator== | 9 - .../snippets/c++-mode/operator[] | 9 - .../snippets/c++-mode/operator_istream | 10 - .../snippets/c++-mode/operator_ostream | 10 - .../snippets/c++-mode/ostream | 5 - .../snippets/c++-mode/pack | 10 - .../snippets/c++-mode/private | 6 - .../snippets/c++-mode/protected | 6 - .../snippets/c++-mode/public | 6 - .../snippets/c++-mode/sstream | 5 - .../snippets/c++-mode/std | 5 - .../snippets/c++-mode/std_colon | 5 - .../snippets/c++-mode/str | 5 - .../snippets/c++-mode/template | 6 - .../snippets/c++-mode/test case | 9 - .../snippets/c++-mode/test_main | 10 - .../snippets/c++-mode/test_suite | 10 - .../snippets/c++-mode/this | 5 - .../snippets/c++-mode/throw | 5 - .../snippets/c++-mode/try | 10 - .../snippets/c++-mode/tryw | 9 - .../snippets/c++-mode/using | 5 - .../snippets/c++-mode/vector | 5 - .../snippets/c-mode/.yas-parents | 1 - .../snippets/c-mode/assert | 6 - .../snippets/c-mode/compile | 5 - .../snippets/c-mode/define | 5 - .../snippets/c-mode/malloc | 6 - .../snippets/c-mode/packed | 5 - .../snippets/c-mode/printf | 5 - .../snippets/c-mode/stdio | 5 - .../snippets/c-mode/stdlib | 5 - .../snippets/c-mode/string | 5 - .../snippets/c-mode/union | 7 - .../snippets/c-mode/unistd | 5 - .../snippets/cc-mode/case | 8 - .../snippets/cc-mode/do | 7 - .../snippets/cc-mode/else | 7 - .../snippets/cc-mode/file_description | 13 - .../snippets/cc-mode/fopen | 5 - .../snippets/cc-mode/for | 7 - .../snippets/cc-mode/for_n | 8 - .../snippets/cc-mode/function_description | 14 - .../snippets/cc-mode/if | 7 - .../snippets/cc-mode/ifdef | 9 - .../snippets/cc-mode/inc | 5 - .../snippets/cc-mode/inc.1 | 5 - .../snippets/cc-mode/main | 9 - .../snippets/cc-mode/math | 6 - .../snippets/cc-mode/member_description | 7 - .../snippets/cc-mode/once | 9 - .../snippets/cc-mode/printf | 6 - .../snippets/cc-mode/struct | 7 - .../snippets/cc-mode/switch | 11 - .../snippets/cc-mode/ternary | 5 - .../snippets/cc-mode/typedef | 5 - .../snippets/cc-mode/while | 7 - .../snippets/chef-mode/action | 5 - .../snippets/chef-mode/bash | 14 - .../snippets/chef-mode/cookbook_file | 10 - .../snippets/chef-mode/cron | 10 - .../snippets/chef-mode/cronf | 16 - .../snippets/chef-mode/deploy | 18 - .../snippets/chef-mode/directory | 11 - .../snippets/chef-mode/directoryf | 13 - .../snippets/chef-mode/env | 7 - .../snippets/chef-mode/execute | 10 - .../snippets/chef-mode/executef | 18 - .../snippets/chef-mode/file | 11 - .../snippets/chef-mode/filef | 14 - .../snippets/chef-mode/git | 11 - .../snippets/chef-mode/group | 10 - .../snippets/chef-mode/http_request | 7 - .../snippets/chef-mode/http_requestp | 10 - .../snippets/chef-mode/ignore_failure | 5 - .../snippets/chef-mode/inc | 5 - .../snippets/chef-mode/link | 7 - .../snippets/chef-mode/linkf | 10 - .../snippets/chef-mode/log | 5 - .../snippets/chef-mode/machine | 10 - .../snippets/chef-mode/meta | 10 - .../snippets/chef-mode/not_if | 5 - .../snippets/chef-mode/notifies | 5 - .../snippets/chef-mode/only_if | 5 - .../snippets/chef-mode/pac | 8 - .../snippets/chef-mode/pak | 8 - .../snippets/chef-mode/provider | 5 - .../snippets/chef-mode/python | 11 - .../snippets/chef-mode/remote_file | 11 - .../snippets/chef-mode/retries | 6 - .../snippets/chef-mode/role | 12 - .../snippets/chef-mode/ruby | 9 - .../snippets/chef-mode/script | 15 - .../snippets/chef-mode/service | 8 - .../snippets/chef-mode/servicep | 9 - .../snippets/chef-mode/subscribes | 5 - .../snippets/chef-mode/supports | 5 - .../snippets/chef-mode/template | 10 - .../snippets/chef-mode/templatev | 11 - .../snippets/chef-mode/user | 14 - .../snippets/cider-repl-mode | 0 .../snippets/clojure-mode/.yas-parents | 1 - .../snippets/clojure-mode/bench | 7 - .../snippets/clojure-mode/bp | 4 - .../snippets/clojure-mode/def | 4 - .../snippets/clojure-mode/defm | 7 - .../snippets/clojure-mode/defn | 7 - .../snippets/clojure-mode/defr | 8 - .../snippets/clojure-mode/deft | 8 - .../snippets/clojure-mode/doseq | 6 - .../snippets/clojure-mode/fn | 5 - .../snippets/clojure-mode/for | 5 - .../snippets/clojure-mode/if | 8 - .../snippets/clojure-mode/ifl | 7 - .../snippets/clojure-mode/import | 4 - .../snippets/clojure-mode/is | 5 - .../snippets/clojure-mode/let | 7 - .../snippets/clojure-mode/map | 5 - .../snippets/clojure-mode/map.lambda | 5 - .../snippets/clojure-mode/mdoc | 5 - .../snippets/clojure-mode/ns | 22 - .../snippets/clojure-mode/opts | 6 - .../snippets/clojure-mode/pr | 6 - .../snippets/clojure-mode/print | 6 - .../snippets/clojure-mode/reduce | 5 - .../snippets/clojure-mode/require | 4 - .../snippets/clojure-mode/test | 6 - .../snippets/clojure-mode/try | 7 - .../snippets/clojure-mode/use | 4 - .../snippets/clojure-mode/when | 7 - .../snippets/clojure-mode/whenl | 7 - .../snippets/cmake-mode/add_executable | 6 - .../snippets/cmake-mode/add_library | 6 - .../cmake-mode/cmake_minimum_required | 5 - .../snippets/cmake-mode/foreach | 7 - .../snippets/cmake-mode/function | 7 - .../snippets/cmake-mode/if | 7 - .../snippets/cmake-mode/ifelse | 9 - .../snippets/cmake-mode/include | 5 - .../snippets/cmake-mode/macro | 7 - .../snippets/cmake-mode/message | 5 - .../snippets/cmake-mode/option | 5 - .../snippets/cmake-mode/project | 5 - .../snippets/cmake-mode/set | 5 - .../snippets/conf-unix-mode/.yas-parents | 1 - .../snippets/conf-unix-mode/section | 8 - .../snippets/cperl-mode/.yas-parents | 1 - .../snippets/cpp-omnet-mode/EV | 5 - .../snippets/cpp-omnet-mode/emit_signal | 5 - .../snippets/cpp-omnet-mode/intuniform | 5 - .../snippets/cpp-omnet-mode/math | 5 - .../snippets/cpp-omnet-mode/nan | 5 - .../snippets/cpp-omnet-mode/omnet | 5 - .../snippets/cpp-omnet-mode/parameter_omnetpp | 5 - .../snippets/cpp-omnet-mode/scheduleAt | 5 - .../snippets/cpp-omnet-mode/uniform | 6 - .../snippets/csharp-mode/.yas-parents | 1 - .../snippets/csharp-mode/attrib | 8 - .../snippets/csharp-mode/attrib.1 | 22 - .../snippets/csharp-mode/attrib.2 | 22 - .../snippets/csharp-mode/class | 22 - .../snippets/csharp-mode/comment | 7 - .../snippets/csharp-mode/comment.1 | 5 - .../snippets/csharp-mode/comment.2 | 5 - .../snippets/csharp-mode/comment.3 | 5 - .../snippets/csharp-mode/fore | 8 - .../snippets/csharp-mode/method | 11 - .../snippets/csharp-mode/namespace | 8 - .../snippets/csharp-mode/prop | 17 - .../snippets/csharp-mode/region | 7 - .../snippets/csharp-mode/using | 5 - .../snippets/csharp-mode/using.1 | 5 - .../snippets/csharp-mode/using.2 | 5 - .../snippets/css-mode/bg | 3 - .../snippets/css-mode/bg.1 | 3 - .../snippets/css-mode/bor | 3 - .../snippets/css-mode/cl | 4 - .../snippets/css-mode/disp.block | 4 - .../snippets/css-mode/disp.inline | 4 - .../snippets/css-mode/disp.none | 4 - .../snippets/css-mode/ff | 4 - .../snippets/css-mode/fs | 4 - .../snippets/css-mode/mar.bottom | 4 - .../snippets/css-mode/mar.left | 4 - .../snippets/css-mode/mar.mar | 4 - .../snippets/css-mode/mar.margin | 4 - .../snippets/css-mode/mar.right | 4 - .../snippets/css-mode/mar.top | 4 - .../snippets/css-mode/pad.bottom | 4 - .../snippets/css-mode/pad.left | 4 - .../snippets/css-mode/pad.pad | 4 - .../snippets/css-mode/pad.padding | 4 - .../snippets/css-mode/pad.right | 4 - .../snippets/css-mode/pad.top | 4 - .../snippets/css-mode/v | 10 - .../snippets/dix-mode/e-in-mono-section | 9 - .../snippets/dix-mode/e-in-pardef | 7 - .../snippets/dix-mode/p | 7 - .../snippets/dix-mode/par | 7 - .../snippets/dix-mode/pardef | 12 - .../snippets/dix-mode/s | 9 - .../snippets/dix-mode/sdef | 7 - .../snippets/dix-mode/section | 9 - .../snippets/elixir-mode/.yas-parents | 1 - .../snippets/elixir-mode/case | 7 - .../snippets/elixir-mode/cond | 7 - .../snippets/elixir-mode/def | 7 - .../snippets/elixir-mode/defmacro | 7 - .../snippets/elixir-mode/defmacrop | 7 - .../snippets/elixir-mode/defmodule | 7 - .../snippets/elixir-mode/defp | 7 - .../snippets/elixir-mode/doc | 7 - .../snippets/elixir-mode/mdoc | 7 - .../snippets/elixir-mode/pry | 6 - .../snippets/emacs-lisp-mode/.read_me | 7 - .../snippets/emacs-lisp-mode/add-hook | 7 - .../snippets/emacs-lisp-mode/and | 6 - .../snippets/emacs-lisp-mode/append | 5 - .../snippets/emacs-lisp-mode/apply | 5 - .../snippets/emacs-lisp-mode/aref | 5 - .../snippets/emacs-lisp-mode/aset | 5 - .../snippets/emacs-lisp-mode/assq | 5 - .../snippets/emacs-lisp-mode/autoload | 5 - .../snippets/emacs-lisp-mode/backward-char | 6 - .../emacs-lisp-mode/beginning-of-line | 6 - .../emacs-lisp-mode/bounds-of-thing-at-point | 6 - .../snippets/emacs-lisp-mode/buffer-file-name | 6 - .../emacs-lisp-mode/buffer-modified-p | 6 - .../snippets/emacs-lisp-mode/buffer-substring | 6 - .../buffer-substring-no-properties | 6 - .../snippets/emacs-lisp-mode/car | 5 - .../snippets/emacs-lisp-mode/cdr | 5 - .../snippets/emacs-lisp-mode/concat | 5 - .../snippets/emacs-lisp-mode/cond | 6 - .../snippets/emacs-lisp-mode/condition-case | 6 - .../snippets/emacs-lisp-mode/cons | 5 - .../snippets/emacs-lisp-mode/consp | 5 - .../snippets/emacs-lisp-mode/const | 5 - .../snippets/emacs-lisp-mode/copy-directory | 6 - .../snippets/emacs-lisp-mode/copy-file | 6 - .../snippets/emacs-lisp-mode/current-buffer | 6 - .../snippets/emacs-lisp-mode/custom-autoload | 6 - .../snippets/emacs-lisp-mode/defalias | 5 - .../snippets/emacs-lisp-mode/defcustom | 5 - .../snippets/emacs-lisp-mode/define-key | 6 - .../snippets/emacs-lisp-mode/defsubst | 5 - .../snippets/emacs-lisp-mode/defun | 8 - .../snippets/emacs-lisp-mode/defvar | 4 - .../snippets/emacs-lisp-mode/delete-char | 6 - .../snippets/emacs-lisp-mode/delete-directory | 6 - .../snippets/emacs-lisp-mode/delete-file | 6 - .../snippets/emacs-lisp-mode/delete-region | 6 - .../snippets/emacs-lisp-mode/directory-files | 6 - .../emacs-lisp-mode/dired.process_marked | 16 - .../snippets/emacs-lisp-mode/dolist | 5 - .../snippets/emacs-lisp-mode/end-of-line | 6 - .../snippets/emacs-lisp-mode/eq | 5 - .../snippets/emacs-lisp-mode/equal | 5 - .../snippets/emacs-lisp-mode/error | 5 - .../snippets/emacs-lisp-mode/ert-deftest | 7 - .../snippets/emacs-lisp-mode/expand-file-name | 6 - .../snippets/emacs-lisp-mode/fboundp | 5 - .../emacs-lisp-mode/file-name-directory | 6 - .../emacs-lisp-mode/file-name-extension | 6 - .../emacs-lisp-mode/file-name-nondirectory | 6 - .../emacs-lisp-mode/file-name-sans-extension | 6 - .../emacs-lisp-mode/file-relative-name | 6 - .../snippets/emacs-lisp-mode/file.process | 17 - .../snippets/emacs-lisp-mode/file.read-lines | 17 - .../snippets/emacs-lisp-mode/find-file | 6 - .../snippets/emacs-lisp-mode/find-replace | 17 - .../snippets/emacs-lisp-mode/format | 5 - .../snippets/emacs-lisp-mode/forward-char | 6 - .../snippets/emacs-lisp-mode/forward-line | 6 - .../snippets/emacs-lisp-mode/funcall | 5 - .../snippets/emacs-lisp-mode/function | 5 - .../snippets/emacs-lisp-mode/get | 5 - .../snippets/emacs-lisp-mode/global-set-key | 6 - .../snippets/emacs-lisp-mode/goto-char | 6 - .../snippets/emacs-lisp-mode/grabstring | 4 - .../snippets/emacs-lisp-mode/grabthing | 4 - .../snippets/emacs-lisp-mode/hash | 5 - .../snippets/emacs-lisp-mode/if | 5 - .../snippets/emacs-lisp-mode/insert | 6 - .../emacs-lisp-mode/insert-file-contents | 6 - .../snippets/emacs-lisp-mode/interactive | 5 - .../snippets/emacs-lisp-mode/kbd | 5 - .../snippets/emacs-lisp-mode/kill-buffer | 6 - .../snippets/emacs-lisp-mode/lambda | 6 - .../snippets/emacs-lisp-mode/length | 5 - .../snippets/emacs-lisp-mode/let | 7 - .../emacs-lisp-mode/line-beginning-position | 6 - .../emacs-lisp-mode/line-end-position | 6 - .../snippets/emacs-lisp-mode/list | 5 - .../snippets/emacs-lisp-mode/looking-at | 6 - .../snippets/emacs-lisp-mode/make-directory | 6 - .../emacs-lisp-mode/make-local-variable | 6 - .../snippets/emacs-lisp-mode/mapc | 5 - .../snippets/emacs-lisp-mode/mapcar | 5 - .../snippets/emacs-lisp-mode/match-beginning | 6 - .../snippets/emacs-lisp-mode/match-end | 6 - .../snippets/emacs-lisp-mode/match-string | 6 - .../snippets/emacs-lisp-mode/memq | 5 - .../snippets/emacs-lisp-mode/message | 6 - .../snippets/emacs-lisp-mode/minor_mode | 20 - .../snippets/emacs-lisp-mode/not | 6 - .../snippets/emacs-lisp-mode/nth | 5 - .../snippets/emacs-lisp-mode/null | 5 - .../snippets/emacs-lisp-mode/number-to-string | 6 - .../snippets/emacs-lisp-mode/or | 6 - .../snippets/emacs-lisp-mode/point | 6 - .../snippets/emacs-lisp-mode/point-max | 5 - .../snippets/emacs-lisp-mode/point-min | 6 - .../snippets/emacs-lisp-mode/princ | 5 - .../snippets/emacs-lisp-mode/print | 5 - .../snippets/emacs-lisp-mode/progn | 5 - .../snippets/emacs-lisp-mode/push | 5 - .../snippets/emacs-lisp-mode/put | 5 - .../emacs-lisp-mode/re-search-backward | 6 - .../emacs-lisp-mode/re-search-forward | 6 - .../snippets/emacs-lisp-mode/region-active-p | 6 - .../snippets/emacs-lisp-mode/region-beginning | 6 - .../snippets/emacs-lisp-mode/region-end | 6 - .../snippets/emacs-lisp-mode/rename-file | 6 - .../snippets/emacs-lisp-mode/repeat | 5 - .../snippets/emacs-lisp-mode/replace-regexp | 6 - .../emacs-lisp-mode/replace-regexp-in-string | 6 - .../snippets/emacs-lisp-mode/require | 5 - .../snippets/emacs-lisp-mode/save-buffer | 6 - .../snippets/emacs-lisp-mode/save-excursion | 6 - .../snippets/emacs-lisp-mode/search-backward | 7 - .../emacs-lisp-mode/search-backward-regexp | 7 - .../snippets/emacs-lisp-mode/search-forward | 7 - .../emacs-lisp-mode/search-forward-regexp | 7 - .../snippets/emacs-lisp-mode/set | 5 - .../snippets/emacs-lisp-mode/set-buffer | 6 - .../snippets/emacs-lisp-mode/set-file-modes | 6 - .../snippets/emacs-lisp-mode/set-mark | 6 - .../snippets/emacs-lisp-mode/setq | 6 - .../snippets/emacs-lisp-mode/should | 6 - .../emacs-lisp-mode/skip-chars-backward | 6 - .../emacs-lisp-mode/skip-chars-forward | 6 - .../snippets/emacs-lisp-mode/split-string | 6 - .../snippets/emacs-lisp-mode/string | 5 - .../snippets/emacs-lisp-mode/string-match | 6 - .../snippets/emacs-lisp-mode/string-to-number | 6 - .../snippets/emacs-lisp-mode/string= | 5 - .../snippets/emacs-lisp-mode/stringp | 5 - .../snippets/emacs-lisp-mode/substring | 5 - .../snippets/emacs-lisp-mode/thing-at-point | 6 - .../snippets/emacs-lisp-mode/traverse_dir | 6 - .../snippets/emacs-lisp-mode/unless | 5 - .../snippets/emacs-lisp-mode/vector | 6 - .../snippets/emacs-lisp-mode/when | 5 - .../snippets/emacs-lisp-mode/while | 5 - .../snippets/emacs-lisp-mode/widget-get | 6 - .../emacs-lisp-mode/with-current-buffer | 6 - .../snippets/emacs-lisp-mode/word-or-region | 27 - .../snippets/emacs-lisp-mode/word_regexp | 5 - .../emacs-lisp-mode/x-dired.process_marked | 17 - .../snippets/emacs-lisp-mode/x-file.process | 18 - .../emacs-lisp-mode/x-file.read-lines | 18 - .../snippets/emacs-lisp-mode/x-find-replace | 18 - .../snippets/emacs-lisp-mode/x-grabstring | 5 - .../snippets/emacs-lisp-mode/x-grabthing | 5 - .../snippets/emacs-lisp-mode/x-traverse_dir | 7 - .../snippets/emacs-lisp-mode/x-word-or-region | 28 - .../snippets/emacs-lisp-mode/yes-or-no-p | 5 - .../snippets/enh-ruby-mode | 0 .../snippets/ensime-mode | 0 .../snippets/erc-mode/blist | 5 - .../snippets/erc-mode/help | 5 - .../snippets/erlang-mode/after | 4 - .../snippets/erlang-mode/begin | 5 - .../snippets/erlang-mode/beh | 4 - .../snippets/erlang-mode/case | 5 - .../snippets/erlang-mode/compile | 4 - .../snippets/erlang-mode/def | 4 - .../snippets/erlang-mode/exp | 5 - .../snippets/erlang-mode/fun | 3 - .../snippets/erlang-mode/if | 6 - .../snippets/erlang-mode/ifdef | 5 - .../snippets/erlang-mode/ifndef | 5 - .../snippets/erlang-mode/imp | 5 - .../snippets/erlang-mode/inc | 4 - .../snippets/erlang-mode/inc.lib | 4 - .../snippets/erlang-mode/loop | 8 - .../snippets/erlang-mode/mod | 6 - .../snippets/erlang-mode/rcv | 5 - .../snippets/erlang-mode/rcv.after | 6 - .../snippets/erlang-mode/rec | 4 - .../snippets/erlang-mode/try | 7 - .../snippets/erlang-mode/undef | 4 - .../snippets/f90-mode/bd | 4 - .../snippets/f90-mode/c | 4 - .../snippets/f90-mode/ch | 4 - .../snippets/f90-mode/cx | 4 - .../snippets/f90-mode/dc | 4 - .../snippets/f90-mode/do | 8 - .../snippets/f90-mode/dp | 4 - .../snippets/f90-mode/forall | 8 - .../snippets/f90-mode/function | 12 - .../snippets/f90-mode/if | 6 - .../snippets/f90-mode/in | 4 - .../snippets/f90-mode/inc | 4 - .../snippets/f90-mode/intr | 4 - .../snippets/f90-mode/l | 4 - .../snippets/f90-mode/module | 12 - .../snippets/f90-mode/pa | 4 - .../snippets/f90-mode/program | 11 - .../snippets/f90-mode/puref | 12 - .../snippets/f90-mode/pures | 10 - .../snippets/f90-mode/re | 4 - .../snippets/f90-mode/subroutine | 10 - .../snippets/f90-mode/until | 9 - .../snippets/f90-mode/where | 9 - .../snippets/f90-mode/while | 8 - .../snippets/f90-mode/wr | 4 - .../snippets/faust-mode/button | 5 - .../snippets/faust-mode/case | 8 - .../snippets/faust-mode/checkbox | 5 - .../snippets/faust-mode/component | 5 - .../snippets/faust-mode/declare | 6 - .../snippets/faust-mode/declareauthor | 6 - .../snippets/faust-mode/declarelicense | 16 - .../snippets/faust-mode/declarename | 6 - .../snippets/faust-mode/declareversion | 6 - .../snippets/faust-mode/hbargraph | 5 - .../snippets/faust-mode/header | 19 - .../snippets/faust-mode/hgroup | 5 - .../snippets/faust-mode/hslider | 5 - .../snippets/faust-mode/import | 5 - .../snippets/faust-mode/nentry | 5 - .../snippets/faust-mode/par | 5 - .../snippets/faust-mode/process | 6 - .../snippets/faust-mode/processx | 5 - .../snippets/faust-mode/prod | 5 - .../snippets/faust-mode/rule | 6 - .../snippets/faust-mode/seq | 5 - .../snippets/faust-mode/sum | 5 - .../snippets/faust-mode/tgroup | 5 - .../snippets/faust-mode/vbargraph | 5 - .../snippets/faust-mode/vgroup | 5 - .../snippets/faust-mode/vslider | 5 - .../snippets/faust-mode/with | 8 - .../snippets/fundamental-mode/.yas-setup.el | 8 - .../snippets/git-commit-mode/.yas-parents | 1 - .../snippets/git-commit-mode/fixes | 5 - .../snippets/git-commit-mode/references | 5 - .../snippets/go-mode/benchmark | 10 - .../snippets/go-mode/const | 6 - .../snippets/go-mode/const( | 7 - .../snippets/go-mode/dd | 6 - .../snippets/go-mode/default | 6 - .../snippets/go-mode/else | 7 - .../snippets/go-mode/error | 8 - .../snippets/go-mode/example | 8 - .../snippets/go-mode/for | 7 - .../snippets/go-mode/forrange | 8 - .../snippets/go-mode/func | 8 - .../snippets/go-mode/if | 7 - .../snippets/go-mode/iferr | 7 - .../snippets/go-mode/import | 6 - .../snippets/go-mode/import( | 7 - .../snippets/go-mode/lambda | 7 - .../snippets/go-mode/main | 7 - .../snippets/go-mode/map | 5 - .../snippets/go-mode/parallel_benchmark | 12 - .../snippets/go-mode/printf | 6 - .../snippets/go-mode/select | 8 - .../snippets/go-mode/switch | 8 - .../snippets/go-mode/test | 8 - .../snippets/go-mode/testmain | 21 - .../snippets/go-mode/type | 7 - .../snippets/go-mode/var | 6 - .../snippets/go-mode/var( | 7 - .../snippets/groovy-mode/.yas-parents | 1 - .../snippets/groovy-mode/class | 7 - .../snippets/groovy-mode/def | 7 - .../snippets/groovy-mode/dict | 5 - .../snippets/groovy-mode/for | 7 - .../snippets/groovy-mode/println | 6 - .../snippets/groovy-mode/times | 7 - .../snippets/haskell-mode/case | 9 - .../snippets/haskell-mode/data | 5 - .../snippets/haskell-mode/doc | 7 - .../snippets/haskell-mode/efix | 6 - .../snippets/haskell-mode/function | 6 - .../snippets/haskell-mode/functione | 6 - .../snippets/haskell-mode/import | 5 - .../snippets/haskell-mode/instance | 6 - .../snippets/haskell-mode/main | 7 - .../snippets/haskell-mode/module | 6 - .../snippets/haskell-mode/new class | 7 - .../snippets/haskell-mode/pragma | 5 - .../snippets/haskell-mode/print | 5 - .../snippets/html-mode/.yas-parents | 1 - .../snippets/html-mode/dd | 5 - .../snippets/html-mode/dl | 7 - .../snippets/html-mode/doctype | 4 - .../snippets/html-mode/doctype.html5 | 4 - .../snippets/html-mode/doctype.xhtml1 | 4 - .../snippets/html-mode/doctype.xhtml1_1 | 4 - .../snippets/html-mode/doctype.xhtml1_strict | 4 - .../html-mode/doctype.xhtml1_transitional | 4 - .../snippets/html-mode/dt | 5 - .../snippets/html-mode/form | 6 - .../snippets/html-mode/html | 6 - .../snippets/html-mode/html.xmlns | 6 - .../snippets/html-mode/link.import | 4 - .../snippets/html-mode/link.stylesheet | 4 - .../snippets/html-mode/link.stylesheet-ie | 6 - .../snippets/html-mode/mailto | 4 - .../snippets/html-mode/meta | 5 - .../snippets/html-mode/meta.http-equiv | 5 - .../snippets/html-mode/script.javascript | 6 - .../snippets/html-mode/script.javascript-src | 4 - .../snippets/html-mode/textarea | 4 - .../snippets/html-mode/th | 5 - .../snippets/java-mode/apr_assert | 7 - .../snippets/java-mode/assert | 5 - .../snippets/java-mode/assertEquals | 7 - .../snippets/java-mode/cls | 7 - .../snippets/java-mode/constructor | 7 - .../snippets/java-mode/define test method | 8 - .../snippets/java-mode/doc | 7 - .../snippets/java-mode/equals | 7 - .../snippets/java-mode/file_class | 9 - .../snippets/java-mode/for | 7 - .../snippets/java-mode/fori | 7 - .../snippets/java-mode/getter | 7 - .../snippets/java-mode/if | 7 - .../snippets/java-mode/ife | 10 - .../snippets/java-mode/import | 6 - .../snippets/java-mode/iterator | 7 - .../snippets/java-mode/javadoc | 8 - .../snippets/java-mode/lambda | 5 - .../snippets/java-mode/main | 7 - .../snippets/java-mode/main_class | 11 - .../snippets/java-mode/method | 7 - .../snippets/java-mode/new | 6 - .../snippets/java-mode/override | 6 - .../snippets/java-mode/param | 5 - .../snippets/java-mode/printf | 5 - .../snippets/java-mode/println | 6 - .../snippets/java-mode/return | 5 - .../snippets/java-mode/test | 8 - .../snippets/java-mode/testClass | 12 - .../snippets/java-mode/this | 6 - .../snippets/java-mode/toString | 7 - .../snippets/java-mode/try | 11 - .../snippets/java-mode/value | 5 - .../snippets/js-mode/al | 4 - .../snippets/js-mode/class | 8 - .../snippets/js-mode/com | 6 - .../snippets/js-mode/debugger | 5 - .../snippets/js-mode/each | 6 - .../snippets/js-mode/el | 6 - .../snippets/js-mode/ev.add | 6 - .../snippets/js-mode/ev.fire | 4 - .../snippets/js-mode/for | 6 - .../snippets/js-mode/function | 7 - .../snippets/js-mode/if | 6 - .../snippets/js-mode/init | 6 - .../snippets/js-mode/log | 4 - .../snippets/js-mode/multiline-comment | 7 - .../snippets/js-mode/param-comment | 6 - .../snippets/js-mode/req.html | 8 - .../snippets/js-mode/req.json | 8 - .../snippets/js-mode/return-comment | 6 - .../snippets/js-mode/type-inline-comment | 6 - .../snippets/js-mode/type-multiline-comment | 6 - elpa/yasnippet-20161022.646/snippets/js2-mode | 0 elpa/yasnippet-20161022.646/snippets/js3-mode | 0 .../snippets/latex-mode/acronym | 5 - .../snippets/latex-mode/alertblock | 7 - .../snippets/latex-mode/alg | 7 - .../snippets/latex-mode/article | 11 - .../snippets/latex-mode/begin | 7 - .../snippets/latex-mode/block | 7 - .../snippets/latex-mode/capgls | 5 - .../snippets/latex-mode/caption | 5 - .../snippets/latex-mode/cite | 5 - .../snippets/latex-mode/code | 7 - .../snippets/latex-mode/columns | 13 - .../snippets/latex-mode/documentclass | 6 - .../snippets/latex-mode/emph | 5 - .../snippets/latex-mode/enumerate | 7 - .../snippets/latex-mode/figure | 9 - .../snippets/latex-mode/frac | 5 - .../snippets/latex-mode/frame | 8 - .../snippets/latex-mode/gls | 5 - .../snippets/latex-mode/glspl | 5 - .../snippets/latex-mode/if | 8 - .../snippets/latex-mode/includegraphics | 5 - .../snippets/latex-mode/item | 5 - .../snippets/latex-mode/itemize | 7 - .../snippets/latex-mode/label | 5 - .../snippets/latex-mode/listing | 7 - .../snippets/latex-mode/moderncv | 15 - .../snippets/latex-mode/moderncv-cvcomputer | 6 - .../snippets/latex-mode/moderncv-cventry | 6 - .../snippets/latex-mode/moderncv-cvlanguage | 6 - .../snippets/latex-mode/moderncv-cvline | 6 - .../latex-mode/moderncv-cvlistdoubleitem | 6 - .../snippets/latex-mode/moderncv-cvlistitem | 6 - .../snippets/latex-mode/movie | 15 - .../snippets/latex-mode/newcommand | 5 - .../snippets/latex-mode/newglossaryentry | 5 - .../snippets/latex-mode/note | 5 - .../snippets/latex-mode/python | 8 - .../snippets/latex-mode/question | 5 - .../snippets/latex-mode/section | 8 - .../snippets/latex-mode/subf | 8 - .../snippets/latex-mode/subfigure | 13 - .../snippets/latex-mode/subsec | 8 - .../snippets/latex-mode/textbf | 5 - .../snippets/latex-mode/usepackage | 5 - .../snippets/lisp-interaction-mode/defun | 7 - .../snippets/lisp-mode/class | 8 - .../snippets/lisp-mode/comment | 6 - .../snippets/lisp-mode/defpackage | 10 - .../snippets/lisp-mode/do | 9 - .../snippets/lisp-mode/for | 7 - .../snippets/lisp-mode/foreach | 7 - .../snippets/lisp-mode/format | 5 - .../snippets/lisp-mode/if | 7 - .../snippets/lisp-mode/ifelse | 9 - .../snippets/lisp-mode/ifnot | 8 - .../snippets/lisp-mode/slot | 13 - .../snippets/lisp-mode/switch | 9 - .../snippets/lisp-mode/typecast | 6 - .../snippets/lua-mode/fun | 7 - .../snippets/m4-mode/def | 6 - .../makefile-automake-mode/noinst_HEADERS | 5 - .../snippets/makefile-bsdmake-mode/PHONY | 5 - .../snippets/makefile-bsdmake-mode/echo | 5 - .../snippets/makefile-bsdmake-mode/gen | 11 - .../snippets/makefile-bsdmake-mode/if | 7 - .../snippets/makefile-bsdmake-mode/var | 5 - .../snippets/makefile-gmake-mode/abspath | 6 - .../snippets/makefile-gmake-mode/addprefix | 6 - .../snippets/makefile-gmake-mode/addsuffix | 6 - .../snippets/makefile-gmake-mode/dir | 6 - .../snippets/makefile-gmake-mode/make | 7 - .../snippets/makefile-gmake-mode/notdir | 6 - .../snippets/makefile-gmake-mode/patsubst | 5 - .../snippets/makefile-gmake-mode/phony | 5 - .../snippets/makefile-gmake-mode/shell | 5 - .../snippets/makefile-gmake-mode/special | 6 - .../snippets/makefile-gmake-mode/template | 10 - .../snippets/makefile-gmake-mode/wildcard | 5 - .../snippets/makefile-mode/all | 6 - .../snippets/makefile-mode/clean | 9 - .../snippets/malabar-mode/variable | 5 - .../snippets/markdown-mode/+ | 5 - .../snippets/markdown-mode/- | 5 - .../snippets/markdown-mode/_ | 4 - .../snippets/markdown-mode/__ | 4 - .../snippets/markdown-mode/` | 4 - .../snippets/markdown-mode/h1.1 | 6 - .../snippets/markdown-mode/h1.2 | 7 - .../snippets/markdown-mode/h2.1 | 6 - .../snippets/markdown-mode/h2.2 | 7 - .../snippets/markdown-mode/h3 | 6 - .../snippets/markdown-mode/h4 | 6 - .../snippets/markdown-mode/h5 | 6 - .../snippets/markdown-mode/h6 | 6 - .../snippets/markdown-mode/highlight | 6 - .../snippets/markdown-mode/hr.1 | 7 - .../snippets/markdown-mode/hr.2 | 7 - .../snippets/markdown-mode/img | 4 - .../snippets/markdown-mode/link | 4 - .../snippets/markdown-mode/ol | 5 - .../snippets/markdown-mode/rimg | 4 - .../snippets/markdown-mode/rlb | 5 - .../snippets/markdown-mode/rlink | 4 - .../snippets/markdown-mode/utf8 | 6 - .../snippets/ned-mode/.yas-parents | 1 - .../snippets/ned-mode/chan | 7 - .../snippets/ned-mode/connections | 6 - .../snippets/ned-mode/for | 7 - .../snippets/ned-mode/import | 5 - .../snippets/ned-mode/network | 11 - .../snippets/ned-mode/simple | 8 - .../snippets/ned-mode/submodules | 6 - .../snippets/nesc-mode/.yas-parents | 1 - .../snippets/nesc-mode/TOSSIM | 7 - .../snippets/nesc-mode/command | 7 - .../snippets/nesc-mode/dbg | 5 - .../snippets/nesc-mode/event | 7 - .../snippets/nesc-mode/ifdef | 9 - .../snippets/nesc-mode/interface | 7 - .../snippets/nesc-mode/module | 8 - .../snippets/nesc-mode/nx | 6 - .../snippets/nesc-mode/provides | 5 - .../snippets/nesc-mode/sim | 7 - .../snippets/nesc-mode/uint8_t | 6 - .../snippets/nesc-mode/uses | 6 - .../snippets/nix-mode/buildPhase | 8 - .../snippets/nix-mode/checkPhase | 8 - .../snippets/nix-mode/configurePhase | 8 - .../snippets/nix-mode/distPhase | 8 - .../snippets/nix-mode/fixPhase | 8 - .../snippets/nix-mode/installCheckPhase | 8 - .../snippets/nix-mode/installPhase | 12 - .../snippets/nix-mode/package_github | 56 - .../snippets/nix-mode/package_url | 54 - .../snippets/nix-mode/patchPhase | 8 - .../snippets/nix-mode/phases | 5 - .../snippets/nix-mode/unpackPhase | 8 - .../snippets/nsis-mode/.yas-parents | 1 - .../snippets/nsis-mode/define | 5 - .../snippets/nsis-mode/function | 7 - .../snippets/nsis-mode/if | 9 - .../snippets/nsis-mode/include | 5 - .../snippets/nsis-mode/insert_macro | 5 - .../snippets/nsis-mode/instdir | 5 - .../snippets/nsis-mode/macro | 8 - .../snippets/nsis-mode/message | 5 - .../snippets/nsis-mode/outdir | 5 - .../snippets/nsis-mode/outfile | 5 - .../snippets/nsis-mode/section | 7 - .../snippets/nxml-mode/body | 6 - .../snippets/nxml-mode/br | 4 - .../snippets/nxml-mode/doctype | 5 - .../snippets/nxml-mode/doctype_xhtml1_strict | 5 - .../nxml-mode/doctype_xhtml1_transitional | 5 - .../snippets/nxml-mode/form | 6 - .../snippets/nxml-mode/href | 5 - .../snippets/nxml-mode/html | 6 - .../snippets/nxml-mode/img | 4 - .../snippets/nxml-mode/input | 4 - .../snippets/nxml-mode/link | 4 - .../snippets/nxml-mode/meta | 5 - .../snippets/nxml-mode/name | 4 - .../snippets/nxml-mode/quote | 6 - .../snippets/nxml-mode/style | 6 - .../snippets/nxml-mode/tag | 5 - .../snippets/nxml-mode/tag_closing | 5 - .../snippets/nxml-mode/tag_newline | 7 - .../snippets/octave-mode/for | 7 - .../snippets/octave-mode/function | 7 - .../snippets/octave-mode/if | 9 - .../snippets/org-mode/dot | 9 - .../snippets/org-mode/elisp | 7 - .../snippets/org-mode/embedded | 5 - .../snippets/org-mode/entry | 11 - .../snippets/org-mode/figure | 7 - .../snippets/org-mode/img | 10 - .../snippets/org-mode/latex | 7 - .../snippets/org-mode/matrix | 11 - .../snippets/org-mode/uml | 8 - .../snippets/org-mode/verse | 7 - .../snippets/perl-mode/.yas-parents | 1 - .../snippets/perl-mode/eval | 9 - .../snippets/perl-mode/for | 6 - .../snippets/perl-mode/fore | 6 - .../snippets/perl-mode/if | 6 - .../snippets/perl-mode/ife | 8 - .../snippets/perl-mode/ifee | 10 - .../snippets/perl-mode/sub | 6 - .../snippets/perl-mode/unless | 6 - .../snippets/perl-mode/while | 6 - .../snippets/perl-mode/xfore | 4 - .../snippets/perl-mode/xif | 4 - .../snippets/perl-mode/xunless | 4 - .../snippets/perl-mode/xwhile | 4 - .../snippets/prog-mode/.yas-setup.el | 2 - .../snippets/prog-mode/fixme | 6 - .../snippets/prog-mode/todo | 5 - .../snippets/prog-mode/xxx | 5 - .../snippets/python-mode/.yas-parents | 1 - .../snippets/python-mode/.yas-setup.el | 24 - .../snippets/python-mode/__contains__ | 7 - .../snippets/python-mode/__enter__ | 9 - .../snippets/python-mode/__exit__ | 7 - .../snippets/python-mode/__getitem__ | 7 - .../snippets/python-mode/__len__ | 7 - .../snippets/python-mode/__new__ | 8 - .../snippets/python-mode/__setitem__ | 7 - .../snippets/python-mode/all | 7 - .../snippets/python-mode/arg | 7 - .../snippets/python-mode/arg_positional | 6 - .../snippets/python-mode/assert | 6 - .../snippets/python-mode/assertEqual | 6 - .../snippets/python-mode/assertFalse | 6 - .../snippets/python-mode/assertIn | 6 - .../snippets/python-mode/assertNotEqual | 6 - .../snippets/python-mode/assertNotIn | 6 - .../snippets/python-mode/assertRaises | 6 - .../snippets/python-mode/assertRaises.with | 6 - .../snippets/python-mode/assertTrue | 6 - .../snippets/python-mode/celery_pdb | 6 - .../snippets/python-mode/classmethod | 8 - .../snippets/python-mode/cls | 7 - .../snippets/python-mode/dec | 14 - .../snippets/python-mode/deftest | 7 - .../snippets/python-mode/django_test_class | 7 - .../snippets/python-mode/doc | 6 - .../snippets/python-mode/doctest | 8 - .../snippets/python-mode/eq | 7 - .../snippets/python-mode/for | 6 - .../snippets/python-mode/from | 6 - .../snippets/python-mode/function | 7 - .../snippets/python-mode/function_docstring | 10 - .../snippets/python-mode/if | 7 - .../snippets/python-mode/ife | 9 - .../snippets/python-mode/ifmain | 6 - .../snippets/python-mode/import | 7 - .../snippets/python-mode/init | 8 - .../snippets/python-mode/init_docstring | 10 - .../snippets/python-mode/interact | 5 - .../snippets/python-mode/ipdbdebug | 6 - .../snippets/python-mode/iter | 7 - .../snippets/python-mode/lambda | 5 - .../snippets/python-mode/list | 7 - .../snippets/python-mode/logger_name | 5 - .../snippets/python-mode/logging | 6 - .../snippets/python-mode/main | 6 - .../snippets/python-mode/metaclass | 6 - .../snippets/python-mode/method | 7 - .../snippets/python-mode/method_docstring | 10 - .../snippets/python-mode/not_impl | 5 - .../snippets/python-mode/np | 7 - .../snippets/python-mode/parse_args | 9 - .../snippets/python-mode/parser | 7 - .../snippets/python-mode/pass | 5 - .../snippets/python-mode/pl | 7 - .../snippets/python-mode/print | 5 - .../snippets/python-mode/prop | 17 - .../snippets/python-mode/reg | 7 - .../snippets/python-mode/repr | 7 - .../snippets/python-mode/return | 5 - .../snippets/python-mode/script | 11 - .../snippets/python-mode/self | 6 - .../snippets/python-mode/self_without_dot | 6 - .../snippets/python-mode/selfassign | 6 - .../snippets/python-mode/setdef | 5 - .../snippets/python-mode/setup | 14 - .../snippets/python-mode/size | 5 - .../snippets/python-mode/static | 6 - .../snippets/python-mode/str | 7 - .../snippets/python-mode/super | 7 - .../snippets/python-mode/test_class | 7 - .../snippets/python-mode/test_file | 12 - .../snippets/python-mode/trace | 6 - .../snippets/python-mode/try | 8 - .../snippets/python-mode/tryelse | 10 - .../snippets/python-mode/unicode | 7 - .../snippets/python-mode/utf8 | 5 - .../snippets/python-mode/while | 7 - .../snippets/python-mode/with | 7 - .../snippets/python-mode/with_statement | 6 - .../snippets/rename_add_contr.py | 36 - .../snippets/rst-mode/autoclass | 6 - .../snippets/rst-mode/autofunction | 5 - .../snippets/rst-mode/automodule | 5 - .../snippets/rst-mode/chapter | 8 - .../snippets/rst-mode/class | 5 - .../snippets/rst-mode/code | 5 - .../snippets/rst-mode/digraph | 7 - .../snippets/rst-mode/function | 5 - .../snippets/rst-mode/graph | 7 - .../snippets/rst-mode/graphviz | 7 - .../snippets/rst-mode/image | 10 - .../snippets/rst-mode/inheritance | 5 - .../snippets/rst-mode/literal_include | 5 - .../snippets/rst-mode/meta | 5 - .../snippets/rst-mode/module | 5 - .../snippets/rst-mode/parsed_literal | 6 - .../snippets/rst-mode/pause | 6 - .../snippets/rst-mode/section | 8 - .../snippets/rst-mode/term | 5 - .../snippets/rst-mode/title | 9 - .../snippets/rst-mode/url | 5 - .../snippets/rst-mode/verbatim | 6 - .../snippets/rst-mode/warning | 6 - .../snippets/ruby-mode/# | 4 - .../snippets/ruby-mode/=b | 6 - .../snippets/ruby-mode/Comp | 8 - .../snippets/ruby-mode/GLOB | 5 - .../snippets/ruby-mode/all | 4 - .../snippets/ruby-mode/am | 4 - .../snippets/ruby-mode/any | 4 - .../snippets/ruby-mode/app | 6 - .../snippets/ruby-mode/attribute | 5 - .../snippets/ruby-mode/bench | 10 - .../snippets/ruby-mode/bm | 6 - .../snippets/ruby-mode/case | 7 - .../snippets/ruby-mode/cla | 6 - .../snippets/ruby-mode/cls | 11 - .../snippets/ruby-mode/collect | 4 - .../snippets/ruby-mode/dee | 4 - .../snippets/ruby-mode/def | 7 - .../snippets/ruby-mode/deli | 4 - .../snippets/ruby-mode/det | 4 - .../snippets/ruby-mode/dow | 6 - .../snippets/ruby-mode/ea | 4 - .../snippets/ruby-mode/eac | 4 - .../snippets/ruby-mode/eai | 4 - .../snippets/ruby-mode/eav | 4 - .../snippets/ruby-mode/eawi | 4 - .../snippets/ruby-mode/for | 7 - .../snippets/ruby-mode/forin | 6 - .../snippets/ruby-mode/formula | 16 - .../snippets/ruby-mode/if | 6 - .../snippets/ruby-mode/ife | 8 - .../snippets/ruby-mode/init | 7 - .../snippets/ruby-mode/inject | 4 - .../snippets/ruby-mode/map | 4 - .../snippets/ruby-mode/mm | 6 - .../snippets/ruby-mode/mod | 13 - .../snippets/ruby-mode/r | 4 - .../snippets/ruby-mode/rb | 4 - .../snippets/ruby-mode/red | 4 - .../snippets/ruby-mode/reject | 4 - .../snippets/ruby-mode/rel | 4 - .../snippets/ruby-mode/req | 4 - .../snippets/ruby-mode/rw | 4 - .../snippets/ruby-mode/select | 4 - .../snippets/ruby-mode/str | 5 - .../snippets/ruby-mode/test class | 7 - .../snippets/ruby-mode/tim | 4 - .../snippets/ruby-mode/to_ | 8 - .../snippets/ruby-mode/tu | 5 - .../snippets/ruby-mode/until | 6 - .../snippets/ruby-mode/upt | 6 - .../snippets/ruby-mode/w | 4 - .../snippets/ruby-mode/when | 6 - .../snippets/ruby-mode/while | 6 - .../snippets/ruby-mode/y | 4 - .../snippets/ruby-mode/zip | 4 - .../snippets/scala-mode/app | 8 - .../snippets/scala-mode/case | 6 - .../snippets/scala-mode/cc | 8 - .../snippets/scala-mode/co | 6 - .../snippets/scala-mode/cons | 6 - .../snippets/scala-mode/def | 8 - .../snippets/scala-mode/doc | 9 - .../snippets/scala-mode/for | 8 - .../snippets/scala-mode/if | 8 - .../snippets/scala-mode/ls | 6 - .../snippets/scala-mode/main | 8 - .../snippets/scala-mode/match | 8 - .../snippets/scala-mode/ob | 6 - .../snippets/scala-mode/throw | 6 - .../snippets/scala-mode/try | 11 - .../snippets/scala-mode/valueclass | 6 - .../snippets/sh-mode/args | 7 - .../snippets/sh-mode/bang | 6 - .../snippets/sh-mode/for loop | 7 - .../snippets/sh-mode/function | 7 - .../snippets/sh-mode/if | 8 - .../snippets/sh-mode/ife | 9 - .../snippets/sh-mode/safe-bang | 9 - .../snippets/sh-mode/while | 7 - .../snippets/snippet-mode/cont | 5 - .../snippets/snippet-mode/elisp | 5 - .../snippets/snippet-mode/field | 6 - .../snippets/snippet-mode/group | 5 - .../snippets/snippet-mode/mirror | 6 - .../snippets/snippet-mode/vars | 13 - .../snippets/sql-mode/column | 4 - .../snippets/sql-mode/constraint | 4 - .../snippets/sql-mode/constraint.1 | 4 - .../snippets/sql-mode/create | 10 - .../snippets/sql-mode/create.1 | 12 - .../snippets/sql-mode/references | 4 - .../snippets/text-mode/.yas-parents | 1 - .../snippets/tuareg-mode/assert | 5 - .../snippets/tuareg-mode/docstring | 5 - .../snippets/tuareg-mode/for | 7 - .../snippets/tuareg-mode/fun | 5 - .../snippets/tuareg-mode/guard | 5 - .../snippets/tuareg-mode/ifthen | 6 - .../snippets/tuareg-mode/ifthenelse | 8 - .../snippets/tuareg-mode/let | 5 - .../snippets/tuareg-mode/list_comprehension | 5 - .../snippets/tuareg-mode/main | 6 - .../snippets/tuareg-mode/match | 6 - .../snippets/tuareg-mode/module | 9 - .../snippets/tuareg-mode/open | 5 - .../snippets/tuareg-mode/printf | 5 - .../snippets/tuareg-mode/rec | 6 - .../snippets/tuareg-mode/try | 8 - .../snippets/tuareg-mode/type | 5 - .../snippets/tuareg-mode/type_type | 6 - .../snippets/tuareg-mode/val | 5 - .../snippets/tuareg-mode/while | 7 - .../snippets/typerex-mode | 0 .../snippets/udev-mode/ENV | 5 - .../snippets/udev-mode/GOTO | 8 - .../snippets/udev-mode/KERNEL | 5 - .../snippets/udev-mode/add | 5 - .../snippets/udev-mode/env$ | 5 - .../snippets/udev-mode/run | 5 - elpa/yasnippet-20161022.646/snippets/web-mode | 0 .../snippets/yaml-mode/entry | 6 - .../snippets/yaml-mode/list | 6 - .../snippets/yaml-mode/section | 6 - .../yasnippet-autoloads.el | 65 - elpa/yasnippet-20161022.646/yasnippet-pkg.el | 7 - elpa/yasnippet-20161022.646/yasnippet.el | 4646 --- .../zone-nyan-autoloads.el | 27 - elpa/zone-nyan-20161014.154/zone-nyan-pkg.el | 2 - elpa/zone-nyan-20161014.154/zone-nyan.el | 805 - 1773 files changed, 2 insertions(+), 356540 deletions(-) delete mode 100644 elpa/ace-window-20161018.1624/ace-window-autoloads.el delete mode 100644 elpa/ace-window-20161018.1624/ace-window-pkg.el delete mode 100644 elpa/ace-window-20161018.1624/ace-window.el delete mode 100644 elpa/ag-20161021.2133/ag-autoloads.el delete mode 100644 elpa/ag-20161021.2133/ag-pkg.el delete mode 100644 elpa/ag-20161021.2133/ag.el delete mode 100644 elpa/alert-20160824.821/alert-autoloads.el delete mode 100644 elpa/alert-20160824.821/alert-pkg.el delete mode 100644 elpa/alert-20160824.821/alert.el delete mode 100644 elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-autoloads.el delete mode 100644 elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-pkg.el delete mode 100644 elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode.el delete mode 100644 elpa/async-20161010.2322/async-autoloads.el delete mode 100644 elpa/async-20161010.2322/async-bytecomp.el delete mode 100644 elpa/async-20161010.2322/async-pkg.el delete mode 100644 elpa/async-20161010.2322/async.el delete mode 100644 elpa/async-20161010.2322/dired-async.el delete mode 100644 elpa/async-20161010.2322/smtpmail-async.el delete mode 100644 elpa/avy-20160814.250/avy-autoloads.el delete mode 100644 elpa/avy-20160814.250/avy-pkg.el delete mode 100644 elpa/avy-20160814.250/avy.el delete mode 100644 elpa/beacon-20161004.756/beacon-autoloads.el delete mode 100644 elpa/beacon-20161004.756/beacon-pkg.el delete mode 100644 elpa/beacon-20161004.756/beacon.el delete mode 100644 elpa/bind-key-20160227.48/bind-key-autoloads.el delete mode 100644 elpa/bind-key-20160227.48/bind-key-pkg.el delete mode 100644 elpa/bind-key-20160227.48/bind-key.el delete mode 100644 elpa/cheatsheet-20151203.151/cheatsheet-autoloads.el delete mode 100644 elpa/cheatsheet-20151203.151/cheatsheet-pkg.el delete mode 100644 elpa/cheatsheet-20151203.151/cheatsheet.el delete mode 100644 elpa/coffee-mode-20160808.1712/coffee-mode-autoloads.el delete mode 100644 elpa/coffee-mode-20160808.1712/coffee-mode-pkg.el delete mode 100644 elpa/coffee-mode-20160808.1712/coffee-mode.el delete mode 100644 elpa/command-log-mode-20160412.2147/command-log-mode-autoloads.el delete mode 100644 elpa/command-log-mode-20160412.2147/command-log-mode-pkg.el delete mode 100644 elpa/command-log-mode-20160412.2147/command-log-mode.el delete mode 100644 elpa/company-20160829.1206/company-abbrev.el delete mode 100644 elpa/company-20160829.1206/company-autoloads.el delete mode 100644 elpa/company-20160829.1206/company-bbdb.el delete mode 100644 elpa/company-20160829.1206/company-capf.el delete mode 100644 elpa/company-20160829.1206/company-clang.el delete mode 100644 elpa/company-20160829.1206/company-cmake.el delete mode 100644 elpa/company-20160829.1206/company-css.el delete mode 100644 elpa/company-20160829.1206/company-dabbrev-code.el delete mode 100644 elpa/company-20160829.1206/company-dabbrev.el delete mode 100644 elpa/company-20160829.1206/company-eclim.el delete mode 100644 elpa/company-20160829.1206/company-elisp.el delete mode 100644 elpa/company-20160829.1206/company-etags.el delete mode 100644 elpa/company-20160829.1206/company-files.el delete mode 100644 elpa/company-20160829.1206/company-gtags.el delete mode 100644 elpa/company-20160829.1206/company-ispell.el delete mode 100644 elpa/company-20160829.1206/company-keywords.el delete mode 100644 elpa/company-20160829.1206/company-nxml.el delete mode 100644 elpa/company-20160829.1206/company-oddmuse.el delete mode 100644 elpa/company-20160829.1206/company-pkg.el delete mode 100644 elpa/company-20160829.1206/company-semantic.el delete mode 100644 elpa/company-20160829.1206/company-template.el delete mode 100644 elpa/company-20160829.1206/company-tempo.el delete mode 100644 elpa/company-20160829.1206/company-xcode.el delete mode 100644 elpa/company-20160829.1206/company-yasnippet.el delete mode 100644 elpa/company-20160829.1206/company.el delete mode 100644 elpa/company-c-headers-20150801.901/company-c-headers-autoloads.el delete mode 100644 elpa/company-c-headers-20150801.901/company-c-headers-pkg.el delete mode 100644 elpa/company-c-headers-20150801.901/company-c-headers.el delete mode 100644 elpa/company-emoji-20160331.1641/company-emoji-autoloads.el delete mode 100644 elpa/company-emoji-20160331.1641/company-emoji-pkg.el delete mode 100644 elpa/company-emoji-20160331.1641/company-emoji.el delete mode 100644 elpa/company-restclient-20151202.401/company-restclient-autoloads.el delete mode 100644 elpa/company-restclient-20151202.401/company-restclient-pkg.el delete mode 100644 elpa/company-restclient-20151202.401/company-restclient.el delete mode 100644 elpa/company-shell-20161002.505/company-shell-autoloads.el delete mode 100644 elpa/company-shell-20161002.505/company-shell-pkg.el delete mode 100644 elpa/company-shell-20161002.505/company-shell.el delete mode 100644 elpa/dash-20161018.136/dash-autoloads.el delete mode 100644 elpa/dash-20161018.136/dash-pkg.el delete mode 100644 elpa/dash-20161018.136/dash.el delete mode 100644 elpa/diminish-20151215.915/diminish-autoloads.el delete mode 100644 elpa/diminish-20151215.915/diminish-pkg.el delete mode 100644 elpa/diminish-20151215.915/diminish.el delete mode 100644 elpa/drag-stuff-20160520.1159/drag-stuff-autoloads.el delete mode 100644 elpa/drag-stuff-20160520.1159/drag-stuff-pkg.el delete mode 100644 elpa/drag-stuff-20160520.1159/drag-stuff.el delete mode 100644 elpa/electric-case-20150417.412/electric-case-autoloads.el delete mode 100644 elpa/electric-case-20150417.412/electric-case-pkg.el delete mode 100644 elpa/electric-case-20150417.412/electric-case.el delete mode 100644 elpa/electric-spacing-20151209.736/electric-spacing-autoloads.el delete mode 100644 elpa/electric-spacing-20151209.736/electric-spacing-pkg.el delete mode 100644 elpa/electric-spacing-20151209.736/electric-spacing.el delete mode 100644 elpa/emamux-20160602.653/emamux-autoloads.el delete mode 100644 elpa/emamux-20160602.653/emamux-pkg.el delete mode 100644 elpa/emamux-20160602.653/emamux.el delete mode 100644 elpa/epl-20150517.433/epl-autoloads.el delete mode 100644 elpa/epl-20150517.433/epl-pkg.el delete mode 100644 elpa/epl-20150517.433/epl.el delete mode 100644 elpa/esxml-20160703.1417/esxml-autoloads.el delete mode 100644 elpa/esxml-20160703.1417/esxml-pkg.el delete mode 100644 elpa/esxml-20160703.1417/esxml.el delete mode 100644 elpa/flycheck-20161023.738/flycheck-autoloads.el delete mode 100644 elpa/flycheck-20161023.738/flycheck-buttercup.el delete mode 100644 elpa/flycheck-20161023.738/flycheck-ert.el delete mode 100644 elpa/flycheck-20161023.738/flycheck-pkg.el delete mode 100644 elpa/flycheck-20161023.738/flycheck.el delete mode 100644 elpa/flycheck-pkg-config-20160610.1335/flycheck-pkg-config-autoloads.el delete mode 100644 elpa/flycheck-pkg-config-20160610.1335/flycheck-pkg-config-pkg.el delete mode 100644 elpa/flycheck-pkg-config-20160610.1335/flycheck-pkg-config.el delete mode 100644 elpa/focus-20161013.401/focus-autoloads.el delete mode 100644 elpa/focus-20161013.401/focus-pkg.el delete mode 100644 elpa/focus-20161013.401/focus.el delete mode 100644 elpa/ggtags-20161022.251/ggtags-autoloads.el delete mode 100644 elpa/ggtags-20161022.251/ggtags-pkg.el delete mode 100644 elpa/ggtags-20161022.251/ggtags.el delete mode 100644 elpa/git-commit-20161011.1738/git-commit-autoloads.el delete mode 100644 elpa/git-commit-20161011.1738/git-commit-pkg.el delete mode 100644 elpa/git-commit-20161011.1738/git-commit.el delete mode 100644 elpa/git-gutter-20160903.852/git-gutter-autoloads.el delete mode 100644 elpa/git-gutter-20160903.852/git-gutter-pkg.el delete mode 100644 elpa/git-gutter-20160903.852/git-gutter.el delete mode 100644 elpa/git-messenger-20160815.1952/git-messenger-autoloads.el delete mode 100644 elpa/git-messenger-20160815.1952/git-messenger-pkg.el delete mode 100644 elpa/git-messenger-20160815.1952/git-messenger.el delete mode 100644 elpa/git-timemachine-20160607.1228/git-timemachine-autoloads.el delete mode 100644 elpa/git-timemachine-20160607.1228/git-timemachine-pkg.el delete mode 100644 elpa/git-timemachine-20160607.1228/git-timemachine.el delete mode 100644 elpa/gitconfig-mode-20160710.1913/gitconfig-mode-autoloads.el delete mode 100644 elpa/gitconfig-mode-20160710.1913/gitconfig-mode-pkg.el delete mode 100644 elpa/gitconfig-mode-20160710.1913/gitconfig-mode.el delete mode 100644 elpa/gitignore-mode-20160319.302/gitignore-mode-autoloads.el delete mode 100644 elpa/gitignore-mode-20160319.302/gitignore-mode-pkg.el delete mode 100644 elpa/gitignore-mode-20160319.302/gitignore-mode.el delete mode 100644 elpa/gntp-20141024.1950/gntp-autoloads.el delete mode 100644 elpa/gntp-20141024.1950/gntp-pkg.el delete mode 100644 elpa/gntp-20141024.1950/gntp.el delete mode 100644 elpa/gnugo-3.0.0/.dir-locals.el delete mode 100644 elpa/gnugo-3.0.0/ChangeLog delete mode 100644 elpa/gnugo-3.0.0/HACKING delete mode 100644 elpa/gnugo-3.0.0/NEWS delete mode 100644 elpa/gnugo-3.0.0/README delete mode 100644 elpa/gnugo-3.0.0/gnugo-autoloads.el delete mode 100644 elpa/gnugo-3.0.0/gnugo-frolic.el delete mode 100644 elpa/gnugo-3.0.0/gnugo-imgen.el delete mode 100644 elpa/gnugo-3.0.0/gnugo-pkg.el delete mode 100644 elpa/gnugo-3.0.0/gnugo.el delete mode 100644 elpa/gobgen-20161020.823/gobgen-autoloads.el delete mode 100644 elpa/gobgen-20161020.823/gobgen-pkg.el delete mode 100644 elpa/gobgen-20161020.823/gobgen.el delete mode 100644 elpa/google-20140416.1048/google-autoloads.el delete mode 100644 elpa/google-20140416.1048/google-pkg.el delete mode 100644 elpa/google-20140416.1048/google.el delete mode 100644 elpa/goto-last-change-20150109.1023/goto-last-change-autoloads.el delete mode 100644 elpa/goto-last-change-20150109.1023/goto-last-change-pkg.el delete mode 100644 elpa/goto-last-change-20150109.1023/goto-last-change.el delete mode 100644 elpa/haml-mode-20150508.2011/haml-mode-autoloads.el delete mode 100644 elpa/haml-mode-20150508.2011/haml-mode-pkg.el delete mode 100644 elpa/haml-mode-20150508.2011/haml-mode.el delete mode 100755 elpa/helm-20161023.1200/emacs-helm.sh delete mode 100644 elpa/helm-20161023.1200/helm-adaptive.el delete mode 100644 elpa/helm-20161023.1200/helm-apt.el delete mode 100644 elpa/helm-20161023.1200/helm-autoloads.el delete mode 100644 elpa/helm-20161023.1200/helm-bookmark.el delete mode 100644 elpa/helm-20161023.1200/helm-buffers.el delete mode 100644 elpa/helm-20161023.1200/helm-color.el delete mode 100644 elpa/helm-20161023.1200/helm-command.el delete mode 100644 elpa/helm-20161023.1200/helm-config.el delete mode 100644 elpa/helm-20161023.1200/helm-dabbrev.el delete mode 100644 elpa/helm-20161023.1200/helm-easymenu.el delete mode 100644 elpa/helm-20161023.1200/helm-elisp-package.el delete mode 100644 elpa/helm-20161023.1200/helm-elisp.el delete mode 100644 elpa/helm-20161023.1200/helm-elscreen.el delete mode 100644 elpa/helm-20161023.1200/helm-eshell.el delete mode 100644 elpa/helm-20161023.1200/helm-eval.el delete mode 100644 elpa/helm-20161023.1200/helm-external.el delete mode 100644 elpa/helm-20161023.1200/helm-files.el delete mode 100644 elpa/helm-20161023.1200/helm-font.el delete mode 100644 elpa/helm-20161023.1200/helm-grep.el delete mode 100644 elpa/helm-20161023.1200/helm-help.el delete mode 100644 elpa/helm-20161023.1200/helm-id-utils.el delete mode 100644 elpa/helm-20161023.1200/helm-imenu.el delete mode 100644 elpa/helm-20161023.1200/helm-info.el delete mode 100644 elpa/helm-20161023.1200/helm-locate.el delete mode 100644 elpa/helm-20161023.1200/helm-man.el delete mode 100644 elpa/helm-20161023.1200/helm-misc.el delete mode 100644 elpa/helm-20161023.1200/helm-mode.el delete mode 100644 elpa/helm-20161023.1200/helm-net.el delete mode 100644 elpa/helm-20161023.1200/helm-org.el delete mode 100644 elpa/helm-20161023.1200/helm-pkg.el delete mode 100644 elpa/helm-20161023.1200/helm-regexp.el delete mode 100644 elpa/helm-20161023.1200/helm-ring.el delete mode 100644 elpa/helm-20161023.1200/helm-semantic.el delete mode 100644 elpa/helm-20161023.1200/helm-sys.el delete mode 100644 elpa/helm-20161023.1200/helm-tags.el delete mode 100644 elpa/helm-20161023.1200/helm-types.el delete mode 100644 elpa/helm-20161023.1200/helm-utils.el delete mode 100644 elpa/helm-ag-20161020.952/helm-ag-autoloads.el delete mode 100644 elpa/helm-ag-20161020.952/helm-ag-pkg.el delete mode 100644 elpa/helm-ag-20161020.952/helm-ag.el delete mode 100644 elpa/helm-chrome-20160718.2220/helm-chrome-autoloads.el delete mode 100644 elpa/helm-chrome-20160718.2220/helm-chrome-pkg.el delete mode 100644 elpa/helm-chrome-20160718.2220/helm-chrome.el delete mode 100644 elpa/helm-company-20161010.59/helm-company-autoloads.el delete mode 100644 elpa/helm-company-20161010.59/helm-company-pkg.el delete mode 100644 elpa/helm-company-20161010.59/helm-company.el delete mode 100644 elpa/helm-core-20161022.251/helm-core-autoloads.el delete mode 100644 elpa/helm-core-20161022.251/helm-core-pkg.el delete mode 100644 elpa/helm-core-20161022.251/helm-lib.el delete mode 100644 elpa/helm-core-20161022.251/helm-multi-match.el delete mode 100644 elpa/helm-core-20161022.251/helm-source.el delete mode 100644 elpa/helm-core-20161022.251/helm.el delete mode 100644 elpa/helm-descbinds-20160916.713/helm-descbinds-autoloads.el delete mode 100644 elpa/helm-descbinds-20160916.713/helm-descbinds-pkg.el delete mode 100644 elpa/helm-descbinds-20160916.713/helm-descbinds.el delete mode 100644 elpa/helm-describe-modes-20160211.2118/helm-describe-modes-autoloads.el delete mode 100644 elpa/helm-describe-modes-20160211.2118/helm-describe-modes-pkg.el delete mode 100644 elpa/helm-describe-modes-20160211.2118/helm-describe-modes.el delete mode 100644 elpa/helm-flycheck-20160710.129/helm-flycheck-autoloads.el delete mode 100644 elpa/helm-flycheck-20160710.129/helm-flycheck-pkg.el delete mode 100644 elpa/helm-flycheck-20160710.129/helm-flycheck.el delete mode 100644 elpa/helm-flyspell-20160927.1648/helm-flyspell-autoloads.el delete mode 100644 elpa/helm-flyspell-20160927.1648/helm-flyspell-pkg.el delete mode 100644 elpa/helm-flyspell-20160927.1648/helm-flyspell.el delete mode 100644 elpa/helm-github-stars-20150625.1523/helm-github-stars-autoloads.el delete mode 100644 elpa/helm-github-stars-20150625.1523/helm-github-stars-pkg.el delete mode 100644 elpa/helm-github-stars-20150625.1523/helm-github-stars.el delete mode 100644 elpa/helm-google-20160620.1149/helm-google-autoloads.el delete mode 100644 elpa/helm-google-20160620.1149/helm-google-pkg.el delete mode 100644 elpa/helm-google-20160620.1149/helm-google.el delete mode 100644 elpa/helm-gtags-20160917.2238/helm-gtags-autoloads.el delete mode 100644 elpa/helm-gtags-20160917.2238/helm-gtags-pkg.el delete mode 100644 elpa/helm-gtags-20160917.2238/helm-gtags.el delete mode 100644 elpa/helm-projectile-20161008.45/helm-projectile-autoloads.el delete mode 100644 elpa/helm-projectile-20161008.45/helm-projectile-pkg.el delete mode 100644 elpa/helm-projectile-20161008.45/helm-projectile.el delete mode 100644 elpa/helm-smex-20160530.1236/helm-smex-autoloads.el delete mode 100644 elpa/helm-smex-20160530.1236/helm-smex-pkg.el delete mode 100644 elpa/helm-smex-20160530.1236/helm-smex.el delete mode 100644 elpa/helm-swoop-20160619.953/helm-swoop-autoloads.el delete mode 100644 elpa/helm-swoop-20160619.953/helm-swoop-pkg.el delete mode 100644 elpa/helm-swoop-20160619.953/helm-swoop.el delete mode 100644 elpa/hungarian-holidays-20161020.1338/hungarian-holidays-autoloads.el delete mode 100644 elpa/hungarian-holidays-20161020.1338/hungarian-holidays-pkg.el delete mode 100644 elpa/hungarian-holidays-20161020.1338/hungarian-holidays.el delete mode 100644 elpa/hungry-delete-20151203.1314/hungry-delete-autoloads.el delete mode 100644 elpa/hungry-delete-20151203.1314/hungry-delete-pkg.el delete mode 100644 elpa/hungry-delete-20151203.1314/hungry-delete.el delete mode 100644 elpa/hyde-20160507.2008/hyde-autoloads.el delete mode 100644 elpa/hyde-20160507.2008/hyde-git.el delete mode 100644 elpa/hyde-20160507.2008/hyde-md.el delete mode 100644 elpa/hyde-20160507.2008/hyde-pkg.el delete mode 100644 elpa/hyde-20160507.2008/hyde.el delete mode 100644 elpa/hyde-20160507.2008/sample-dot-hyde.el delete mode 100644 elpa/id-manager-20160425.216/id-manager-autoloads.el delete mode 100644 elpa/id-manager-20160425.216/id-manager-pkg.el delete mode 100644 elpa/id-manager-20160425.216/id-manager.el delete mode 100644 elpa/identica-mode-20130204.1453/bbdb-identica.el delete mode 100644 elpa/identica-mode-20130204.1453/dir delete mode 100644 elpa/identica-mode-20130204.1453/fdl.info delete mode 100644 elpa/identica-mode-20130204.1453/identica-friends.el delete mode 100644 elpa/identica-mode-20130204.1453/identica-mode-autoloads.el delete mode 100644 elpa/identica-mode-20130204.1453/identica-mode-pkg.el delete mode 100644 elpa/identica-mode-20130204.1453/identica-mode.el delete mode 100644 elpa/identica-mode-20130204.1453/identica-mode.info delete mode 100644 elpa/jinja2-mode-20141128.207/jinja2-mode-autoloads.el delete mode 100644 elpa/jinja2-mode-20141128.207/jinja2-mode-pkg.el delete mode 100644 elpa/jinja2-mode-20141128.207/jinja2-mode.el delete mode 100644 elpa/js2-mode-20161016.156/js2-imenu-extras.el delete mode 100644 elpa/js2-mode-20161016.156/js2-mode-autoloads.el delete mode 100644 elpa/js2-mode-20161016.156/js2-mode-pkg.el delete mode 100644 elpa/js2-mode-20161016.156/js2-mode.el delete mode 100644 elpa/js2-mode-20161016.156/js2-old-indent.el delete mode 100644 elpa/json-mode-20160803.1606/json-mode-autoloads.el delete mode 100644 elpa/json-mode-20160803.1606/json-mode-pkg.el delete mode 100644 elpa/json-mode-20160803.1606/json-mode.el delete mode 100644 elpa/json-reformat-20160212.53/json-reformat-autoloads.el delete mode 100644 elpa/json-reformat-20160212.53/json-reformat-pkg.el delete mode 100644 elpa/json-reformat-20160212.53/json-reformat.el delete mode 100644 elpa/json-snatcher-20150511.2047/json-snatcher-autoloads.el delete mode 100644 elpa/json-snatcher-20150511.2047/json-snatcher-pkg.el delete mode 100644 elpa/json-snatcher-20150511.2047/json-snatcher.el delete mode 100644 elpa/know-your-http-well-20160208.1504/http-headers.el delete mode 100644 elpa/know-your-http-well-20160208.1504/http-methods.el delete mode 100644 elpa/know-your-http-well-20160208.1504/http-relations.el delete mode 100644 elpa/know-your-http-well-20160208.1504/http-status-codes.el delete mode 100644 elpa/know-your-http-well-20160208.1504/know-your-http-well-autoloads.el delete mode 100644 elpa/know-your-http-well-20160208.1504/know-your-http-well-pkg.el delete mode 100644 elpa/know-your-http-well-20160208.1504/know-your-http-well.el delete mode 100644 elpa/know-your-http-well-20160208.1504/media-types.el delete mode 100644 elpa/let-alist-1.0.4/let-alist-autoloads.el delete mode 100644 elpa/let-alist-1.0.4/let-alist-pkg.el delete mode 100644 elpa/let-alist-1.0.4/let-alist.el delete mode 100644 elpa/log4e-20150105.505/log4e-autoloads.el delete mode 100644 elpa/log4e-20150105.505/log4e-pkg.el delete mode 100644 elpa/log4e-20150105.505/log4e.el delete mode 100644 elpa/magit-20161022.1845/AUTHORS.md delete mode 100644 elpa/magit-20161022.1845/COPYING delete mode 100644 elpa/magit-20161022.1845/dir delete mode 100644 elpa/magit-20161022.1845/git-rebase.el delete mode 100644 elpa/magit-20161022.1845/magit-apply.el delete mode 100644 elpa/magit-20161022.1845/magit-autoloads.el delete mode 100644 elpa/magit-20161022.1845/magit-autorevert.el delete mode 100644 elpa/magit-20161022.1845/magit-bisect.el delete mode 100644 elpa/magit-20161022.1845/magit-blame.el delete mode 100644 elpa/magit-20161022.1845/magit-commit.el delete mode 100644 elpa/magit-20161022.1845/magit-core.el delete mode 100644 elpa/magit-20161022.1845/magit-diff.el delete mode 100644 elpa/magit-20161022.1845/magit-ediff.el delete mode 100644 elpa/magit-20161022.1845/magit-extras.el delete mode 100644 elpa/magit-20161022.1845/magit-git.el delete mode 100644 elpa/magit-20161022.1845/magit-log.el delete mode 100644 elpa/magit-20161022.1845/magit-mode.el delete mode 100644 elpa/magit-20161022.1845/magit-pkg.el delete mode 100644 elpa/magit-20161022.1845/magit-process.el delete mode 100644 elpa/magit-20161022.1845/magit-remote.el delete mode 100644 elpa/magit-20161022.1845/magit-section.el delete mode 100644 elpa/magit-20161022.1845/magit-sequence.el delete mode 100644 elpa/magit-20161022.1845/magit-stash.el delete mode 100644 elpa/magit-20161022.1845/magit-submodule.el delete mode 100644 elpa/magit-20161022.1845/magit-subtree.el delete mode 100644 elpa/magit-20161022.1845/magit-utils.el delete mode 100644 elpa/magit-20161022.1845/magit-wip.el delete mode 100644 elpa/magit-20161022.1845/magit.el delete mode 100644 elpa/magit-20161022.1845/magit.info delete mode 100644 elpa/magit-20161022.1845/magit.info-1 delete mode 100644 elpa/magit-20161022.1845/magit.info-2 delete mode 100644 elpa/magit-gerrit-20160226.130/magit-gerrit-autoloads.el delete mode 100644 elpa/magit-gerrit-20160226.130/magit-gerrit-pkg.el delete mode 100644 elpa/magit-gerrit-20160226.130/magit-gerrit.el delete mode 100644 elpa/magit-popup-20161009.1506/dir delete mode 100644 elpa/magit-popup-20161009.1506/magit-popup-autoloads.el delete mode 100644 elpa/magit-popup-20161009.1506/magit-popup-pkg.el delete mode 100644 elpa/magit-popup-20161009.1506/magit-popup.el delete mode 100644 elpa/magit-popup-20161009.1506/magit-popup.info delete mode 100644 elpa/magithub-20161013.2332/magithub-autoloads.el delete mode 100644 elpa/magithub-20161013.2332/magithub-cache.el delete mode 100644 elpa/magithub-20161013.2332/magithub-ci.el delete mode 100644 elpa/magithub-20161013.2332/magithub-core.el delete mode 100644 elpa/magithub-20161013.2332/magithub-issue.el delete mode 100644 elpa/magithub-20161013.2332/magithub-pkg.el delete mode 100644 elpa/magithub-20161013.2332/magithub.el delete mode 100644 elpa/markdown-mode-20160928.932/markdown-mode-autoloads.el delete mode 100644 elpa/markdown-mode-20160928.932/markdown-mode-pkg.el delete mode 100644 elpa/markdown-mode-20160928.932/markdown-mode.el delete mode 100644 elpa/mc-extras-20150218.234/mc-compare.el delete mode 100644 elpa/mc-extras-20150218.234/mc-cua.el delete mode 100644 elpa/mc-extras-20150218.234/mc-extras-autoloads.el delete mode 100644 elpa/mc-extras-20150218.234/mc-extras-pkg.el delete mode 100644 elpa/mc-extras-20150218.234/mc-extras.el delete mode 100644 elpa/mc-extras-20150218.234/mc-freeze.el delete mode 100644 elpa/mc-extras-20150218.234/mc-rect.el delete mode 100644 elpa/mc-extras-20150218.234/mc-remove.el delete mode 100644 elpa/multiple-cursors-20161021.1431/mc-cycle-cursors.el delete mode 100644 elpa/multiple-cursors-20161021.1431/mc-edit-lines.el delete mode 100644 elpa/multiple-cursors-20161021.1431/mc-hide-unmatched-lines-mode.el delete mode 100644 elpa/multiple-cursors-20161021.1431/mc-mark-more.el delete mode 100644 elpa/multiple-cursors-20161021.1431/mc-mark-pop.el delete mode 100644 elpa/multiple-cursors-20161021.1431/mc-separate-operations.el delete mode 100644 elpa/multiple-cursors-20161021.1431/multiple-cursors-autoloads.el delete mode 100644 elpa/multiple-cursors-20161021.1431/multiple-cursors-core.el delete mode 100644 elpa/multiple-cursors-20161021.1431/multiple-cursors-pkg.el delete mode 100644 elpa/multiple-cursors-20161021.1431/multiple-cursors.el delete mode 100644 elpa/multiple-cursors-20161021.1431/rectangular-region-mode.el delete mode 100644 elpa/ng2-mode-20160910.820/ng2-html.el delete mode 100644 elpa/ng2-mode-20160910.820/ng2-mode-autoloads.el delete mode 100644 elpa/ng2-mode-20160910.820/ng2-mode-pkg.el delete mode 100644 elpa/ng2-mode-20160910.820/ng2-mode.el delete mode 100644 elpa/ng2-mode-20160910.820/ng2-ts.el delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan-frame-1.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan-frame-2.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan-frame-3.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan-frame-4.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan-frame-5.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan-frame-6.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/nyan.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/outerspace.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/img/rainbow.xpm delete mode 100644 elpa/nyan-mode-20160429.1323/mus/nyanlooped.mp3 delete mode 100644 elpa/nyan-mode-20160429.1323/nyan-mode-autoloads.el delete mode 100644 elpa/nyan-mode-20160429.1323/nyan-mode-pkg.el delete mode 100644 elpa/nyan-mode-20160429.1323/nyan-mode.el delete mode 100644 elpa/nyan-prompt-20140809.2208/img/nyan.xpm delete mode 100644 elpa/nyan-prompt-20140809.2208/nyan-prompt-autoloads.el delete mode 100644 elpa/nyan-prompt-20140809.2208/nyan-prompt-pkg.el delete mode 100644 elpa/nyan-prompt-20140809.2208/nyan-prompt.el delete mode 100644 elpa/org-20161017/COPYING delete mode 100644 elpa/org-20161017/README_ELPA delete mode 100644 elpa/org-20161017/dir delete mode 100644 elpa/org-20161017/etc/ORG-NEWS delete mode 100644 elpa/org-20161017/etc/styles/OrgOdtContentTemplate.xml delete mode 100644 elpa/org-20161017/etc/styles/OrgOdtStyles.xml delete mode 100644 elpa/org-20161017/etc/styles/README delete mode 100644 elpa/org-20161017/ob-C.el delete mode 100644 elpa/org-20161017/ob-J.el delete mode 100644 elpa/org-20161017/ob-R.el delete mode 100644 elpa/org-20161017/ob-abc.el delete mode 100644 elpa/org-20161017/ob-asymptote.el delete mode 100644 elpa/org-20161017/ob-awk.el delete mode 100644 elpa/org-20161017/ob-calc.el delete mode 100644 elpa/org-20161017/ob-clojure.el delete mode 100644 elpa/org-20161017/ob-comint.el delete mode 100644 elpa/org-20161017/ob-coq.el delete mode 100644 elpa/org-20161017/ob-core.el delete mode 100644 elpa/org-20161017/ob-css.el delete mode 100644 elpa/org-20161017/ob-ditaa.el delete mode 100644 elpa/org-20161017/ob-dot.el delete mode 100644 elpa/org-20161017/ob-ebnf.el delete mode 100644 elpa/org-20161017/ob-emacs-lisp.el delete mode 100644 elpa/org-20161017/ob-eval.el delete mode 100644 elpa/org-20161017/ob-exp.el delete mode 100644 elpa/org-20161017/ob-forth.el delete mode 100644 elpa/org-20161017/ob-fortran.el delete mode 100644 elpa/org-20161017/ob-gnuplot.el delete mode 100644 elpa/org-20161017/ob-groovy.el delete mode 100644 elpa/org-20161017/ob-haskell.el delete mode 100644 elpa/org-20161017/ob-io.el delete mode 100644 elpa/org-20161017/ob-java.el delete mode 100644 elpa/org-20161017/ob-js.el delete mode 100644 elpa/org-20161017/ob-keys.el delete mode 100644 elpa/org-20161017/ob-latex.el delete mode 100644 elpa/org-20161017/ob-ledger.el delete mode 100644 elpa/org-20161017/ob-lilypond.el delete mode 100644 elpa/org-20161017/ob-lisp.el delete mode 100644 elpa/org-20161017/ob-lob.el delete mode 100644 elpa/org-20161017/ob-makefile.el delete mode 100644 elpa/org-20161017/ob-matlab.el delete mode 100644 elpa/org-20161017/ob-maxima.el delete mode 100644 elpa/org-20161017/ob-mscgen.el delete mode 100644 elpa/org-20161017/ob-ocaml.el delete mode 100644 elpa/org-20161017/ob-octave.el delete mode 100644 elpa/org-20161017/ob-org.el delete mode 100644 elpa/org-20161017/ob-perl.el delete mode 100644 elpa/org-20161017/ob-picolisp.el delete mode 100644 elpa/org-20161017/ob-plantuml.el delete mode 100644 elpa/org-20161017/ob-processing.el delete mode 100644 elpa/org-20161017/ob-python.el delete mode 100644 elpa/org-20161017/ob-ref.el delete mode 100644 elpa/org-20161017/ob-ruby.el delete mode 100644 elpa/org-20161017/ob-sass.el delete mode 100644 elpa/org-20161017/ob-scala.el delete mode 100644 elpa/org-20161017/ob-scheme.el delete mode 100644 elpa/org-20161017/ob-screen.el delete mode 100644 elpa/org-20161017/ob-sed.el delete mode 100644 elpa/org-20161017/ob-shell.el delete mode 100644 elpa/org-20161017/ob-shen.el delete mode 100644 elpa/org-20161017/ob-sql.el delete mode 100644 elpa/org-20161017/ob-sqlite.el delete mode 100644 elpa/org-20161017/ob-stan.el delete mode 100644 elpa/org-20161017/ob-table.el delete mode 100644 elpa/org-20161017/ob-tangle.el delete mode 100644 elpa/org-20161017/ob.el delete mode 100644 elpa/org-20161017/org delete mode 100644 elpa/org-20161017/org-agenda.el delete mode 100644 elpa/org-20161017/org-archive.el delete mode 100644 elpa/org-20161017/org-attach.el delete mode 100644 elpa/org-20161017/org-autoloads.el delete mode 100644 elpa/org-20161017/org-bbdb.el delete mode 100644 elpa/org-20161017/org-bibtex.el delete mode 100644 elpa/org-20161017/org-capture.el delete mode 100644 elpa/org-20161017/org-clock.el delete mode 100644 elpa/org-20161017/org-colview.el delete mode 100644 elpa/org-20161017/org-compat.el delete mode 100644 elpa/org-20161017/org-crypt.el delete mode 100644 elpa/org-20161017/org-ctags.el delete mode 100644 elpa/org-20161017/org-datetree.el delete mode 100644 elpa/org-20161017/org-docview.el delete mode 100644 elpa/org-20161017/org-element.el delete mode 100644 elpa/org-20161017/org-entities.el delete mode 100644 elpa/org-20161017/org-eshell.el delete mode 100644 elpa/org-20161017/org-faces.el delete mode 100644 elpa/org-20161017/org-feed.el delete mode 100644 elpa/org-20161017/org-footnote.el delete mode 100644 elpa/org-20161017/org-gnus.el delete mode 100644 elpa/org-20161017/org-habit.el delete mode 100644 elpa/org-20161017/org-id.el delete mode 100644 elpa/org-20161017/org-indent.el delete mode 100644 elpa/org-20161017/org-info.el delete mode 100644 elpa/org-20161017/org-inlinetask.el delete mode 100644 elpa/org-20161017/org-install.el delete mode 100644 elpa/org-20161017/org-irc.el delete mode 100644 elpa/org-20161017/org-lint.el delete mode 100644 elpa/org-20161017/org-list.el delete mode 100644 elpa/org-20161017/org-loaddefs.el delete mode 100644 elpa/org-20161017/org-macro.el delete mode 100644 elpa/org-20161017/org-macs.el delete mode 100644 elpa/org-20161017/org-mhe.el delete mode 100644 elpa/org-20161017/org-mobile.el delete mode 100644 elpa/org-20161017/org-mouse.el delete mode 100644 elpa/org-20161017/org-pcomplete.el delete mode 100644 elpa/org-20161017/org-pkg.el delete mode 100644 elpa/org-20161017/org-plot.el delete mode 100644 elpa/org-20161017/org-protocol.el delete mode 100644 elpa/org-20161017/org-rmail.el delete mode 100644 elpa/org-20161017/org-src.el delete mode 100644 elpa/org-20161017/org-table.el delete mode 100644 elpa/org-20161017/org-timer.el delete mode 100644 elpa/org-20161017/org-version.el delete mode 100644 elpa/org-20161017/org-w3m.el delete mode 100644 elpa/org-20161017/org.el delete mode 100644 elpa/org-20161017/orgcard.pdf delete mode 100644 elpa/org-20161017/ox-ascii.el delete mode 100644 elpa/org-20161017/ox-beamer.el delete mode 100644 elpa/org-20161017/ox-html.el delete mode 100644 elpa/org-20161017/ox-icalendar.el delete mode 100644 elpa/org-20161017/ox-latex.el delete mode 100644 elpa/org-20161017/ox-man.el delete mode 100644 elpa/org-20161017/ox-md.el delete mode 100644 elpa/org-20161017/ox-odt.el delete mode 100644 elpa/org-20161017/ox-org.el delete mode 100644 elpa/org-20161017/ox-publish.el delete mode 100644 elpa/org-20161017/ox-texinfo.el delete mode 100644 elpa/org-20161017/ox.el delete mode 100644 elpa/org-bullets-20140918.1137/org-bullets-autoloads.el delete mode 100644 elpa/org-bullets-20140918.1137/org-bullets-pkg.el delete mode 100644 elpa/org-bullets-20140918.1137/org-bullets.el delete mode 100644 elpa/org-jekyll-20130508.239/org-jekyll-autoloads.el delete mode 100644 elpa/org-jekyll-20130508.239/org-jekyll-pkg.el delete mode 100644 elpa/org-jekyll-20130508.239/org-jekyll.el delete mode 100644 elpa/org-projectile-20160822.2123/org-projectile-autoloads.el delete mode 100644 elpa/org-projectile-20160822.2123/org-projectile-pkg.el delete mode 100644 elpa/org-projectile-20160822.2123/org-projectile.el delete mode 100644 elpa/org-random-todo-20161018.219/org-random-todo-autoloads.el delete mode 100644 elpa/org-random-todo-20161018.219/org-random-todo-pkg.el delete mode 100644 elpa/org-random-todo-20161018.219/org-random-todo.el delete mode 100644 elpa/org-rtm-20160214.436/org-rtm-autoloads.el delete mode 100644 elpa/org-rtm-20160214.436/org-rtm-pkg.el delete mode 100644 elpa/org-rtm-20160214.436/org-rtm.el delete mode 100644 elpa/origami-20160924.218/origami-autoloads.el delete mode 100644 elpa/origami-20160924.218/origami-parsers.el delete mode 100644 elpa/origami-20160924.218/origami-pkg.el delete mode 100644 elpa/origami-20160924.218/origami.el delete mode 100644 elpa/pkg-info-20150517.443/pkg-info-autoloads.el delete mode 100644 elpa/pkg-info-20150517.443/pkg-info-pkg.el delete mode 100644 elpa/pkg-info-20150517.443/pkg-info.el delete mode 100644 elpa/plantuml-mode-20161018.1025/plantuml-mode-autoloads.el delete mode 100644 elpa/plantuml-mode-20161018.1025/plantuml-mode-pkg.el delete mode 100644 elpa/plantuml-mode-20161018.1025/plantuml-mode.el delete mode 100644 elpa/popup-20160709.729/popup-autoloads.el delete mode 100644 elpa/popup-20160709.729/popup-pkg.el delete mode 100644 elpa/popup-20160709.729/popup.el delete mode 100644 elpa/powerline-20160702.1931/powerline-autoloads.el delete mode 100644 elpa/powerline-20160702.1931/powerline-pkg.el delete mode 100644 elpa/powerline-20160702.1931/powerline-separators.el delete mode 100644 elpa/powerline-20160702.1931/powerline-themes.el delete mode 100644 elpa/powerline-20160702.1931/powerline.el delete mode 100644 elpa/projectile-20161008.47/projectile-autoloads.el delete mode 100644 elpa/projectile-20161008.47/projectile-pkg.el delete mode 100644 elpa/projectile-20161008.47/projectile.el delete mode 100644 elpa/rainbow-delimiters-20160430.2358/rainbow-delimiters-autoloads.el delete mode 100644 elpa/rainbow-delimiters-20160430.2358/rainbow-delimiters-pkg.el delete mode 100644 elpa/rainbow-delimiters-20160430.2358/rainbow-delimiters.el delete mode 100644 elpa/rainbow-mode-0.12/rainbow-mode-autoloads.el delete mode 100644 elpa/rainbow-mode-0.12/rainbow-mode-pkg.el delete mode 100644 elpa/rainbow-mode-0.12/rainbow-mode.el delete mode 100644 elpa/restclient-20160801.707/restclient-autoloads.el delete mode 100644 elpa/restclient-20160801.707/restclient-pkg.el delete mode 100644 elpa/restclient-20160801.707/restclient.el delete mode 100644 elpa/restclient-helm-20160407.249/restclient-helm-autoloads.el delete mode 100644 elpa/restclient-helm-20160407.249/restclient-helm-pkg.el delete mode 100644 elpa/restclient-helm-20160407.249/restclient-helm.el delete mode 100644 elpa/rich-minority-20160725.1255/rich-minority-autoloads.el delete mode 100644 elpa/rich-minority-20160725.1255/rich-minority-pkg.el delete mode 100644 elpa/rich-minority-20160725.1255/rich-minority.el delete mode 100644 elpa/rtm-20160116.927/rtm-autoloads.el delete mode 100644 elpa/rtm-20160116.927/rtm-pkg.el delete mode 100644 elpa/rtm-20160116.927/rtm.el delete mode 100644 elpa/s-20160928.636/s-autoloads.el delete mode 100644 elpa/s-20160928.636/s-pkg.el delete mode 100644 elpa/s-20160928.636/s.el delete mode 100644 elpa/sass-mode-20161006.2326/sass-mode-autoloads.el delete mode 100644 elpa/sass-mode-20161006.2326/sass-mode-pkg.el delete mode 100644 elpa/sass-mode-20161006.2326/sass-mode.el delete mode 100644 elpa/seq-2.16/ChangeLog delete mode 100644 elpa/seq-2.16/seq-24.el delete mode 100644 elpa/seq-2.16/seq-25.el delete mode 100644 elpa/seq-2.16/seq-autoloads.el delete mode 100644 elpa/seq-2.16/seq-pkg.el delete mode 100644 elpa/seq-2.16/seq.el delete mode 100644 elpa/seq-2.16/tests/seq-tests.el delete mode 100644 elpa/smart-mode-line-20160818.508/smart-mode-line-autoloads.el delete mode 100644 elpa/smart-mode-line-20160818.508/smart-mode-line-dark-theme.el delete mode 100644 elpa/smart-mode-line-20160818.508/smart-mode-line-light-theme.el delete mode 100644 elpa/smart-mode-line-20160818.508/smart-mode-line-pkg.el delete mode 100644 elpa/smart-mode-line-20160818.508/smart-mode-line-respectful-theme.el delete mode 100755 elpa/smart-mode-line-20160818.508/smart-mode-line.el delete mode 100644 elpa/smart-mode-line-powerline-theme-20160705.1738/smart-mode-line-light-powerline-theme.el delete mode 100644 elpa/smart-mode-line-powerline-theme-20160705.1738/smart-mode-line-powerline-theme-autoloads.el delete mode 100644 elpa/smart-mode-line-powerline-theme-20160705.1738/smart-mode-line-powerline-theme-pkg.el delete mode 100644 elpa/smart-mode-line-powerline-theme-20160705.1738/smart-mode-line-powerline-theme.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-autoloads.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-clojure.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-config.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-ess.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-haskell.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-html.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-latex.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-lua.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-pkg.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-python.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-racket.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-ruby.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-rust.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens-scala.el delete mode 100644 elpa/smartparens-20161015.1227/smartparens.el delete mode 100644 elpa/smex-20151212.1409/smex-autoloads.el delete mode 100644 elpa/smex-20151212.1409/smex-pkg.el delete mode 100644 elpa/smex-20151212.1409/smex.el delete mode 100644 elpa/spinner-1.7.1/spinner-autoloads.el delete mode 100644 elpa/spinner-1.7.1/spinner-pkg.el delete mode 100644 elpa/spinner-1.7.1/spinner.el delete mode 100644 elpa/sx-20160125.1601/sx-auth.el delete mode 100644 elpa/sx-20160125.1601/sx-autoloads.el delete mode 100644 elpa/sx-20160125.1601/sx-babel.el delete mode 100644 elpa/sx-20160125.1601/sx-button.el delete mode 100644 elpa/sx-20160125.1601/sx-cache.el delete mode 100644 elpa/sx-20160125.1601/sx-compose.el delete mode 100644 elpa/sx-20160125.1601/sx-encoding.el delete mode 100644 elpa/sx-20160125.1601/sx-favorites.el delete mode 100644 elpa/sx-20160125.1601/sx-filter.el delete mode 100644 elpa/sx-20160125.1601/sx-inbox.el delete mode 100644 elpa/sx-20160125.1601/sx-interaction.el delete mode 100644 elpa/sx-20160125.1601/sx-load.el delete mode 100644 elpa/sx-20160125.1601/sx-method.el delete mode 100644 elpa/sx-20160125.1601/sx-networks.el delete mode 100644 elpa/sx-20160125.1601/sx-notify.el delete mode 100644 elpa/sx-20160125.1601/sx-pkg.el delete mode 100644 elpa/sx-20160125.1601/sx-question-list.el delete mode 100644 elpa/sx-20160125.1601/sx-question-mode.el delete mode 100644 elpa/sx-20160125.1601/sx-question-print.el delete mode 100644 elpa/sx-20160125.1601/sx-question.el delete mode 100644 elpa/sx-20160125.1601/sx-request.el delete mode 100644 elpa/sx-20160125.1601/sx-search.el delete mode 100644 elpa/sx-20160125.1601/sx-site.el delete mode 100644 elpa/sx-20160125.1601/sx-switchto.el delete mode 100644 elpa/sx-20160125.1601/sx-tab.el delete mode 100644 elpa/sx-20160125.1601/sx-tag.el delete mode 100644 elpa/sx-20160125.1601/sx-time.el delete mode 100644 elpa/sx-20160125.1601/sx-user.el delete mode 100644 elpa/sx-20160125.1601/sx.el delete mode 100644 elpa/typescript-mode-20160923.9/typescript-mode-autoloads.el delete mode 100644 elpa/typescript-mode-20160923.9/typescript-mode-pkg.el delete mode 100644 elpa/typescript-mode-20160923.9/typescript-mode.el delete mode 100644 elpa/use-package-20161017.1640/use-package-autoloads.el delete mode 100644 elpa/use-package-20161017.1640/use-package-pkg.el delete mode 100644 elpa/use-package-20161017.1640/use-package.el delete mode 100644 elpa/vala-mode-20150324.1525/vala-mode-autoloads.el delete mode 100644 elpa/vala-mode-20150324.1525/vala-mode-pkg.el delete mode 100644 elpa/vala-mode-20150324.1525/vala-mode.el delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/classes/class.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/classes/constructor.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/classes/property.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/classes/signal.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/classes/simple-property.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/cmain.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/do-while.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/for.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/foreach.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/if-else-else.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/if-else.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/if.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/switch.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/controlflow/while.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/enum.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/exceptions/try-finally.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/exceptions/try.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/fixme.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/main.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/new.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/print-string.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/print.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/struct.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/todo.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/snippets/vala-mode/var.yasnippet delete mode 100644 elpa/vala-snippets-20150428.2052/vala-snippets-autoloads.el delete mode 100644 elpa/vala-snippets-20150428.2052/vala-snippets-pkg.el delete mode 100644 elpa/vala-snippets-20150428.2052/vala-snippets.el delete mode 100644 elpa/wakatime-mode-20161019.602/wakatime-mode-autoloads.el delete mode 100644 elpa/wakatime-mode-20161019.602/wakatime-mode-pkg.el delete mode 100644 elpa/wakatime-mode-20161019.602/wakatime-mode.el delete mode 100644 elpa/with-editor-20161009.917/dir delete mode 100644 elpa/with-editor-20161009.917/with-editor-autoloads.el delete mode 100644 elpa/with-editor-20161009.917/with-editor-pkg.el delete mode 100644 elpa/with-editor-20161009.917/with-editor.el delete mode 100644 elpa/with-editor-20161009.917/with-editor.info delete mode 100644 elpa/xlicense-1.1/COPYING delete mode 100644 elpa/xlicense-1.1/licenses/._BOOST delete mode 100644 elpa/xlicense-1.1/licenses/._BSD delete mode 100644 elpa/xlicense-1.1/licenses/._BSD-new delete mode 100644 elpa/xlicense-1.1/licenses/._BSD-old delete mode 100644 elpa/xlicense-1.1/licenses/._FREEBSD delete mode 100644 elpa/xlicense-1.1/licenses/._GPL-2.0 delete mode 100644 elpa/xlicense-1.1/licenses/._GPL-3.0 delete mode 100644 elpa/xlicense-1.1/licenses/._LGPL delete mode 100644 elpa/xlicense-1.1/licenses/._MIT delete mode 100644 elpa/xlicense-1.1/licenses/APACHE-2.0 delete mode 100644 elpa/xlicense-1.1/licenses/BOOST delete mode 100644 elpa/xlicense-1.1/licenses/BSD delete mode 100644 elpa/xlicense-1.1/licenses/BSD-new delete mode 100644 elpa/xlicense-1.1/licenses/BSD-old delete mode 100644 elpa/xlicense-1.1/licenses/FREEBSD delete mode 100644 elpa/xlicense-1.1/licenses/GPL-2.0 delete mode 100644 elpa/xlicense-1.1/licenses/GPL-3.0 delete mode 100644 elpa/xlicense-1.1/licenses/LGPL delete mode 100644 elpa/xlicense-1.1/licenses/MIT delete mode 100644 elpa/xlicense-1.1/xlicense-autoloads.el delete mode 100644 elpa/xlicense-1.1/xlicense-pkg.el delete mode 100644 elpa/xlicense-1.1/xlicense.el delete mode 100644 elpa/xpm-1.0.3/.elpaignore delete mode 100644 elpa/xpm-1.0.3/ChangeLog delete mode 100644 elpa/xpm-1.0.3/NEWS delete mode 100644 elpa/xpm-1.0.3/xpm-autoloads.el delete mode 100644 elpa/xpm-1.0.3/xpm-m2z.el delete mode 100644 elpa/xpm-1.0.3/xpm-pkg.el delete mode 100644 elpa/xpm-1.0.3/xpm.el delete mode 100644 elpa/yaml-mode-20160902.1142/yaml-mode-autoloads.el delete mode 100644 elpa/yaml-mode-20160902.1142/yaml-mode-pkg.el delete mode 100644 elpa/yaml-mode-20160902.1142/yaml-mode.el delete mode 100644 elpa/yasnippet-20161022.646/snippets/.gitignore delete mode 100644 elpa/yasnippet-20161022.646/snippets/.nosearch delete mode 100644 elpa/yasnippet-20161022.646/snippets/CONTRIBUTORS.txt delete mode 100644 elpa/yasnippet-20161022.646/snippets/LICENSE delete mode 100644 elpa/yasnippet-20161022.646/snippets/README.md delete mode 100644 elpa/yasnippet-20161022.646/snippets/antlr-mode/project delete mode 100644 elpa/yasnippet-20161022.646/snippets/antlr-mode/property delete mode 100644 elpa/yasnippet-20161022.646/snippets/antlr-mode/target delete mode 100644 elpa/yasnippet-20161022.646/snippets/applescript-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/.yas-setup.el delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/assert delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/beginend delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/boost_require delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/cerr delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/cin delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/class delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/class11 delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/const_[] delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/constructor delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/cout delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/cpp delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/cstd delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/d+= delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/d_operator delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/d_operator[] delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/d_operator[]_const delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/d_operator_istream delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/d_operator_ostream delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/delete delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/delete[] delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/doc delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/dynamic_casting delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/enum delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/fixture delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/fori delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/friend delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/fun_declaration delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/gtest delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/ignore delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/inline delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/io delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/iterator delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/map delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/module delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/namespace delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/ns delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator!= delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator+ delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator+= delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator= delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator== delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator[] delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator_istream delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/operator_ostream delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/ostream delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/pack delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/private delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/protected delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/public delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/sstream delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/std delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/std_colon delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/str delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/template delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/test case delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/test_main delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/test_suite delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/this delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/throw delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/tryw delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/using delete mode 100644 elpa/yasnippet-20161022.646/snippets/c++-mode/vector delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/assert delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/compile delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/define delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/malloc delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/packed delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/printf delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/stdio delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/stdlib delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/string delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/union delete mode 100644 elpa/yasnippet-20161022.646/snippets/c-mode/unistd delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/do delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/else delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/file_description delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/fopen delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/for_n delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/function_description delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/ifdef delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/inc delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/inc.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/math delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/member_description delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/once delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/printf delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/struct delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/switch delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/ternary delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/typedef delete mode 100644 elpa/yasnippet-20161022.646/snippets/cc-mode/while delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/action delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/bash delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/cookbook_file delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/cron delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/cronf delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/deploy delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/directory delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/directoryf delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/env delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/execute delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/executef delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/file delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/filef delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/git delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/group delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/http_request delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/http_requestp delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/ignore_failure delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/inc delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/link delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/linkf delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/log delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/machine delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/meta delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/not_if delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/notifies delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/only_if delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/pac delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/pak delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/provider delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/python delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/remote_file delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/retries delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/role delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/ruby delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/script delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/service delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/servicep delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/subscribes delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/supports delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/template delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/templatev delete mode 100644 elpa/yasnippet-20161022.646/snippets/chef-mode/user delete mode 100755 elpa/yasnippet-20161022.646/snippets/cider-repl-mode delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/bench delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/bp delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/defm delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/defn delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/defr delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/deft delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/doseq delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/fn delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/ifl delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/is delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/let delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/map delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/map.lambda delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/mdoc delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/ns delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/opts delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/pr delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/print delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/reduce delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/require delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/test delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/use delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/when delete mode 100644 elpa/yasnippet-20161022.646/snippets/clojure-mode/whenl delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/add_executable delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/add_library delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/cmake_minimum_required delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/foreach delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/ifelse delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/include delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/macro delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/message delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/option delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/project delete mode 100644 elpa/yasnippet-20161022.646/snippets/cmake-mode/set delete mode 100644 elpa/yasnippet-20161022.646/snippets/conf-unix-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/conf-unix-mode/section delete mode 100644 elpa/yasnippet-20161022.646/snippets/cperl-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/EV delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/emit_signal delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/intuniform delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/math delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/nan delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/omnet delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/parameter_omnetpp delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/scheduleAt delete mode 100644 elpa/yasnippet-20161022.646/snippets/cpp-omnet-mode/uniform delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/attrib delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/attrib.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/attrib.2 delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/class delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/comment delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/comment.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/comment.2 delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/comment.3 delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/fore delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/method delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/namespace delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/prop delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/region delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/using delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/using.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/csharp-mode/using.2 delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/bg delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/bg.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/bor delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/cl delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/disp.block delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/disp.inline delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/disp.none delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/ff delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/fs delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/mar.bottom delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/mar.left delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/mar.mar delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/mar.margin delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/mar.right delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/mar.top delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/pad.bottom delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/pad.left delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/pad.pad delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/pad.padding delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/pad.right delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/pad.top delete mode 100644 elpa/yasnippet-20161022.646/snippets/css-mode/v delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/e-in-mono-section delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/e-in-pardef delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/p delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/par delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/pardef delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/s delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/sdef delete mode 100644 elpa/yasnippet-20161022.646/snippets/dix-mode/section delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/cond delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/defmacro delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/defmacrop delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/defmodule delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/defp delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/doc delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/mdoc delete mode 100644 elpa/yasnippet-20161022.646/snippets/elixir-mode/pry delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/.read_me delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/add-hook delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/and delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/append delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/apply delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/aref delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/aset delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/assq delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/autoload delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/backward-char delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/beginning-of-line delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/bounds-of-thing-at-point delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/buffer-file-name delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/buffer-modified-p delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/buffer-substring delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/buffer-substring-no-properties delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/car delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/cdr delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/concat delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/cond delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/condition-case delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/cons delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/consp delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/const delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/copy-directory delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/copy-file delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/current-buffer delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/custom-autoload delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/defalias delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/defcustom delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/define-key delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/defsubst delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/defun delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/defvar delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/delete-char delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/delete-directory delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/delete-file delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/delete-region delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/directory-files delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/dired.process_marked delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/dolist delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/end-of-line delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/eq delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/equal delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/error delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/ert-deftest delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/expand-file-name delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/fboundp delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file-name-directory delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file-name-extension delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file-name-nondirectory delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file-name-sans-extension delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file-relative-name delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file.process delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/file.read-lines delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/find-file delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/find-replace delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/format delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/forward-char delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/forward-line delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/funcall delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/function delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/get delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/global-set-key delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/goto-char delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/grabstring delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/grabthing delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/hash delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/if delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/insert delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/insert-file-contents delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/interactive delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/kbd delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/kill-buffer delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/lambda delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/length delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/let delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/line-beginning-position delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/line-end-position delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/list delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/looking-at delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/make-directory delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/make-local-variable delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/mapc delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/mapcar delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/match-beginning delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/match-end delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/match-string delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/memq delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/message delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/minor_mode delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/not delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/nth delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/null delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/number-to-string delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/or delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/point delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/point-max delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/point-min delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/princ delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/print delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/progn delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/push delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/put delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/re-search-backward delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/re-search-forward delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/region-active-p delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/region-beginning delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/region-end delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/rename-file delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/repeat delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/replace-regexp delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/replace-regexp-in-string delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/require delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/save-buffer delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/save-excursion delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/search-backward delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/search-backward-regexp delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/search-forward delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/search-forward-regexp delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/set delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/set-buffer delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/set-file-modes delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/set-mark delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/setq delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/should delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/skip-chars-backward delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/skip-chars-forward delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/split-string delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/string delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/string-match delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/string-to-number delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/string= delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/stringp delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/substring delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/thing-at-point delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/traverse_dir delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/unless delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/vector delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/when delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/while delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/widget-get delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/with-current-buffer delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/word-or-region delete mode 100644 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/word_regexp delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-dired.process_marked delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-file.process delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-file.read-lines delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-find-replace delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-grabstring delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-grabthing delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-traverse_dir delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/x-word-or-region delete mode 100755 elpa/yasnippet-20161022.646/snippets/emacs-lisp-mode/yes-or-no-p delete mode 100755 elpa/yasnippet-20161022.646/snippets/enh-ruby-mode delete mode 100755 elpa/yasnippet-20161022.646/snippets/ensime-mode delete mode 100644 elpa/yasnippet-20161022.646/snippets/erc-mode/blist delete mode 100644 elpa/yasnippet-20161022.646/snippets/erc-mode/help delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/after delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/begin delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/beh delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/compile delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/exp delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/fun delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/ifdef delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/ifndef delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/imp delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/inc delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/inc.lib delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/loop delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/mod delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/rcv delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/rcv.after delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/rec delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/erlang-mode/undef delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/bd delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/c delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/ch delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/cx delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/dc delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/do delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/dp delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/forall delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/in delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/inc delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/intr delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/l delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/module delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/pa delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/program delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/puref delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/pures delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/re delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/subroutine delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/until delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/where delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/while delete mode 100644 elpa/yasnippet-20161022.646/snippets/f90-mode/wr delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/button delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/checkbox delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/component delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/declare delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/declareauthor delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/declarelicense delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/declarename delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/declareversion delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/hbargraph delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/header delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/hgroup delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/hslider delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/nentry delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/par delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/process delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/processx delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/prod delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/rule delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/seq delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/sum delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/tgroup delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/vbargraph delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/vgroup delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/vslider delete mode 100644 elpa/yasnippet-20161022.646/snippets/faust-mode/with delete mode 100644 elpa/yasnippet-20161022.646/snippets/fundamental-mode/.yas-setup.el delete mode 100644 elpa/yasnippet-20161022.646/snippets/git-commit-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/git-commit-mode/fixes delete mode 100644 elpa/yasnippet-20161022.646/snippets/git-commit-mode/references delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/benchmark delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/const delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/const( delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/dd delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/default delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/else delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/error delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/example delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/forrange delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/func delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/iferr delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/import( delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/lambda delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/map delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/parallel_benchmark delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/printf delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/select delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/switch delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/test delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/testmain delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/type delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/var delete mode 100644 elpa/yasnippet-20161022.646/snippets/go-mode/var( delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/class delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/dict delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/println delete mode 100644 elpa/yasnippet-20161022.646/snippets/groovy-mode/times delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/data delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/doc delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/efix delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/functione delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/instance delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/module delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/new class delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/pragma delete mode 100644 elpa/yasnippet-20161022.646/snippets/haskell-mode/print delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/dd delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/dl delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/doctype delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/doctype.html5 delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/doctype.xhtml1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/doctype.xhtml1_1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/doctype.xhtml1_strict delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/doctype.xhtml1_transitional delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/dt delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/form delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/html delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/html.xmlns delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/link.import delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/link.stylesheet delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/link.stylesheet-ie delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/mailto delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/meta delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/meta.http-equiv delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/script.javascript delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/script.javascript-src delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/textarea delete mode 100644 elpa/yasnippet-20161022.646/snippets/html-mode/th delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/apr_assert delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/assert delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/assertEquals delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/cls delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/constructor delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/define test method delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/doc delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/equals delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/file_class delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/fori delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/getter delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/ife delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/iterator delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/javadoc delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/lambda delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/main_class delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/method delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/new delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/override delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/param delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/printf delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/println delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/return delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/test delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/testClass delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/this delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/toString delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/java-mode/value delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/al delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/class delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/com delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/debugger delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/each delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/el delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/ev.add delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/ev.fire delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/init delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/log delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/multiline-comment delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/param-comment delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/req.html delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/req.json delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/return-comment delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/type-inline-comment delete mode 100644 elpa/yasnippet-20161022.646/snippets/js-mode/type-multiline-comment delete mode 100755 elpa/yasnippet-20161022.646/snippets/js2-mode delete mode 100755 elpa/yasnippet-20161022.646/snippets/js3-mode delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/acronym delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/alertblock delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/alg delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/article delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/begin delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/block delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/capgls delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/caption delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/cite delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/code delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/columns delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/documentclass delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/emph delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/enumerate delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/figure delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/frac delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/frame delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/gls delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/glspl delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/includegraphics delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/item delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/itemize delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/label delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/listing delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv-cvcomputer delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv-cventry delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv-cvlanguage delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv-cvline delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv-cvlistdoubleitem delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/moderncv-cvlistitem delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/movie delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/newcommand delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/newglossaryentry delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/note delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/python delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/question delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/section delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/subf delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/subfigure delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/subsec delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/textbf delete mode 100644 elpa/yasnippet-20161022.646/snippets/latex-mode/usepackage delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-interaction-mode/defun delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/class delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/comment delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/defpackage delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/do delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/foreach delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/format delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/ifelse delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/ifnot delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/slot delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/switch delete mode 100644 elpa/yasnippet-20161022.646/snippets/lisp-mode/typecast delete mode 100644 elpa/yasnippet-20161022.646/snippets/lua-mode/fun delete mode 100644 elpa/yasnippet-20161022.646/snippets/m4-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-automake-mode/noinst_HEADERS delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-bsdmake-mode/PHONY delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-bsdmake-mode/echo delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-bsdmake-mode/gen delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-bsdmake-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-bsdmake-mode/var delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/abspath delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/addprefix delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/addsuffix delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/dir delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/make delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/notdir delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/patsubst delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/phony delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/shell delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/special delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/template delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-gmake-mode/wildcard delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-mode/all delete mode 100644 elpa/yasnippet-20161022.646/snippets/makefile-mode/clean delete mode 100644 elpa/yasnippet-20161022.646/snippets/malabar-mode/variable delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/+ delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/- delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/_ delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/` delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h1.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h1.2 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h2.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h2.2 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h3 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h4 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h5 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/h6 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/highlight delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/hr.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/hr.2 delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/img delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/link delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/ol delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/rimg delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/rlb delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/rlink delete mode 100644 elpa/yasnippet-20161022.646/snippets/markdown-mode/utf8 delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/chan delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/connections delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/network delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/simple delete mode 100644 elpa/yasnippet-20161022.646/snippets/ned-mode/submodules delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/TOSSIM delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/command delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/dbg delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/event delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/ifdef delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/interface delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/module delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/nx delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/provides delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/sim delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/uint8_t delete mode 100644 elpa/yasnippet-20161022.646/snippets/nesc-mode/uses delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/buildPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/checkPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/configurePhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/distPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/fixPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/installCheckPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/installPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/package_github delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/package_url delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/patchPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/phases delete mode 100644 elpa/yasnippet-20161022.646/snippets/nix-mode/unpackPhase delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/define delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/include delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/insert_macro delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/instdir delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/macro delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/message delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/outdir delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/outfile delete mode 100644 elpa/yasnippet-20161022.646/snippets/nsis-mode/section delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/body delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/br delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/doctype delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/doctype_xhtml1_strict delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/doctype_xhtml1_transitional delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/form delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/href delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/html delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/img delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/input delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/link delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/meta delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/name delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/quote delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/style delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/tag delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/tag_closing delete mode 100644 elpa/yasnippet-20161022.646/snippets/nxml-mode/tag_newline delete mode 100644 elpa/yasnippet-20161022.646/snippets/octave-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/octave-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/octave-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/dot delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/elisp delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/embedded delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/entry delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/figure delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/img delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/latex delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/matrix delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/uml delete mode 100644 elpa/yasnippet-20161022.646/snippets/org-mode/verse delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/eval delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/fore delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/ife delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/ifee delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/sub delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/unless delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/while delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/xfore delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/xif delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/xunless delete mode 100644 elpa/yasnippet-20161022.646/snippets/perl-mode/xwhile delete mode 100644 elpa/yasnippet-20161022.646/snippets/prog-mode/.yas-setup.el delete mode 100644 elpa/yasnippet-20161022.646/snippets/prog-mode/fixme delete mode 100644 elpa/yasnippet-20161022.646/snippets/prog-mode/todo delete mode 100644 elpa/yasnippet-20161022.646/snippets/prog-mode/xxx delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/.yas-setup.el delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__contains__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__enter__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__exit__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__getitem__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__len__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__new__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/__setitem__ delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/all delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/arg delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/arg_positional delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assert delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertEqual delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertFalse delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertIn delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertNotEqual delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertNotIn delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertRaises delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertRaises.with delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/assertTrue delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/celery_pdb delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/classmethod delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/cls delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/dec delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/deftest delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/django_test_class delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/doc delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/doctest delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/eq delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/from delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/function_docstring delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/ife delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/ifmain delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/import delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/init delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/init_docstring delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/interact delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/ipdbdebug delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/iter delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/lambda delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/list delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/logger_name delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/logging delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/metaclass delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/method delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/method_docstring delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/not_impl delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/np delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/parse_args delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/parser delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/pass delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/pl delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/print delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/prop delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/reg delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/repr delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/return delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/script delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/self delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/self_without_dot delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/selfassign delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/setdef delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/setup delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/size delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/static delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/str delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/super delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/test_class delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/test_file delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/trace delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/tryelse delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/unicode delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/utf8 delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/while delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/with delete mode 100644 elpa/yasnippet-20161022.646/snippets/python-mode/with_statement delete mode 100755 elpa/yasnippet-20161022.646/snippets/rename_add_contr.py delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/autoclass delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/autofunction delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/automodule delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/chapter delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/class delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/code delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/digraph delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/graph delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/graphviz delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/image delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/inheritance delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/literal_include delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/meta delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/module delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/parsed_literal delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/pause delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/section delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/term delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/title delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/url delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/verbatim delete mode 100644 elpa/yasnippet-20161022.646/snippets/rst-mode/warning delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/# delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/=b delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/Comp delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/GLOB delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/all delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/am delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/any delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/app delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/attribute delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/bench delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/bm delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/cla delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/cls delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/collect delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/dee delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/deli delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/det delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/dow delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/ea delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/eac delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/eai delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/eav delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/eawi delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/forin delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/formula delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/ife delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/init delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/inject delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/map delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/mm delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/mod delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/r delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/rb delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/red delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/reject delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/rel delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/req delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/rw delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/select delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/str delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/test class delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/tim delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/to_ delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/tu delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/until delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/upt delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/w delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/when delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/while delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/y delete mode 100644 elpa/yasnippet-20161022.646/snippets/ruby-mode/zip delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/app delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/case delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/cc delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/co delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/cons delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/def delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/doc delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/ls delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/match delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/ob delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/throw delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/scala-mode/valueclass delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/args delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/bang delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/for loop delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/function delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/if delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/ife delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/safe-bang delete mode 100644 elpa/yasnippet-20161022.646/snippets/sh-mode/while delete mode 100644 elpa/yasnippet-20161022.646/snippets/snippet-mode/cont delete mode 100644 elpa/yasnippet-20161022.646/snippets/snippet-mode/elisp delete mode 100644 elpa/yasnippet-20161022.646/snippets/snippet-mode/field delete mode 100644 elpa/yasnippet-20161022.646/snippets/snippet-mode/group delete mode 100644 elpa/yasnippet-20161022.646/snippets/snippet-mode/mirror delete mode 100644 elpa/yasnippet-20161022.646/snippets/snippet-mode/vars delete mode 100644 elpa/yasnippet-20161022.646/snippets/sql-mode/column delete mode 100644 elpa/yasnippet-20161022.646/snippets/sql-mode/constraint delete mode 100644 elpa/yasnippet-20161022.646/snippets/sql-mode/constraint.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/sql-mode/create delete mode 100644 elpa/yasnippet-20161022.646/snippets/sql-mode/create.1 delete mode 100644 elpa/yasnippet-20161022.646/snippets/sql-mode/references delete mode 100644 elpa/yasnippet-20161022.646/snippets/text-mode/.yas-parents delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/assert delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/docstring delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/for delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/fun delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/guard delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/ifthen delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/ifthenelse delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/let delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/list_comprehension delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/main delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/match delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/module delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/open delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/printf delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/rec delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/try delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/type delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/type_type delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/val delete mode 100644 elpa/yasnippet-20161022.646/snippets/tuareg-mode/while delete mode 100755 elpa/yasnippet-20161022.646/snippets/typerex-mode delete mode 100644 elpa/yasnippet-20161022.646/snippets/udev-mode/ENV delete mode 100644 elpa/yasnippet-20161022.646/snippets/udev-mode/GOTO delete mode 100644 elpa/yasnippet-20161022.646/snippets/udev-mode/KERNEL delete mode 100644 elpa/yasnippet-20161022.646/snippets/udev-mode/add delete mode 100644 elpa/yasnippet-20161022.646/snippets/udev-mode/env$ delete mode 100644 elpa/yasnippet-20161022.646/snippets/udev-mode/run delete mode 100755 elpa/yasnippet-20161022.646/snippets/web-mode delete mode 100644 elpa/yasnippet-20161022.646/snippets/yaml-mode/entry delete mode 100644 elpa/yasnippet-20161022.646/snippets/yaml-mode/list delete mode 100644 elpa/yasnippet-20161022.646/snippets/yaml-mode/section delete mode 100644 elpa/yasnippet-20161022.646/yasnippet-autoloads.el delete mode 100644 elpa/yasnippet-20161022.646/yasnippet-pkg.el delete mode 100644 elpa/yasnippet-20161022.646/yasnippet.el delete mode 100644 elpa/zone-nyan-20161014.154/zone-nyan-autoloads.el delete mode 100644 elpa/zone-nyan-20161014.154/zone-nyan-pkg.el delete mode 100644 elpa/zone-nyan-20161014.154/zone-nyan.el diff --git a/.gitignore b/.gitignore index bb356dc..864db1f 100644 --- a/.gitignore +++ b/.gitignore @@ -15,6 +15,8 @@ /url/ /hgs-cache /smex-items +# All hail use-package! +/elpa/ # History-related files. It’s a real pain merging them together /history diff --git a/elpa/ace-window-20161018.1624/ace-window-autoloads.el b/elpa/ace-window-20161018.1624/ace-window-autoloads.el deleted file mode 100644 index ea202b4..0000000 --- a/elpa/ace-window-20161018.1624/ace-window-autoloads.el +++ /dev/null @@ -1,68 +0,0 @@ -;;; ace-window-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "ace-window" "ace-window.el" (22535 7932 710222 -;;;;;; 652000)) -;;; Generated autoloads from ace-window.el - -(autoload 'ace-select-window "ace-window" "\ -Ace select window. - -\(fn)" t nil) - -(autoload 'ace-delete-window "ace-window" "\ -Ace delete window. - -\(fn)" t nil) - -(autoload 'ace-swap-window "ace-window" "\ -Ace swap window. - -\(fn)" t nil) - -(autoload 'ace-maximize-window "ace-window" "\ -Ace maximize window. - -\(fn)" t nil) - -(autoload 'ace-window "ace-window" "\ -Select a window. -Perform an action based on ARG described below. - -By default, behaves like extended `other-window'. - -Prefixed with one \\[universal-argument], does a swap between the -selected window and the current window, so that the selected -buffer moves to current window (and current buffer moves to -selected window). - -Prefixed with two \\[universal-argument]'s, deletes the selected -window. - -\(fn ARG)" t nil) - -(defvar ace-window-display-mode nil "\ -Non-nil if Ace-Window-Display mode is enabled. -See the `ace-window-display-mode' command -for a description of this minor mode. -Setting this variable directly does not take effect; -either customize it (see the info node `Easy Customization') -or call the function `ace-window-display-mode'.") - -(custom-autoload 'ace-window-display-mode "ace-window" nil) - -(autoload 'ace-window-display-mode "ace-window" "\ -Minor mode for showing the ace window key in the mode line. - -\(fn &optional ARG)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; ace-window-autoloads.el ends here diff --git a/elpa/ace-window-20161018.1624/ace-window-pkg.el b/elpa/ace-window-20161018.1624/ace-window-pkg.el deleted file mode 100644 index ea95256..0000000 --- a/elpa/ace-window-20161018.1624/ace-window-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "ace-window" "20161018.1624" "Quickly switch windows." '((avy "0.2.0")) :url "https://github.com/abo-abo/ace-window" :keywords '("window" "location")) diff --git a/elpa/ace-window-20161018.1624/ace-window.el b/elpa/ace-window-20161018.1624/ace-window.el deleted file mode 100644 index ce058d6..0000000 --- a/elpa/ace-window-20161018.1624/ace-window.el +++ /dev/null @@ -1,563 +0,0 @@ -;;; ace-window.el --- Quickly switch windows. -*- lexical-binding: t -*- - -;; Copyright (C) 2015 Free Software Foundation, Inc. - -;; Author: Oleh Krehel -;; Maintainer: Oleh Krehel -;; URL: https://github.com/abo-abo/ace-window -;; Package-Version: 20161018.1624 -;; Version: 0.9.0 -;; Package-Requires: ((avy "0.2.0")) -;; Keywords: window, location - -;; This file is part of GNU Emacs. - -;; This file 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 3, 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. - -;; For a full copy of the GNU General Public License -;; see . - -;;; Commentary: -;; -;; The main function, `ace-window' is meant to replace `other-window'. -;; In fact, when there are only two windows present, `other-window' is -;; called. If there are more, each window will have its first -;; character highlighted. Pressing that character will switch to that -;; window. -;; -;; To setup this package, just add to your .emacs: -;; -;; (global-set-key (kbd "M-p") 'ace-window) -;; -;; replacing "M-p" with an appropriate shortcut. -;; -;; Depending on your window usage patterns, you might want to set -;; -;; (setq aw-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l)) -;; -;; This way they are all on the home row, although the intuitive -;; ordering is lost. -;; -;; If you don't want the gray background that makes the red selection -;; characters stand out more, set this: -;; -;; (setq aw-background nil) -;; -;; If you want to know the selection characters ahead of time, you can -;; turn on `ace-window-display-mode'. -;; -;; When prefixed with one `universal-argument', instead of switching -;; to selected window, the selected window is swapped with current one. -;; -;; When prefixed with two `universal-argument', the selected window is -;; deleted instead. - -;;; Code: -(require 'avy) -(require 'ring) - -;;* Customization -(defgroup ace-window nil - "Quickly switch current window." - :group 'convenience - :prefix "aw-") - -(defcustom aw-keys '(?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9) - "Keys for selecting window.") - -(defcustom aw-scope 'global - "The scope used by `ace-window'." - :type '(choice - (const :tag "visible frames" visible) - (const :tag "global" global) - (const :tag "frame" frame))) - -(defcustom aw-ignored-buffers '("*Calc Trail*" "*LV*") - "List of buffers to ignore when selecting window." - :type '(repeat string)) - -(defcustom aw-ignore-on t - "When t, `ace-window' will ignore `aw-ignored-buffers'. -Use M-0 `ace-window' to toggle this value." - :type 'boolean) - -(defcustom aw-ignore-current nil - "When t, `ace-window' will ignore `selected-window'." - :type 'boolean) - -(defcustom aw-background t - "When t, `ace-window' will dim out all buffers temporarily when used.'." - :type 'boolean) - -(defcustom aw-leading-char-style 'char - "Style of the leading char overlay." - :type '(choice - (const :tag "single char" 'char) - (const :tag "full path" 'path))) - -(defcustom aw-dispatch-always nil - "When non-nil, `ace-window' will issue a `read-char' even for one window. -This will make `ace-window' act different from `other-window' for - one or two windows." - :type 'boolean) - -(defcustom aw-reverse-frame-list nil - "When non-nil `ace-window' will order frames for selection in -the reverse of `frame-list'" - :type 'boolean) - -(defface aw-leading-char-face - '((((class color)) (:foreground "red")) - (((background dark)) (:foreground "gray100")) - (((background light)) (:foreground "gray0")) - (t (:foreground "gray100" :underline nil))) - "Face for each window's leading char.") - -(defface aw-background-face - '((t (:foreground "gray40"))) - "Face for whole window background during selection.") - -(defface aw-mode-line-face - '((t (:inherit mode-line-buffer-id))) - "Face used for displaying the ace window key in the mode-line.") - -;;* Implementation -(defun aw-ignored-p (window) - "Return t if WINDOW should be ignored." - (or (and aw-ignore-on - (member (buffer-name (window-buffer window)) - aw-ignored-buffers)) - (and aw-ignore-current - (equal window (selected-window))))) - -(defun aw-window-list () - "Return the list of interesting windows." - (sort - (cl-remove-if - (lambda (w) - (let ((f (window-frame w))) - (or (not (and (frame-live-p f) - (frame-visible-p f))) - (string= "initial_terminal" (terminal-name f)) - (aw-ignored-p w)))) - (cl-case aw-scope - (visible - (cl-mapcan #'window-list (visible-frame-list))) - (global - (cl-mapcan #'window-list (frame-list))) - (frame - (window-list)) - (t - (error "Invalid `aw-scope': %S" aw-scope)))) - 'aw-window<)) - -(defvar aw-overlays-back nil - "Hold overlays for when `aw-background' is t.") - -(defvar ace-window-mode nil - "Minor mode during the selection process.") - -;; register minor mode -(or (assq 'ace-window-mode minor-mode-alist) - (nconc minor-mode-alist - (list '(ace-window-mode ace-window-mode)))) - -(defvar aw-empty-buffers-list nil - "Store the read-only empty buffers which had to be modified. -Modify them back eventually.") - -(defun aw--done () - "Clean up mode line and overlays." - ;; mode line - (aw-set-mode-line nil) - ;; background - (mapc #'delete-overlay aw-overlays-back) - (setq aw-overlays-back nil) - (avy--remove-leading-chars) - (dolist (b aw-empty-buffers-list) - (with-current-buffer b - (when (string= (buffer-string) " ") - (let ((inhibit-read-only t)) - (delete-region (point-min) (point-max)))))) - (setq aw-empty-buffers-list nil)) - -(defun aw--lead-overlay (path leaf) - "Create an overlay using PATH at LEAF. -LEAF is (PT . WND)." - (let ((wnd (cdr leaf))) - (with-selected-window wnd - (when (= 0 (buffer-size)) - (push (current-buffer) aw-empty-buffers-list) - (let ((inhibit-read-only t)) - (insert " "))) - (let* ((pt (car leaf)) - (ol (make-overlay pt (1+ pt) (window-buffer wnd))) - (old-str (or - (ignore-errors - (with-selected-window wnd - (buffer-substring pt (1+ pt)))) - "")) - (new-str - (concat - (cl-case aw-leading-char-style - (char - (string (avy--key-to-char (car (last path))))) - (path - (mapconcat - (lambda (x) (string (avy--key-to-char x))) - (reverse path) - "")) - (t - (error "Bad `aw-leading-char-style': %S" - aw-leading-char-style))) - (cond ((string-equal old-str "\t") - (make-string (1- tab-width) ?\ )) - ((string-equal old-str "\n") - "\n") - (t - (make-string - (max 0 (1- (string-width old-str))) - ?\ )))))) - (overlay-put ol 'face 'aw-leading-char-face) - (overlay-put ol 'window wnd) - (overlay-put ol 'display new-str) - (push ol avy--overlays-lead))))) - -(defun aw--make-backgrounds (wnd-list) - "Create a dim background overlay for each window on WND-LIST." - (when aw-background - (setq aw-overlays-back - (mapcar (lambda (w) - (let ((ol (make-overlay - (window-start w) - (window-end w) - (window-buffer w)))) - (overlay-put ol 'face 'aw-background-face) - ol)) - wnd-list)))) - -(define-obsolete-variable-alias - 'aw-flip-keys 'aw--flip-keys "0.1.0" - "Use `aw-dispatch-alist' instead.") - -(defvar aw-dispatch-function 'aw-dispatch-default - "Function to call when a character not in `aw-keys' is pressed.") - -(defvar aw-action nil - "Function to call at the end of `aw-select'.") - -(defun aw-set-mode-line (str) - "Set mode line indicator to STR." - (setq ace-window-mode str) - (force-mode-line-update)) - -(defvar aw-dispatch-alist - '((?x aw-delete-window " Ace - Delete Window") - (?m aw-swap-window " Ace - Swap Window") - (?M aw-move-window " Ace - Move Window") - (?n aw-flip-window) - (?v aw-split-window-vert " Ace - Split Vert Window") - (?b aw-split-window-horz " Ace - Split Horz Window") - (?i delete-other-windows " Ace - Maximize Window") - (?o delete-other-windows)) - "List of actions for `aw-dispatch-default'.") - -(defun aw-dispatch-default (char) - "Perform an action depending on CHAR." - (let ((val (cdr (assoc char aw-dispatch-alist)))) - (if val - (if (and (car val) (cadr val)) - (prog1 (setq aw-action (car val)) - (aw-set-mode-line (cadr val))) - (funcall (car val)) - (throw 'done 'exit)) - (avy-handler-default char)))) - -(defun aw-select (mode-line &optional action) - "Return a selected other window. -Amend MODE-LINE to the mode line for the duration of the selection." - (setq aw-action action) - (let ((start-window (selected-window)) - (next-window-scope (cl-case aw-scope - ('visible 'visible) - ('global 'visible) - ('frame 'frame))) - (wnd-list (aw-window-list)) - window) - (setq window - (cond ((<= (length wnd-list) 1) - (when aw-dispatch-always - (setq aw-action - (unwind-protect - (catch 'done - (funcall aw-dispatch-function (read-char))) - (aw--done))) - (when (eq aw-action 'exit) - (setq aw-action nil))) - (or (car wnd-list) start-window)) - ((and (= (length wnd-list) 2) - (not aw-dispatch-always) - (not aw-ignore-current)) - (let ((wnd (next-window nil nil next-window-scope))) - (while (and (or (not (memq wnd wnd-list)) - (aw-ignored-p wnd)) - (not (equal wnd start-window))) - (setq wnd (next-window wnd nil next-window-scope))) - wnd)) - (t - (let ((candidate-list - (mapcar (lambda (wnd) - (cons (aw-offset wnd) wnd)) - wnd-list))) - (aw--make-backgrounds wnd-list) - (aw-set-mode-line mode-line) - ;; turn off helm transient map - (remove-hook 'post-command-hook 'helm--maybe-update-keymap) - (unwind-protect - (let* ((avy-handler-function aw-dispatch-function) - (avy-translate-char-function #'identity) - (res (avy-read (avy-tree candidate-list aw-keys) - #'aw--lead-overlay - #'avy--remove-leading-chars))) - (if (eq res 'exit) - (setq aw-action nil) - (or (cdr res) - start-window))) - (aw--done)))))) - (if aw-action - (funcall aw-action window) - window))) - -;;* Interactive -;;;###autoload -(defun ace-select-window () - "Ace select window." - (interactive) - (aw-select " Ace - Window" - #'aw-switch-to-window)) - -;;;###autoload -(defun ace-delete-window () - "Ace delete window." - (interactive) - (aw-select " Ace - Delete Window" - #'aw-delete-window)) - -;;;###autoload -(defun ace-swap-window () - "Ace swap window." - (interactive) - (aw-select " Ace - Swap Window" - #'aw-swap-window)) - -;;;###autoload -(defun ace-maximize-window () - "Ace maximize window." - (interactive) - (aw-select " Ace - Maximize Window" - #'delete-other-windows)) - -;;;###autoload -(defun ace-window (arg) - "Select a window. -Perform an action based on ARG described below. - -By default, behaves like extended `other-window'. - -Prefixed with one \\[universal-argument], does a swap between the -selected window and the current window, so that the selected -buffer moves to current window (and current buffer moves to -selected window). - -Prefixed with two \\[universal-argument]'s, deletes the selected -window." - (interactive "p") - (cl-case arg - (0 - (setq aw-ignore-on - (not aw-ignore-on)) - (ace-select-window)) - (4 (ace-swap-window)) - (16 (ace-delete-window)) - (t (ace-select-window)))) - -;;* Utility -(defun aw-window< (wnd1 wnd2) - "Return true if WND1 is less than WND2. -This is determined by their respective window coordinates. -Windows are numbered top down, left to right." - (let ((f1 (window-frame wnd1)) - (f2 (window-frame wnd2)) - (e1 (window-edges wnd1)) - (e2 (window-edges wnd2))) - (cond ((string< (frame-parameter f1 'window-id) - (frame-parameter f2 'window-id)) - aw-reverse-frame-list) - ((< (car e1) (car e2)) - t) - ((> (car e1) (car e2)) - nil) - ((< (cadr e1) (cadr e2)) - t)))) - -(defvar aw--window-ring (make-ring 10) - "Hold the window switching history.") - -(defun aw--push-window (window) - "Store WINDOW to `aw--window-ring'." - (when (or (zerop (ring-length aw--window-ring)) - (not (equal - (ring-ref aw--window-ring 0) - window))) - (ring-insert aw--window-ring (selected-window)))) - -(defun aw--pop-window () - "Return the removed top of `aw--window-ring'." - (let (res) - (condition-case nil - (while (or (not (window-live-p - (setq res (ring-remove aw--window-ring 0)))) - (equal res (selected-window)))) - (error - (if (= (length (aw-window-list)) 2) - (progn - (other-window 1) - (setq res (selected-window))) - (error "No previous windows stored")))) - res)) - -(defun aw-switch-to-window (window) - "Switch to the window WINDOW." - (let ((frame (window-frame window))) - (aw--push-window (selected-window)) - (when (and (frame-live-p frame) - (not (eq frame (selected-frame)))) - (select-frame-set-input-focus frame)) - (if (window-live-p window) - (select-window window) - (error "Got a dead window %S" window)))) - -(defun aw-flip-window () - "Switch to the window you were previously in." - (interactive) - (aw-switch-to-window (aw--pop-window))) - -(defun aw-delete-window (window) - "Delete window WINDOW." - (let ((frame (window-frame window))) - (when (and (frame-live-p frame) - (not (eq frame (selected-frame)))) - (select-frame-set-input-focus (window-frame window))) - (if (= 1 (length (window-list))) - (delete-frame frame) - (if (window-live-p window) - (delete-window window) - (error "Got a dead window %S" window))))) - -(defcustom aw-swap-invert nil - "When non-nil, the other of the two swapped windows gets the point." - :type 'boolean) - -(defun aw-swap-window (window) - "Swap buffers of current window and WINDOW." - (cl-labels ((swap-windows (window1 window2) - "Swap the buffers of WINDOW1 and WINDOW2." - (let ((buffer1 (window-buffer window1)) - (buffer2 (window-buffer window2))) - (set-window-buffer window1 buffer2) - (set-window-buffer window2 buffer1) - (select-window window2)))) - (let ((frame (window-frame window)) - (this-window (selected-window))) - (when (and (frame-live-p frame) - (not (eq frame (selected-frame)))) - (select-frame-set-input-focus (window-frame window))) - (when (and (window-live-p window) - (not (eq window this-window))) - (aw--push-window this-window) - (if aw-swap-invert - (swap-windows window this-window) - (swap-windows this-window window)))))) - -(defun aw-move-window (window) - "Move the current buffer to WINDOW. -Switch the current window to the previous buffer." - (let ((buffer (current-buffer))) - (switch-to-buffer (other-buffer)) - (aw-switch-to-window window) - (switch-to-buffer buffer))) - -(defun aw-split-window-vert (window) - "Split WINDOW vertically." - (select-window window) - (split-window-vertically)) - -(defun aw-split-window-horz (window) - "Split WINDOW horizontally." - (select-window window) - (split-window-horizontally)) - -(defun aw-offset (window) - "Return point in WINDOW that's closest to top left corner. -The point is writable, i.e. it's not part of space after newline." - (let ((h (window-hscroll window)) - (beg (window-start window)) - (end (window-end window)) - (inhibit-field-text-motion t)) - (with-current-buffer - (window-buffer window) - (save-excursion - (goto-char beg) - (while (and (< (point) end) - (< (- (line-end-position) - (line-beginning-position)) - h)) - (forward-line)) - (+ (point) h))))) - -;;* Mode line -;;;###autoload -(define-minor-mode ace-window-display-mode - "Minor mode for showing the ace window key in the mode line." - :global t - (if ace-window-display-mode - (progn - (aw-update) - (set-default - 'mode-line-format - `((ace-window-display-mode - (:eval (window-parameter (selected-window) 'ace-window-path))) - ,@(assq-delete-all - 'ace-window-display-mode - (default-value 'mode-line-format)))) - (force-mode-line-update t) - (add-hook 'window-configuration-change-hook 'aw-update)) - (set-default - 'mode-line-format - (assq-delete-all - 'ace-window-display-mode - (default-value 'mode-line-format))) - (remove-hook 'window-configuration-change-hook 'aw-update))) - -(defun aw-update () - "Update ace-window-path window parameter for all windows." - (avy-traverse - (avy-tree (aw-window-list) aw-keys) - (lambda (path leaf) - (set-window-parameter - leaf 'ace-window-path - (propertize - (apply #'string (reverse path)) - 'face 'aw-mode-line-face))))) - -(provide 'ace-window) - -;;; ace-window.el ends here diff --git a/elpa/ag-20161021.2133/ag-autoloads.el b/elpa/ag-20161021.2133/ag-autoloads.el deleted file mode 100644 index 12012ad..0000000 --- a/elpa/ag-20161021.2133/ag-autoloads.el +++ /dev/null @@ -1,122 +0,0 @@ -;;; ag-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "ag" "ag.el" (22539 28068 810569 198000)) -;;; Generated autoloads from ag.el - -(autoload 'ag "ag" "\ -Search using ag in a given DIRECTORY for a given literal search STRING, -with STRING defaulting to the symbol under point. - -If called with a prefix, prompts for flags to pass to ag. - -\(fn STRING DIRECTORY)" t nil) - -(autoload 'ag-files "ag" "\ -Search using ag in a given DIRECTORY for a given literal search STRING, -limited to files that match FILE-TYPE. STRING defaults to the -symbol under point. - -If called with a prefix, prompts for flags to pass to ag. - -\(fn STRING FILE-TYPE DIRECTORY)" t nil) - -(autoload 'ag-regexp "ag" "\ -Search using ag in a given directory for a given regexp. -The regexp should be in PCRE syntax, not Emacs regexp syntax. - -If called with a prefix, prompts for flags to pass to ag. - -\(fn STRING DIRECTORY)" t nil) - -(autoload 'ag-project "ag" "\ -Guess the root of the current project and search it with ag -for the given literal search STRING. - -If called with a prefix, prompts for flags to pass to ag. - -\(fn STRING)" t nil) - -(autoload 'ag-project-files "ag" "\ -Search using ag for a given literal search STRING, -limited to files that match FILE-TYPE. STRING defaults to the -symbol under point. - -If called with a prefix, prompts for flags to pass to ag. - -\(fn STRING FILE-TYPE)" t nil) - -(autoload 'ag-project-regexp "ag" "\ -Guess the root of the current project and search it with ag -for the given regexp. The regexp should be in PCRE syntax, not -Emacs regexp syntax. - -If called with a prefix, prompts for flags to pass to ag. - -\(fn REGEXP)" t nil) - -(defalias 'ag-project-at-point 'ag-project) - -(defalias 'ag-regexp-project-at-point 'ag-project-regexp) - -(autoload 'ag-dired "ag" "\ -Recursively find files in DIR matching literal search STRING. - -The PATTERN is matched against the full path to the file, not -only against the file name. - -The results are presented as a `dired-mode' buffer with -`default-directory' being DIR. - -See also `ag-dired-regexp'. - -\(fn DIR STRING)" t nil) - -(autoload 'ag-dired-regexp "ag" "\ -Recursively find files in DIR matching REGEXP. -REGEXP should be in PCRE syntax, not Emacs regexp syntax. - -The REGEXP is matched against the full path to the file, not -only against the file name. - -Results are presented as a `dired-mode' buffer with -`default-directory' being DIR. - -See also `find-dired'. - -\(fn DIR REGEXP)" t nil) - -(autoload 'ag-project-dired "ag" "\ -Recursively find files in current project matching PATTERN. - -See also `ag-dired'. - -\(fn PATTERN)" t nil) - -(autoload 'ag-project-dired-regexp "ag" "\ -Recursively find files in current project matching REGEXP. - -See also `ag-dired-regexp'. - -\(fn REGEXP)" t nil) - -(autoload 'ag-kill-buffers "ag" "\ -Kill all `ag-mode' buffers. - -\(fn)" t nil) - -(autoload 'ag-kill-other-buffers "ag" "\ -Kill all `ag-mode' buffers other than the current buffer. - -\(fn)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; ag-autoloads.el ends here diff --git a/elpa/ag-20161021.2133/ag-pkg.el b/elpa/ag-20161021.2133/ag-pkg.el deleted file mode 100644 index 2301553..0000000 --- a/elpa/ag-20161021.2133/ag-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "ag" "20161021.2133" "A front-end for ag ('the silver searcher'), the C ack replacement." '((dash "2.8.0") (s "1.9.0") (cl-lib "0.5"))) diff --git a/elpa/ag-20161021.2133/ag.el b/elpa/ag-20161021.2133/ag.el deleted file mode 100644 index fbd0ff6..0000000 --- a/elpa/ag-20161021.2133/ag.el +++ /dev/null @@ -1,676 +0,0 @@ -;;; ag.el --- A front-end for ag ('the silver searcher'), the C ack replacement. - -;; Copyright (C) 2013-2014 Wilfred Hughes -;; -;; Author: Wilfred Hughes -;; Created: 11 January 2013 -;; Version: 0.48 -;; Package-Version: 20161021.2133 -;; Package-Requires: ((dash "2.8.0") (s "1.9.0") (cl-lib "0.5")) -;;; Commentary: - -;; Please see README.md for documentation, or read it online at -;; https://github.com/Wilfred/ag.el/#agel - -;;; License: - -;; This file is not part of GNU Emacs. -;; However, it is distributed under the same license. - -;; GNU Emacs 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 3, or (at your option) -;; any later version. - -;; GNU Emacs 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, -;; Boston, MA 02110-1301, USA. - -;;; Code: -(require 'cl-lib) ;; cl-letf, cl-defun -(require 'dired) ;; dired-sort-inhibit -(require 'dash) -(require 's) -(require 'find-dired) ;; find-dired-filter - -(defgroup ag nil - "A front-end for ag - The Silver Searcher." - :group 'tools - :group 'matching) - -(defcustom ag-executable - "ag" - "Name of the ag executable to use." - :type 'string - :group 'ag) - -(defcustom ag-arguments - (list "--smart-case" "--stats") - "Additional arguments passed to ag. - -Ag.el internally uses --column, --line-number and --color -options (with specific colors) to match groups, so options -specified here should not conflict. - ---line-number is required on Windows, as otherwise ag will not -print line numbers when the input is a stream." - :type '(repeat (string)) - :group 'ag) - -(defcustom ag-context-lines nil - "Number of context lines to include before and after a matching line." - :type 'integer - :group 'ag) - -(defcustom ag-group-matches t - "Group matches in the same file together. - -If nil, the file name is repeated at the beginning of every match line." - :type 'boolean - :group 'ag) - -(defcustom ag-highlight-search nil - "Non-nil means we highlight the current search term in results. - -This requires the ag command to support --color-match, which is only in v0.14+" - :type 'boolean - :group 'ag) - -(defcustom ag-reuse-buffers nil - "Non-nil means we reuse the existing search results buffer or -dired results buffer, rather than creating one buffer per unique -search." - :type 'boolean - :group 'ag) - -(defcustom ag-reuse-window nil - "Non-nil means we open search results in the same window, -hiding the results buffer." - :type 'boolean - :group 'ag) - -(defcustom ag-project-root-function nil - "A function to determine the project root for `ag-project'. - -If set to a function, call this function with the name of the -file or directory for which to determine the project root -directory. - -If set to nil, fall back to finding VCS root directories." - :type '(choice (const :tag "Default (VCS root)" nil) - (function :tag "Function")) - :group 'ag) - -(defcustom ag-ignore-list nil - "A list of patterns for files/directories to ignore when searching." - :type '(repeat (string)) - :group 'ag) - -(require 'compile) - -;; Although ag results aren't exactly errors, we treat them as errors -;; so `next-error' and `previous-error' work. However, we ensure our -;; face inherits from `compilation-info-face' so the results are -;; styled appropriately. -(defface ag-hit-face '((t :inherit compilation-info)) - "Face name to use for ag matches." - :group 'ag) - -(defface ag-match-face '((t :inherit match)) - "Face name to use for ag matches." - :group 'ag) - -(defvar ag-search-finished-hook nil - "Hook run when ag completes a search in a buffer.") - -(defun ag/run-finished-hook (buffer how-finished) - "Run the ag hook to signal that the search has completed." - (with-current-buffer buffer - (run-hooks 'ag-search-finished-hook))) - -(defmacro ag/with-patch-function (fun-name fun-args fun-body &rest body) - "Temporarily override the definition of FUN-NAME whilst BODY is executed. - -Assumes FUNCTION is already defined (see http://emacs.stackexchange.com/a/3452/304)." - `(cl-letf (((symbol-function ,fun-name) - (lambda ,fun-args ,fun-body))) - ,@body)) - -(defun ag/next-error-function (n &optional reset) - "Open the search result at point in the current window or a -different window, according to `ag-reuse-window'." - (if ag-reuse-window - ;; prevent changing the window - (ag/with-patch-function - 'pop-to-buffer (buffer &rest args) (switch-to-buffer buffer) - (compilation-next-error-function n reset)) - - ;; just navigate to the results as normal - (compilation-next-error-function n reset))) - -;; Note that we want to use as tight a regexp as we can to try and -;; handle weird file names (with colons in them) as well as possible. -;; E.g. we use [1-9][0-9]* rather than [0-9]+ so as to accept ":034:" -;; in file names. -(defvar ag/file-column-pattern-nogroup - "^\\(.+?\\):\\([1-9][0-9]*\\):\\([1-9][0-9]*\\):" - "A regexp pattern that groups output into filename, line number and column number.") - -(defvar ag/file-column-pattern-group - "^\\([[:digit:]]+\\):\\([[:digit:]]+\\):" - "A regexp pattern to match line number and column number with grouped output.") - -(defun ag/compilation-match-grouped-filename () - "Match filename backwards when a line/column match is found in grouped output mode." - (save-match-data - (save-excursion - (when (re-search-backward "^File: \\(.*\\)$" (point-min) t) - (list (match-string 1)))))) - -(define-compilation-mode ag-mode "Ag" - "Ag results compilation mode" - (set (make-local-variable 'compilation-error-regexp-alist) - '(compilation-ag-nogroup compilation-ag-group)) - (set (make-local-variable 'compilation-error-regexp-alist-alist) - (list (cons 'compilation-ag-nogroup (list ag/file-column-pattern-nogroup 1 2 3)) - (cons 'compilation-ag-group (list ag/file-column-pattern-group - 'ag/compilation-match-grouped-filename 1 2)))) - (set (make-local-variable 'compilation-error-face) 'ag-hit-face) - (set (make-local-variable 'next-error-function) #'ag/next-error-function) - (set (make-local-variable 'compilation-finish-functions) - #'ag/run-finished-hook) - (add-hook 'compilation-filter-hook 'ag-filter nil t)) - -(define-key ag-mode-map (kbd "p") #'compilation-previous-error) -(define-key ag-mode-map (kbd "n") #'compilation-next-error) -(define-key ag-mode-map (kbd "k") '(lambda () (interactive) - (let (kill-buffer-query-functions) (kill-buffer)))) - -(defun ag/buffer-name (search-string directory regexp) - "Return a buffer name formatted according to ag.el conventions." - (cond - (ag-reuse-buffers "*ag search") - (regexp (format "*ag search regexp:%s dir:%s" search-string directory)) - (:else (format "*ag search text:%s dir:%s" search-string directory)))) - -(defun ag/format-ignore (ignores) - "Prepend '--ignore' to every item in IGNORES." - (apply #'append - (mapcar (lambda (item) (list "--ignore" item)) ignores))) - -(cl-defun ag/search (string directory - &key (regexp nil) (file-regex nil) (file-type nil)) - "Run ag searching for the STRING given in DIRECTORY. -If REGEXP is non-nil, treat STRING as a regular expression." - (let ((default-directory (file-name-as-directory directory)) - (arguments ag-arguments) - (shell-command-switch "-c")) - ;; Add double dashes at the end of command line if not specified in - ;; ag-arguments. - (unless (equal (car (last arguments)) "--") - (setq arguments (append arguments '("--")))) - (setq arguments - (append '("--line-number" "--column" "--color" "--color-match" "30;43" - "--color-path" "1;32") - arguments)) - (if ag-group-matches - (setq arguments (cons "--group" arguments)) - (setq arguments (cons "--nogroup" arguments))) - (unless regexp - (setq arguments (cons "--literal" arguments))) - (when (or (eq system-type 'windows-nt) (eq system-type 'cygwin)) - ;; Use --vimgrep to work around issue #97 on Windows. - (setq arguments (cons "--vimgrep" arguments))) - (when (char-or-string-p file-regex) - (setq arguments (append `("--file-search-regex" ,file-regex) arguments))) - (when file-type - (setq arguments (cons (format "--%s" file-type) arguments))) - (if (integerp current-prefix-arg) - (setq arguments (cons (format "--context=%d" (abs current-prefix-arg)) arguments)) - (when ag-context-lines - (setq arguments (cons (format "--context=%d" ag-context-lines) arguments)))) - (when ag-ignore-list - (setq arguments (append (ag/format-ignore ag-ignore-list) arguments))) - (unless (file-exists-p default-directory) - (error "No such directory %s" default-directory)) - (let ((command-string - (mapconcat #'shell-quote-argument - (append (list ag-executable) arguments (list string ".")) - " "))) - ;; If we're called with a prefix, let the user modify the command before - ;; running it. Typically this means they want to pass additional arguments. - ;; The numeric value is used for context lines: positive is just context - ;; number (no modification), negative allows further modification. - (when (and current-prefix-arg (not (and (integerp current-prefix-arg) (> current-prefix-arg 0)))) - ;; Make a space in the command-string for the user to enter more arguments. - (setq command-string (ag/replace-first command-string " -- " " -- ")) - ;; Prompt for the command. - (let ((adjusted-point (- (length command-string) (length string) 5))) - (setq command-string - (read-from-minibuffer "ag command: " - (cons command-string adjusted-point))))) - ;; Call ag. - (compilation-start - command-string - #'ag-mode - `(lambda (mode-name) ,(ag/buffer-name string directory regexp)))))) - -(defun ag/dwim-at-point () - "If there's an active selection, return that. -Otherwise, get the symbol at point, as a string." - (cond ((use-region-p) - (buffer-substring-no-properties (region-beginning) (region-end))) - ((symbol-at-point) - (substring-no-properties - (symbol-name (symbol-at-point)))))) - -(defun ag/buffer-extension-regex () - "If the current buffer has an extension, return -a PCRE pattern that matches files with that extension. -Returns an empty string otherwise." - (let ((file-name (buffer-file-name))) - (if (stringp file-name) - (format "\\.%s$" (ag/escape-pcre (file-name-extension file-name))) - ""))) - -(defun ag/longest-string (&rest strings) - "Given a list of strings and nils, return the longest string." - (let ((longest-string nil)) - (dolist (string strings) - (cond ((null longest-string) - (setq longest-string string)) - ((stringp string) - (when (< (length longest-string) - (length string)) - (setq longest-string string))))) - longest-string)) - -(defun ag/replace-first (string before after) - "Replace the first occurrence of BEFORE in STRING with AFTER." - (replace-regexp-in-string - (concat "\\(" (regexp-quote before) "\\)" ".*\\'") - after string - nil nil 1)) - -(autoload 'vc-git-root "vc-git") - -(require 'vc-svn) -;; Emacs 23.4 doesn't provide vc-svn-root. -(unless (functionp 'vc-svn-root) - (defun vc-svn-root (file) - (vc-find-root file vc-svn-admin-directory))) - -(autoload 'vc-hg-root "vc-hg") - -(autoload 'vc-bzr-root "vc-bzr") - -(defun ag/project-root (file-path) - "Guess the project root of the given FILE-PATH. - -Use `ag-project-root-function' if set, or fall back to VCS -roots." - (if ag-project-root-function - (funcall ag-project-root-function file-path) - (or (ag/longest-string - (vc-git-root file-path) - (vc-svn-root file-path) - (vc-hg-root file-path) - (vc-bzr-root file-path)) - file-path))) - -(defun ag/dired-align-size-column () - (beginning-of-line) - (when (looking-at "^ ") - (forward-char 2) - (search-forward " " nil t 4) - (let* ((size-start (point)) - (size-end (search-forward " " nil t)) - (width (and size-end (- size-end size-start)))) - (when (and size-end - (< width 12) - (> width 1)) - (goto-char size-start) - (insert (make-string (- 12 width) ? )))))) - -(defun ag/dired-filter (proc string) - "Filter the output of ag to make it suitable for `dired-mode'." - (let ((buf (process-buffer proc)) - (inhibit-read-only t)) - (if (buffer-name buf) - (with-current-buffer buf - (save-excursion - (save-restriction - (widen) - (let ((beg (point-max))) - (goto-char beg) - (insert string) - (goto-char beg) - (or (looking-at "^") - (progn - (ag/dired-align-size-column) - (forward-line 1))) - (while (looking-at "^") - (insert " ") - (ag/dired-align-size-column) - (forward-line 1)) - (goto-char beg) - (beginning-of-line) - - ;; Remove occurrences of default-directory. - (while (search-forward (concat " " default-directory) nil t) - (replace-match " " nil t)) - - (goto-char (point-max)) - (if (search-backward "\n" (process-mark proc) t) - (progn - (dired-insert-set-properties (process-mark proc) - (1+ (point))) - (move-marker (process-mark proc) (1+ (point))))))))) - (delete-process proc)))) - -(defun ag/dired-sentinel (proc state) - "Update the status/modeline after the process finishes." - (let ((buf (process-buffer proc)) - (inhibit-read-only t)) - (if (buffer-name buf) - (with-current-buffer buf - (let ((buffer-read-only nil)) - (save-excursion - (goto-char (point-max)) - (insert "\n ag " state) - (forward-char -1) ;Back up before \n at end of STATE. - (insert " at " (substring (current-time-string) 0 19)) - (forward-char 1) - (setq mode-line-process - (concat ":" (symbol-name (process-status proc)))) - ;; Since the buffer and mode line will show that the - ;; process is dead, we can delete it now. Otherwise it - ;; will stay around until M-x list-processes. - (delete-process proc) - (force-mode-line-update))) - (run-hooks 'dired-after-readin-hook) - (message "%s finished." (current-buffer)))))) - -(defun ag/kill-process () - "Kill the `ag' process running in the current buffer." - (interactive) - (let ((ag (get-buffer-process (current-buffer)))) - (and ag (eq (process-status ag) 'run) - (eq (process-filter ag) (function find-dired-filter)) - (condition-case nil - (delete-process ag) - (error nil))))) - -(defun ag/escape-pcre (regexp) - "Escape the PCRE-special characters in REGEXP so that it is -matched literally." - (let ((alphanum "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789")) - (apply #'concat - (mapcar - (lambda (c) - (cond - ((not (string-match-p (regexp-quote c) alphanum)) - (concat "\\" c)) - (t c))) - (mapcar #'char-to-string (string-to-list regexp)))))) - -;;;###autoload -(defun ag (string directory) - "Search using ag in a given DIRECTORY for a given literal search STRING, -with STRING defaulting to the symbol under point. - -If called with a prefix, prompts for flags to pass to ag." - (interactive (list (ag/read-from-minibuffer "Search string") - (read-directory-name "Directory: "))) - (ag/search string directory)) - -;;;###autoload -(defun ag-files (string file-type directory) - "Search using ag in a given DIRECTORY for a given literal search STRING, -limited to files that match FILE-TYPE. STRING defaults to the -symbol under point. - -If called with a prefix, prompts for flags to pass to ag." - (interactive (list (ag/read-from-minibuffer "Search string") - (ag/read-file-type) - (read-directory-name "Directory: "))) - (apply #'ag/search string directory file-type)) - -;;;###autoload -(defun ag-regexp (string directory) - "Search using ag in a given directory for a given regexp. -The regexp should be in PCRE syntax, not Emacs regexp syntax. - -If called with a prefix, prompts for flags to pass to ag." - (interactive "sSearch regexp: \nDDirectory: ") - (ag/search string directory :regexp t)) - -;;;###autoload -(defun ag-project (string) - "Guess the root of the current project and search it with ag -for the given literal search STRING. - -If called with a prefix, prompts for flags to pass to ag." - (interactive (list (ag/read-from-minibuffer "Search string"))) - (ag/search string (ag/project-root default-directory))) - -;;;###autoload -(defun ag-project-files (string file-type) - "Search using ag for a given literal search STRING, -limited to files that match FILE-TYPE. STRING defaults to the -symbol under point. - -If called with a prefix, prompts for flags to pass to ag." - (interactive (list (ag/read-from-minibuffer "Search string") - (ag/read-file-type))) - (apply 'ag/search string (ag/project-root default-directory) file-type)) - -(defun ag/read-from-minibuffer (prompt) - "Read a value from the minibuffer with PROMPT. -If there's a string at point, offer that as a default." - (let* ((suggested (ag/dwim-at-point)) - (final-prompt - (if suggested - (format "%s (default %s): " prompt suggested) - (format "%s: " prompt))) - ;; Ask the user for input, but add `suggested' to the history - ;; so they can use M-n if they want to modify it. - (user-input (read-from-minibuffer - final-prompt - nil nil nil nil suggested))) - ;; Return the input provided by the user, or use `suggested' if - ;; the input was empty. - (if (> (length user-input) 0) - user-input - suggested))) - -;;;###autoload -(defun ag-project-regexp (regexp) - "Guess the root of the current project and search it with ag -for the given regexp. The regexp should be in PCRE syntax, not -Emacs regexp syntax. - -If called with a prefix, prompts for flags to pass to ag." - (interactive (list (ag/read-from-minibuffer "Search regexp"))) - (ag/search regexp (ag/project-root default-directory) :regexp t)) - -(autoload 'symbol-at-point "thingatpt") - -;;;###autoload -(defalias 'ag-project-at-point 'ag-project) -(make-obsolete 'ag-project-at-point 'ag-project "0.19") - -;;;###autoload -(defalias 'ag-regexp-project-at-point 'ag-project-regexp) -(make-obsolete 'ag-regexp-project-at-point 'ag-project-regexp "0.46") - -;;;###autoload -(defun ag-dired (dir string) - "Recursively find files in DIR matching literal search STRING. - -The PATTERN is matched against the full path to the file, not -only against the file name. - -The results are presented as a `dired-mode' buffer with -`default-directory' being DIR. - -See also `ag-dired-regexp'." - (interactive "DDirectory: \nsFile pattern: ") - (ag-dired-regexp dir (ag/escape-pcre string))) - -;;;###autoload -(defun ag-dired-regexp (dir regexp) - "Recursively find files in DIR matching REGEXP. -REGEXP should be in PCRE syntax, not Emacs regexp syntax. - -The REGEXP is matched against the full path to the file, not -only against the file name. - -Results are presented as a `dired-mode' buffer with -`default-directory' being DIR. - -See also `find-dired'." - (interactive "DDirectory: \nsFile regexp: ") - (let* ((dired-buffers dired-buffers) ;; do not mess with regular dired buffers - (orig-dir dir) - (dir (file-name-as-directory (expand-file-name dir))) - (buffer-name (if ag-reuse-buffers - "*ag dired*" - (format "*ag dired pattern:%s dir:%s*" regexp dir))) - (cmd (concat ag-executable " --nocolor -g '" regexp "' " - (shell-quote-argument dir) - " | grep -v '^$' | sed s/\\'/\\\\\\\\\\'/ | xargs -I '{}' ls " - dired-listing-switches " '{}' &"))) - (with-current-buffer (get-buffer-create buffer-name) - (switch-to-buffer (current-buffer)) - (widen) - (kill-all-local-variables) - (if (fboundp 'read-only-mode) - (read-only-mode -1) - (setq buffer-read-only nil)) - (let ((inhibit-read-only t)) (erase-buffer)) - (setq default-directory dir) - (run-hooks 'dired-before-readin-hook) - (shell-command cmd (current-buffer)) - (insert " " dir ":\n") - (insert " " cmd "\n") - (dired-mode dir) - (let ((map (make-sparse-keymap))) - (set-keymap-parent map (current-local-map)) - (define-key map "\C-c\C-k" 'ag/kill-process) - (use-local-map map)) - (set (make-local-variable 'dired-sort-inhibit) t) - (set (make-local-variable 'revert-buffer-function) - `(lambda (ignore-auto noconfirm) - (ag-dired-regexp ,orig-dir ,regexp))) - (if (fboundp 'dired-simple-subdir-alist) - (dired-simple-subdir-alist) - (set (make-local-variable 'dired-subdir-alist) - (list (cons default-directory (point-min-marker))))) - (let ((proc (get-buffer-process (current-buffer)))) - (set-process-filter proc #'ag/dired-filter) - (set-process-sentinel proc #'ag/dired-sentinel) - ;; Initialize the process marker; it is used by the filter. - (move-marker (process-mark proc) 1 (current-buffer))) - (setq mode-line-process '(":%s"))))) - -;;;###autoload -(defun ag-project-dired (pattern) - "Recursively find files in current project matching PATTERN. - -See also `ag-dired'." - (interactive "sFile pattern: ") - (ag-dired-regexp (ag/project-root default-directory) (ag/escape-pcre pattern))) - -;;;###autoload -(defun ag-project-dired-regexp (regexp) - "Recursively find files in current project matching REGEXP. - -See also `ag-dired-regexp'." - (interactive "sFile regexp: ") - (ag-dired-regexp (ag/project-root default-directory) regexp)) - -;;;###autoload -(defun ag-kill-buffers () - "Kill all `ag-mode' buffers." - (interactive) - (dolist (buffer (buffer-list)) - (when (eq (buffer-local-value 'major-mode buffer) 'ag-mode) - (kill-buffer buffer)))) - -;;;###autoload -(defun ag-kill-other-buffers () - "Kill all `ag-mode' buffers other than the current buffer." - (interactive) - (let ((current-buffer (current-buffer))) - (dolist (buffer (buffer-list)) - (when (and - (eq (buffer-local-value 'major-mode buffer) 'ag-mode) - (not (eq buffer current-buffer))) - (kill-buffer buffer))))) - -;; Based on grep-filter. -(defun ag-filter () - "Handle escape sequences inserted by the ag process. -This function is called from `compilation-filter-hook'." - (save-excursion - (forward-line 0) - (let ((end (point)) beg) - (goto-char compilation-filter-start) - (forward-line 0) - (setq beg (point)) - ;; Only operate on whole lines so we don't get caught with part of an - ;; escape sequence in one chunk and the rest in another. - (when (< (point) end) - (setq end (copy-marker end)) - (when ag-highlight-search - ;; Highlight ag matches and delete marking sequences. - (while (re-search-forward "\033\\[30;43m\\(.*?\\)\033\\[0m\033\\[K" end 1) - (replace-match (propertize (match-string 1) - 'face nil 'font-lock-face 'ag-match-face) - t t))) - ;; Add marker at start of line for files. This is used by the match - ;; in `compilation-error-regexp-alist' to extract the file name. - (when ag-group-matches - (goto-char beg) - (while (re-search-forward "\033\\[1;32m\\(.*\\)\033\\[0m\033\\[K" end 1) - (replace-match - (concat "File: " (propertize (match-string 1) 'face nil 'font-lock-face - 'compilation-info)) - t t))) - ;; Delete all remaining escape sequences - (goto-char beg) - (while (re-search-forward "\033\\[[0-9;]*[mK]" end 1) - (replace-match "" t t)))))) - -(defun ag/get-supported-types () - "Query the ag executable for which file types it recognises." - (let* ((ag-output (shell-command-to-string (format "%s --list-file-types" ag-executable))) - (lines (-map #'s-trim (s-lines ag-output))) - (types (--keep (when (s-starts-with? "--" it) (s-chop-prefix "--" it )) lines)) - (extensions (--map (s-split " " it) (--filter (s-starts-with? "." it) lines)))) - (-zip types extensions))) - -(defun ag/read-file-type () - "Prompt the user for a known file type, or let them specify a PCRE regex." - (let* ((all-types-with-extensions (ag/get-supported-types)) - (all-types (mapcar 'car all-types-with-extensions)) - (file-type - (completing-read "Select file type: " - (append '("custom (provide a PCRE regex)") all-types))) - (file-type-extensions - (cdr (assoc file-type all-types-with-extensions)))) - (if file-type-extensions - (list :file-type file-type) - (list :file-regex - (read-from-minibuffer "Filenames which match PCRE: " - (ag/buffer-extension-regex)))))) - -(provide 'ag) -;;; ag.el ends here diff --git a/elpa/alert-20160824.821/alert-autoloads.el b/elpa/alert-20160824.821/alert-autoloads.el deleted file mode 100644 index c8b64b4..0000000 --- a/elpa/alert-20160824.821/alert-autoloads.el +++ /dev/null @@ -1,92 +0,0 @@ -;;; alert-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "alert" "alert.el" (22533 17539 221493 451000)) -;;; Generated autoloads from alert.el - -(autoload 'alert-add-rule "alert" "\ -Programmatically add an alert configuration rule. - -Normally, users should custoimze `alert-user-configuration'. -This facility is for module writers and users that need to do -things the Lisp way. - -Here is a rule the author currently uses with ERC, so that the -fringe gets colored whenever people chat on BitlBee: - -\(alert-add-rule :status \\='(buried visible idle) - :severity \\='(moderate high urgent) - :mode \\='erc-mode - :predicate - #\\='(lambda (info) - (string-match (concat \"\\\\`[^&].*@BitlBee\\\\\\='\") - (erc-format-target-and/or-network))) - :persistent - #\\='(lambda (info) - ;; If the buffer is buried, or the user has been - ;; idle for `alert-reveal-idle-time' seconds, - ;; make this alert persistent. Normally, alerts - ;; become persistent after - ;; `alert-persist-idle-time' seconds. - (memq (plist-get info :status) \\='(buried idle))) - :style \\='fringe - :continue t) - -\(fn &key SEVERITY STATUS MODE CATEGORY TITLE MESSAGE PREDICATE ICON (style alert-default-style) PERSISTENT CONTINUE NEVER-PERSIST APPEND)" nil nil) - -(autoload 'alert "alert" "\ -Alert the user that something has happened. -MESSAGE is what the user will see. You may also use keyword -arguments to specify additional details. Here is a full example: - -\(alert \"This is a message\" - :severity \\='high ;; The default severity is `normal' - :title \"Title\" ;; An optional title - :category \\='example ;; A symbol to identify the message - :mode \\='text-mode ;; Normally determined automatically - :buffer (current-buffer) ;; This is the default - :data nil ;; Unused by alert.el itself - :persistent nil ;; Force the alert to be persistent; - ;; it is best not to use this - :never-persist nil ;; Force this alert to never persist - :style \\='fringe) ;; Force a given style to be used; - ;; this is only for debugging! - -If no :title is given, the buffer-name of :buffer is used. If -:buffer is nil, it is the current buffer at the point of call. - -:data is an opaque value which modules can pass through to their -own styles if they wish. - -Here are some more typical examples of usage: - - ;; This is the most basic form usage - (alert \"This is an alert\") - - ;; You can adjust the severity for more important messages - (alert \"This is an alert\" :severity \\='high) - - ;; Or decrease it for purely informative ones - (alert \"This is an alert\" :severity \\='trivial) - - ;; Alerts can have optional titles. Otherwise, the title is the - ;; buffer-name of the (current-buffer) where the alert originated. - (alert \"This is an alert\" :title \"My Alert\") - - ;; Further, alerts can have categories. This allows users to - ;; selectively filter on them. - (alert \"This is an alert\" :title \"My Alert\" - :category \\='some-category-or-other) - -\(fn MESSAGE &key (severity (quote normal)) TITLE ICON CATEGORY BUFFER MODE DATA STYLE PERSISTENT NEVER-PERSIST)" nil nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; alert-autoloads.el ends here diff --git a/elpa/alert-20160824.821/alert-pkg.el b/elpa/alert-20160824.821/alert-pkg.el deleted file mode 100644 index 38845e9..0000000 --- a/elpa/alert-20160824.821/alert-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "alert" "20160824.821" "Growl-style notification system for Emacs" '((gntp "0.1") (log4e "0.3.0")) :url "https://github.com/jwiegley/alert" :keywords '("notification" "emacs" "message")) diff --git a/elpa/alert-20160824.821/alert.el b/elpa/alert-20160824.821/alert.el deleted file mode 100644 index 65d5678..0000000 --- a/elpa/alert-20160824.821/alert.el +++ /dev/null @@ -1,1045 +0,0 @@ -;;; alert.el --- Growl-style notification system for Emacs - -;; Copyright (C) 2011-2013 John Wiegley - -;; Author: John Wiegley -;; Created: 24 Aug 2011 -;; Updated: 16 Mar 2015 -;; Version: 1.2 -;; Package-Version: 20160824.821 -;; Package-Requires: ((gntp "0.1") (log4e "0.3.0")) -;; Keywords: notification emacs message -;; X-URL: https://github.com/jwiegley/alert - -;; 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, 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: - -;; Alert is a Growl-workalike for Emacs which uses a common notification -;; interface and multiple, selectable "styles", whose use is fully -;; customizable by the user. -;; -;; * For module writers -;; -;; Just use `alert' instead of `message' as follows: -;; -;; (require 'alert) -;; -;; ;; This is the most basic form usage -;; (alert "This is an alert") -;; -;; ;; You can adjust the severity for more important messages -;; (alert "This is an alert" :severity 'high) -;; -;; ;; Or decrease it for purely informative ones -;; (alert "This is an alert" :severity 'trivial) -;; -;; ;; Alerts can have optional titles. Otherwise, the title is the -;; ;; buffer-name of the (current-buffer) where the alert originated. -;; (alert "This is an alert" :title "My Alert") -;; -;; ;; Further, alerts can have categories. This allows users to -;; ;; selectively filter on them. -;; (alert "This is an alert" :title "My Alert" :category 'debug) -;; -;; * For users -;; -;; For the user, there are several variables to control when and how alerts -;; are presented. By default, they appear in the minibuffer much the same -;; as a normal Emacs message. But there are many more possibilities: -;; -;; `alert-fade-time' -;; Normally alerts disappear after this many seconds, if the style -;; supports it. The default is 5 seconds. -;; -;; `alert-default-style' -;; Pick the style to use if no other config rule matches. The -;; default is `message', but `growl' works well too. -;; -;; `alert-reveal-idle-time' -;; If a config rule choose to match on `idle', this is how many -;; seconds idle the user has to be. Defaults to 5 so that users -;; don't miss any alerts, but 120 is also good. -;; -;; `alert-persist-idle-time' -;; After this many idle seconds, alerts will become sticky, and not -;; fade away more. The default is 15 minutes. -;; -;; `alert-log-messages' -;; By default, all alerts are logged to *Alerts* (and to *Messages*, -;; if the `message' style is being used). Set to nil to disable. -;; -;; `alert-hide-all-notifications' -;; Want alerts off entirely? They still get logged, however, unless -;; you've turned that off too. -;; -;; `alert-user-configuration' -;; This variable lets you control exactly how and when a particular -;; alert, a class of alerts, or all alerts, get reported -- or if at -;; all. Use this to make some alerts use Growl, while others are -;; completely silent. -;; -;; * Programmatically adding rules -;; -;; Users can also programmatically add configuration rules, in addition to -;; customizing `alert-user-configuration'. Here is one that the author -;; currently uses with ERC, so that the fringe gets colored whenever people -;; chat on BitlBee: -;; -;; (alert-add-rule :status '(buried visible idle) -;; :severity '(moderate high urgent) -;; :mode 'erc-mode -;; :predicate -;; #'(lambda (info) -;; (string-match (concat "\\`[^&].*@BitlBee\\'") -;; (erc-format-target-and/or-network))) -;; :persistent -;; #'(lambda (info) -;; ;; If the buffer is buried, or the user has been -;; ;; idle for `alert-reveal-idle-time' seconds, -;; ;; make this alert persistent. Normally, alerts -;; ;; become persistent after -;; ;; `alert-persist-idle-time' seconds. -;; (memq (plist-get info :status) '(buried idle))) -;; :style 'fringe -;; :continue t) -;; -;; * Builtin alert styles -;; -;; There are several builtin styles, and it is trivial to create new ones. -;; The builtins are: -;; -;; fringe - Changes the current frame's fringe background color -;; mode-line - Changes the current frame's mode-line background color -;; gntp - Uses gntp, it requires gntp.el (see https://github.com/tekai/gntp.el) -;; growl - Uses Growl on OS X, if growlnotify is on the PATH -;; ignore - Ignores the alert entirely -;; libnotify - Uses libnotify if notify-send is on the PATH -;; log - Logs the alert text to *Alerts*, with a timestamp -;; message - Uses the Emacs `message' facility -;; notifications - Uses notifications library via D-Bus -;; notifier - Uses terminal-notifier on OS X, if it is on the PATH -;; osx-notifier - Native OSX notifier using AppleScript -;; toaster - Use the toast notification system -;; -;; * Defining new styles -;; -;; To create a new style, you need to at least write a "notifier", which is -;; a function that receives the details of the alert. These details are -;; given in a plist which uses various keyword to identify the parts of the -;; alert. Here is a prototypical style definition: -;; -;; (alert-define-style 'style-name :title "My Style's title" -;; :notifier -;; (lambda (info) -;; ;; The message text is :message -;; (plist-get info :message) -;; ;; The :title of the alert -;; (plist-get info :title) -;; ;; The :category of the alert -;; (plist-get info :category) -;; ;; The major-mode this alert relates to -;; (plist-get info :mode) -;; ;; The buffer the alert relates to -;; (plist-get info :buffer) -;; ;; Severity of the alert. It is one of: -;; ;; `urgent' -;; ;; `high' -;; ;; `moderate' -;; ;; `normal' -;; ;; `low' -;; ;; `trivial' -;; (plist-get info :severity) -;; ;; Whether this alert should persist, or fade away -;; (plist-get info :persistent) -;; ;; Data which was passed to `alert'. Can be -;; ;; anything. -;; (plist-get info :data)) -;; -;; ;; Removers are optional. Their job is to remove -;; ;; the visual or auditory effect of the alert. -;; :remover -;; (lambda (info) -;; ;; It is the same property list that was passed to -;; ;; the notifier function. -;; )) - -;;; Code: - -(eval-when-compile - (require 'cl)) -(require 'gntp nil t) -(require 'notifications nil t) -(require 'log4e nil t) - -(defgroup alert nil - "Notification system for Emacs similar to Growl" - :group 'emacs) - -(defcustom alert-severity-faces - '((urgent . alert-urgent-face) - (high . alert-high-face) - (moderate . alert-moderate-face) - (normal . alert-normal-face) - (low . alert-low-face) - (trivial . alert-trivial-face)) - "Faces associated by default with alert severities." - :type '(alist :key-type symbol :value-type color) - :group 'alert) - -(defcustom alert-severity-colors - '((urgent . "red") - (high . "orange") - (moderate . "yellow") - (normal . "green") - (low . "blue") - (trivial . "purple")) - "Colors associated by default with alert severities. -This is used by styles external to Emacs that don't understand faces." - :type '(alist :key-type symbol :value-type color) - :group 'alert) - -(defcustom alert-log-severity-functions - '((urgent . alert--log-fatal) - (high . alert--log-error) - (moderate . alert--log-warn) - (normal . alert--log-info) - (low . alert--log-debug) - (trivial . alert--log-trace)) - "Log4e logging functions" - :type '(alist :key-type symbol :value-type color) - :group 'alert) - -(defcustom alert-log-level - 'normal - "Minimum level of messages to log" - :type 'symbol - :group 'alert) - -(defcustom alert-reveal-idle-time 15 - "If idle this many seconds, rules will match the `idle' property." - :type 'integer - :group 'alert) - -(defcustom alert-persist-idle-time 900 - "If idle this many seconds, all alerts become persistent. -This can be overriden with the Never Persist option (:never-persist)." - :type 'integer - :group 'alert) - -(defcustom alert-fade-time 5 - "If not idle, alerts disappear after this many seconds. -The amount of idle time is governed by `alert-persist-idle-time'." - :type 'integer - :group 'alert) - -(defcustom alert-hide-all-notifications nil - "If non-nil, no alerts are ever shown to the user." - :type 'boolean - :group 'alert) - -(defcustom alert-log-messages t - "If non-nil, all alerts are logged to the *Alerts* buffer." - :type 'boolean - :group 'alert) - -(defcustom alert-default-icon - (concat data-directory - "images/icons/hicolor/scalable/apps/emacs.svg") - "Filename of default icon to show for libnotify-alerts." - :type 'string - :group 'alert) - -(defvar alert-styles nil) - -(defun alert-styles-radio-type (widget-name) - (append - (list widget-name :tag "Style") - (mapcar #'(lambda (style) - (list 'const - :tag (or (plist-get (cdr style) :title) - (symbol-name (car style))) - (car style))) - (setq alert-styles - (sort alert-styles - #'(lambda (l r) - (string< (symbol-name (car l)) - (symbol-name (car r))))))))) - -(defcustom alert-default-style 'message - "The style to use if no rules match in the current configuration. -If a configured rule does match an alert, this style is not used; -it is strictly a fallback." - :type (alert-styles-radio-type 'radio) - :group 'alert) - -(defun alert-configuration-type () - (list 'repeat - (list - 'list :tag "Select style if alert matches selector" - '(repeat - :tag "Selector" - (choice - (cons :tag "Severity" - (const :format "" :severity) - (set (const :tag "Urgent" urgent) - (const :tag "High" high) - (const :tag "Moderate" moderate) - (const :tag "Normal" normal) - (const :tag "Low" low) - (const :tag "Trivial" trivial))) - (cons :tag "User Status" - (const :format "" :status) - (set (const :tag "Buffer not visible" buried) - (const :tag "Buffer visible" visible) - (const :tag "Buffer selected" selected) - (const :tag "Buffer selected, user idle" idle))) - (cons :tag "Major Mode" - (const :format "" :mode) - regexp) - (cons :tag "Category" - (const :format "" :category) - regexp) - (cons :tag "Title" - (const :format "" :title) - regexp) - (cons :tag "Message" - (const :format "" :message) - regexp) - (cons :tag "Predicate" - (const :format "" :predicate) - function) - (cons :tag "Icon" - (const :format "" :icon) - regexp))) - (alert-styles-radio-type 'choice) - '(set :tag "Options" - (cons :tag "Make alert persistent" - (const :format "" :persistent) - (choice :value t (const :tag "Yes" t) - (function :tag "Predicate"))) - (cons :tag "Never persist" - (const :format "" :never-persist) - (choice :value t (const :tag "Yes" t) - (function :tag "Predicate"))) - (cons :tag "Continue to next rule" - (const :format "" :continue) - (choice :value t (const :tag "Yes" t) - (function :tag "Predicate"))) - ;;(list :tag "Change Severity" - ;; (radio :tag "From" - ;; (const :tag "Urgent" urgent) - ;; (const :tag "High" high) - ;; (const :tag "Moderate" moderate) - ;; (const :tag "Normal" normal) - ;; (const :tag "Low" low) - ;; (const :tag "Trivial" trivial)) - ;; (radio :tag "To" - ;; (const :tag "Urgent" urgent) - ;; (const :tag "High" high) - ;; (const :tag "Moderate" moderate) - ;; (const :tag "Normal" normal) - ;; (const :tag "Low" low) - ;; (const :tag "Trivial" trivial))) - )))) - -(defcustom alert-user-configuration nil - "Rules that determine how and when alerts get displayed." - :type (alert-configuration-type) - :group 'alert) - -(defvar alert-internal-configuration nil - "Rules added by `alert-add-rule'. -For user customization, see `alert-user-configuration'.") - -(defface alert-urgent-face - '((t (:foreground "Red" :bold t))) - "Urgent alert face." - :group 'alert) - -(defface alert-high-face - '((t (:foreground "Dark Orange" :bold t))) - "High alert face." - :group 'alert) - -(defface alert-moderate-face - '((t (:foreground "Gold" :bold t))) - "Moderate alert face." - :group 'alert) - -(defface alert-normal-face - '((t)) - "Normal alert face." - :group 'alert) - -(defface alert-low-face - '((t (:foreground "Dark Blue"))) - "Low alert face." - :group 'alert) - -(defface alert-trivial-face - '((t (:foreground "Dark Purple"))) - "Trivial alert face." - :group 'alert) - -(defun alert-define-style (name &rest plist) - "Define a new style for notifying the user of alert messages. -To create a new style, you need to at least write a \"notifier\", -which is a function that receives the details of the alert. -These details are given in a plist which uses various keyword to -identify the parts of the alert. Here is a prototypical style -definition: - -\(alert-define-style 'style-name :title \"My Style's title\" - :notifier - (lambda (info) - ;; The message text is :message - (plist-get info :message) - ;; The :title of the alert - (plist-get info :title) - ;; The :category of the alert - (plist-get info :category) - ;; The major-mode this alert relates to - (plist-get info :mode) - ;; The buffer the alert relates to - (plist-get info :buffer) - ;; Severity of the alert. It is one of: - ;; `urgent' - ;; `high' - ;; `moderate' - ;; `normal' - ;; `low' - ;; `trivial' - (plist-get info :severity) - ;; Whether this alert should persist, or fade away - (plist-get info :persistent) - ;; Data which was passed to `alert'. Can be - ;; anything. - (plist-get info :data)) - - ;; Removers are optional. Their job is to remove - ;; the visual or auditory effect of the alert. - :remover - (lambda (info) - ;; It is the same property list that was passed to - ;; the notifier function. - ))" - (add-to-list 'alert-styles (cons name plist)) - (put 'alert-user-configuration 'custom-type (alert-configuration-type)) - (put 'alert-define-style 'custom-type (alert-styles-radio-type 'radio))) - -(alert-define-style 'ignore :title "Ignore Alert" - :notifier #'ignore - :remover #'ignore) - -;;;###autoload -(defun* alert-add-rule (&key severity status mode category title - message predicate icon (style alert-default-style) - persistent continue never-persist append) - "Programmatically add an alert configuration rule. - -Normally, users should custoimze `alert-user-configuration'. -This facility is for module writers and users that need to do -things the Lisp way. - -Here is a rule the author currently uses with ERC, so that the -fringe gets colored whenever people chat on BitlBee: - -\(alert-add-rule :status \\='(buried visible idle) - :severity \\='(moderate high urgent) - :mode \\='erc-mode - :predicate - #\\='(lambda (info) - (string-match (concat \"\\\\`[^&].*@BitlBee\\\\\\='\") - (erc-format-target-and/or-network))) - :persistent - #\\='(lambda (info) - ;; If the buffer is buried, or the user has been - ;; idle for `alert-reveal-idle-time' seconds, - ;; make this alert persistent. Normally, alerts - ;; become persistent after - ;; `alert-persist-idle-time' seconds. - (memq (plist-get info :status) \\='(buried idle))) - :style \\='fringe - :continue t)" - (let ((rule (list (list t) style (list t)))) - (if severity - (nconc (nth 0 rule) - (list (cons :severity - (if (listp severity) - severity - (list severity)))))) - (if status - (nconc (nth 0 rule) - (list (cons :status - (if (listp status) - status - (list status)))))) - (if mode - (nconc (nth 0 rule) - (list (cons :mode - (if (stringp mode) - mode - (concat "\\`" (symbol-name mode) - "\\'")))))) - (if category - (nconc (nth 0 rule) (list (cons :category category)))) - (if title - (nconc (nth 0 rule) (list (cons :title title)))) - (if message - (nconc (nth 0 rule) (list (cons :message message)))) - (if predicate - (nconc (nth 0 rule) (list (cons :predicate predicate)))) - (if icon - (nconc (nth 0 rule) (list (cons :icon icon)))) - (setcar rule (cdr (nth 0 rule))) - - (if persistent - (nconc (nth 2 rule) (list (cons :persistent persistent)))) - (if never-persist - (nconc (nth 2 rule) (list (cons :never-persist never-persist)))) - (if continue - (nconc (nth 2 rule) (list (cons :continue continue)))) - (setcdr (cdr rule) (list (cdr (nth 2 rule)))) - - (if (null alert-internal-configuration) - (setq alert-internal-configuration (list rule)) - (if append - (nconc alert-internal-configuration (list rule)) - (setq alert-internal-configuration - (cons rule alert-internal-configuration)))) - - rule)) - -(alert-define-style 'ignore :title "Don't display alerts") - -(defun alert-log-notify (info) - (let* ((mes (plist-get info :message)) - (sev (plist-get info :severity)) - (len (length mes)) - (func (cdr (assoc sev alert-log-severity-functions)))) - (if (not (featurep 'log4e)) - (alert-legacy-log-notify mes sev len) - ;; when we get here you better be using log4e or have your logging - ;; functions defined - (if (fboundp func) - (apply func (list mes)) - (when (fboundp 'log4e:deflogger) - (log4e:deflogger "alert" "%t [%l] %m" "%H:%M:%S") - (when (functionp 'alert--log-set-level) - (alert--log-set-level alert-log-level))))))) - -(defun alert-legacy-log-notify (mes sev len) - (with-current-buffer - (get-buffer-create "*Alerts*") - (goto-char (point-max)) - (insert (format-time-string "%H:%M %p - ")) - (insert mes) - (set-text-properties (- (point) len) (point) - (list 'face (cdr (assq sev - alert-severity-faces)))) - (insert ?\n))) - -(defun alert-log-clear (info) - (if (functionp 'alert--log-clear-log) - (alert--log-clear-log) - (if (bufferp "*Alerts*") - (with-current-buffer - (get-buffer-create "*Alerts*") - (goto-char (point-max)) - (insert (format-time-string "%H:%M %p - ") - "Clear: " (plist-get info :message) - ?\n))))) - -(alert-define-style 'log :title "Log to *Alerts* buffer" - :notifier #'alert-log-notify - ;;:remover #'alert-log-clear - ) - -(defun alert-message-notify (info) - ;; the message text might contain `%' and we don't want them to be - ;; interpreted as format specifiers: - (message "%s" (plist-get info :message)) - ;;(if (memq (plist-get info :severity) '(high urgency)) - ;; (ding)) - ) - -(defun alert-message-remove (info) - (message "")) - -(alert-define-style 'message :title "Display message in minibuffer" - :notifier #'alert-message-notify - :remover #'alert-message-remove) - -(copy-face 'fringe 'alert-saved-fringe-face) - -(defun alert-fringe-notify (info) - (set-face-background 'fringe (cdr (assq (plist-get info :severity) - alert-severity-colors)))) - -(defun alert-fringe-restore (info) - (copy-face 'alert-saved-fringe-face 'fringe)) - -(alert-define-style 'fringe :title "Change the fringe color" - :notifier #'alert-fringe-notify - :remover #'alert-fringe-restore) - - -(defun alert-mode-line-notify (info) - (copy-face 'mode-line 'alert-saved-mode-line-face) - (set-face-background 'mode-line (cdr (assq (plist-get info :severity) - alert-severity-colors))) - (set-face-foreground 'mode-line "white")) - -(defun alert-mode-line-restore (info) - (copy-face 'alert-saved-mode-line-face 'mode-line)) - -(alert-define-style 'mode-line :title "Change the mode-line color" - :notifier #'alert-mode-line-notify - :remover #'alert-mode-line-restore) - - - -(defcustom alert-growl-command (executable-find "growlnotify") - "Path to the growlnotify command. -This is found in the Growl Extras: http://growl.info/extras.php." - :type 'file - :group 'alert) - -(defcustom alert-growl-priorities - '((urgent . 2) - (high . 2) - (moderate . 1) - (normal . 0) - (low . -1) - (trivial . -2)) - "A mapping of alert severities onto Growl priority values." - :type '(alist :key-type symbol :value-type integer) - :group 'alert) - -(defsubst alert-encode-string (str) - (encode-coding-string str (keyboard-coding-system))) - -(defun alert-growl-notify (info) - (if alert-growl-command - (let ((args - (list "--appIcon" "Emacs" - "--name" "Emacs" - "--title" (alert-encode-string (plist-get info :title)) - "--message" (alert-encode-string (plist-get info :message)) - "--priority" (number-to-string - (cdr (assq (plist-get info :severity) - alert-growl-priorities)))))) - (if (and (plist-get info :persistent) - (not (plist-get info :never-persist))) - (nconc args (list "--sticky"))) - (apply #'call-process alert-growl-command nil nil nil args)) - (alert-message-notify info))) - -(alert-define-style 'growl :title "Notify using Growl" - :notifier #'alert-growl-notify) - - -(defcustom alert-libnotify-command (executable-find "notify-send") - "Path to the notify-send command. -This is found in the libnotify-bin package in Debian based -systems." - :type 'file - :group 'alert) - -(defcustom alert-libnotify-priorities - '((urgent . critical) - (high . critical) - (moderate . normal) - (normal . normal) - (low . low) - (trivial . low)) - "A mapping of alert severities onto libnotify priority values." - :type '(alist :key-type symbol :value-type symbol) - :group 'alert) - -(defun alert-libnotify-notify (info) - "Send INFO using notify-send. -Handles :ICON, :CATEGORY, :SEVERITY, :PERSISTENT, :NEVER-PERSIST, :TITLE -and :MESSAGE keywords from the INFO plist. :CATEGORY can be -passed as a single symbol, a string or a list of symbols or -strings." - (if alert-libnotify-command - (let* ((args - (list "--icon" (or (plist-get info :icon) - alert-default-icon) - "--app-name" "Emacs" - "--hint" "int:transient:1" - "--urgency" (let ((urgency (cdr (assq - (plist-get info :severity) - alert-libnotify-priorities)))) - (if urgency - (symbol-name urgency) - "normal")))) - (category (plist-get info :category))) - (if (and (plist-get info :persistent) - (not (plist-get info :never-persist))) - (nconc args (list "--expire-time 0"))) - (when category - (nconc args - (list "--category" - (cond ((symbolp category) - (symbol-name category)) - ((stringp category) category) - ((listp category) - (mapconcat (if (symbolp (car category)) - #'symbol-name - #'identity) - category ",")))))) - (nconc args (list - (alert-encode-string (plist-get info :title)) - (alert-encode-string (plist-get info :message)))) - (apply #'call-process alert-libnotify-command nil - (list (get-buffer-create " *libnotify output*") t) nil args)) - (alert-message-notify info))) - -(alert-define-style 'libnotify :title "Notify using libnotify" - :notifier #'alert-libnotify-notify) - - -(defcustom alert-gntp-icon - "http://cvs.savannah.gnu.org/viewvc/*checkout*/emacs/emacs/etc/images/icons/hicolor/48x48/apps/emacs.png" - "Icon file using gntp." - :type 'string - :group 'alert) - -(when (featurep 'gntp) -(defun alert-gntp-notify (info) - (gntp-notify 'alert - (alert-encode-string (plist-get info :title)) - (alert-encode-string (plist-get info :message)) - gntp-server nil - (number-to-string - (cdr (assq (plist-get info :severity) - alert-growl-priorities))) - (if (eq (plist-get info :icon) nil) - alert-gntp-icon - (plist-get info :icon))) - (alert-message-notify info)) - -(alert-define-style 'gntp :title "Notify using gntp" - :notifier #'alert-gntp-notify)) - - -(defcustom alert-notifications-priorities - '((urgent . critical) - (high . critical) - (moderate . normal) - (normal . normal) - (low . low) - (trivial . low)) - "A mapping of alert severities onto Growl priority values." - :type '(alist :key-type symbol :value-type integer) - :group 'alert) - -(when (featurep 'notifications) -(defun alert-notifications-notify (info) - (notifications-notify :title (plist-get info :title) - :body (plist-get info :message) - :app-icon (plist-get info :icon) - :urgency (cdr (assq (plist-get info :severity) - alert-notifications-priorities)) -) - (alert-message-notify info)) - -(alert-define-style 'notifications :title "Notify using notifications" - :notifier #'alert-notifications-notify)) - - -(defcustom alert-notifier-command (executable-find "terminal-notifier") - "Path to the terminal-notifier command. -From https://github.com/alloy/terminal-notifier." - :type 'file - :group 'alert) - -(defun alert-notifier-notify (info) - (if alert-notifier-command - (let ((args - (list "-title" (alert-encode-string (plist-get info :title)) - "-sender" "org.gnu.Emacs" - "-message" (alert-encode-string (plist-get info :message))))) - (apply #'call-process alert-notifier-command nil nil nil args)) - (alert-message-notify info))) - -(alert-define-style 'notifier :title "Notify using terminal-notifier" - :notifier #'alert-notifier-notify) - -(defun alert-osx-notifier-notify (info) - (apply #'call-process (format "osascript -e 'display notification %S with title %S'" - (alert-encode-string (plist-get info :message)) - (alert-encode-string (plist-get info :title)))) - (alert-message-notify info)) - -(alert-define-style 'osx-notifier :title "Notify using native OSX notification" :notifier #'alert-osx-notifier-notify) - -(defun alert-frame-notify (info) - (let ((buf (plist-get info :buffer))) - (if (eq (alert-buffer-status buf) 'buried) - (let ((current-frame (selected-frame))) - (with-selected-frame - (make-frame '((width . 80) - (height . 20) - (top . -1) - (left . 0) - (left-fringe . 0) - (right-fringe . 0) - (tool-bar-lines . nil) - (menu-bar-lines . nil) - (vertical-scroll-bars . nil) - (unsplittable . t) - (has-modeline-p . nil) - (minibuffer . nil))) - (switch-to-buffer buf) - ;;(set (make-local-variable 'mode-line-format) nil) - (nconc info (list :frame (selected-frame)))) - (select-frame current-frame))))) - -(defun alert-frame-remove (info) - (unless (eq this-command 'handle-switch-frame) - (delete-frame (plist-get info :frame) t))) - -(defcustom alert-toaster-default-icon - (let ((exec-bin (executable-find "emacs.exe"))) - (cond (exec-bin - (concat (file-name-directory exec-bin) "../share/icons/hicolor/128x128/apps/emacs.png")) - (t nil))) - "Icon file using toaster." - :type 'string - :group 'alert - ) - -(defcustom alert-toaster-command (executable-find "toast") - "Path to the toast command. -This is found at https://github.com/nels-o/toaster." - :type 'file - :group 'alert - ) - -(defun alert-toaster-notify (info) - (if alert-toaster-command - (let ((args (list - "-t" (alert-encode-string (plist-get info :title)) - "-m" (alert-encode-string (plist-get info :message)) - "-p" (expand-file-name (or (plist-get info :icon) alert-toaster-default-icon)) - ))) - (apply #'call-process alert-toaster-command nil nil nil args)) - (alert-message-notify info))) - -(alert-define-style 'toaster :title "Notify using Toaster" - :notifier #'alert-toaster-notify) - -;; jww (2011-08-25): Not quite working yet -;;(alert-define-style 'frame :title "Popup buffer in a frame" -;; :notifier #'alert-frame-notify -;; :remover #'alert-frame-remove) - -(defun alert-buffer-status (&optional buffer) - (with-current-buffer (or buffer (current-buffer)) - (let ((wind (get-buffer-window))) - (if wind - (if (eq wind (selected-window)) - (if (and (current-idle-time) - (> (float-time (current-idle-time)) - alert-reveal-idle-time)) - 'idle - 'selected) - 'visible) - 'buried)))) - -(defvar alert-active-alerts nil) - -(defun alert-remove-when-active (remover info) - (let ((idle-time (and (current-idle-time) - (float-time (current-idle-time))))) - (cond - ((and idle-time (> idle-time alert-persist-idle-time))) - ((and idle-time (> idle-time alert-reveal-idle-time)) - (run-with-timer alert-fade-time nil - #'alert-remove-when-active remover info)) - (t - (funcall remover info))))) - -(defun alert-remove-on-command () - (let (to-delete) - (dolist (alert alert-active-alerts) - (when (eq (current-buffer) (nth 0 alert)) - (push alert to-delete) - (if (nth 2 alert) - (funcall (nth 2 alert) (nth 1 alert))))) - (dolist (alert to-delete) - (setq alert-active-alerts (delq alert alert-active-alerts))))) - -(defun alert-send-notification - (alert-buffer info style-def &optional persist never-per) - (let ((notifier (plist-get style-def :notifier))) - (if notifier - (funcall notifier info))) - (let ((remover (plist-get style-def :remover))) - (add-to-list 'alert-active-alerts (list alert-buffer info remover)) - (with-current-buffer alert-buffer - (add-hook 'post-command-hook #'alert-remove-on-command nil t)) - (if (and remover (or (not persist) never-per)) - (run-with-timer alert-fade-time nil - #'alert-remove-when-active - remover info)))) - -;;;###autoload -(defun* alert (message &key (severity 'normal) title icon category - buffer mode data style persistent never-persist) - "Alert the user that something has happened. -MESSAGE is what the user will see. You may also use keyword -arguments to specify additional details. Here is a full example: - -\(alert \"This is a message\" - :severity \\='high ;; The default severity is `normal' - :title \"Title\" ;; An optional title - :category \\='example ;; A symbol to identify the message - :mode \\='text-mode ;; Normally determined automatically - :buffer (current-buffer) ;; This is the default - :data nil ;; Unused by alert.el itself - :persistent nil ;; Force the alert to be persistent; - ;; it is best not to use this - :never-persist nil ;; Force this alert to never persist - :style \\='fringe) ;; Force a given style to be used; - ;; this is only for debugging! - -If no :title is given, the buffer-name of :buffer is used. If -:buffer is nil, it is the current buffer at the point of call. - -:data is an opaque value which modules can pass through to their -own styles if they wish. - -Here are some more typical examples of usage: - - ;; This is the most basic form usage - (alert \"This is an alert\") - - ;; You can adjust the severity for more important messages - (alert \"This is an alert\" :severity \\='high) - - ;; Or decrease it for purely informative ones - (alert \"This is an alert\" :severity \\='trivial) - - ;; Alerts can have optional titles. Otherwise, the title is the - ;; buffer-name of the (current-buffer) where the alert originated. - (alert \"This is an alert\" :title \"My Alert\") - - ;; Further, alerts can have categories. This allows users to - ;; selectively filter on them. - (alert \"This is an alert\" :title \"My Alert\" - :category \\='some-category-or-other)" - (destructuring-bind - (alert-buffer current-major-mode current-buffer-status - current-buffer-name) - (with-current-buffer (or buffer (current-buffer)) - (list (current-buffer) - (or mode major-mode) - (alert-buffer-status) - (buffer-name))) - - (let ((base-info (list :message message - :title (or title current-buffer-name) - :icon icon - :severity severity - :category category - :buffer alert-buffer - :mode current-major-mode - :data data)) - matched) - - (if alert-log-messages - (alert-log-notify base-info)) - - (unless alert-hide-all-notifications - (catch 'finish - (dolist (config (append alert-user-configuration - alert-internal-configuration)) - (let* ((style-def (cdr (assq (or style (nth 1 config)) - alert-styles))) - (options (nth 2 config)) - (persist-p (or persistent - (cdr (assq :persistent options)))) - (persist (if (functionp persist-p) - (funcall persist-p base-info) - persist-p)) - (never-persist-p - (or never-persist - (cdr (assq :never-persist options)))) - (never-per (if (functionp never-persist-p) - (funcall never-persist-p base-info) - never-persist-p)) - (continue (cdr (assq :continue options))) - info) - (setq info (if (not (memq :persistent base-info)) - (append base-info (list :persistent persist)) - base-info) - info (if (not (memq :never-persist info)) - (append info (list :never-persist never-per)) - info)) - (when - (or style ; :style always "matches", for testing - (not - (memq - nil - (mapcar - #'(lambda (condition) - (case (car condition) - (:severity - (memq severity (cdr condition))) - (:status - (memq current-buffer-status (cdr condition))) - (:mode - (string-match - (cdr condition) - (symbol-name current-major-mode))) - (:category - (and category (string-match - (cdr condition) - (if (stringp category) - category - (symbol-name category))))) - (:title - (and title - (string-match (cdr condition) title))) - (:message - (string-match (cdr condition) message)) - (:predicate - (funcall (cdr condition) info)) - (:icon - (string-match (cdr condition) icon)))) - (nth 0 config))))) - - (alert-send-notification alert-buffer info style-def - persist never-per) - (setq matched t) - (if (or style (not (if (functionp continue) - (funcall continue info) - continue))) - (throw 'finish t))))))) - - (if (and (not matched) alert-default-style) - (alert-send-notification alert-buffer base-info - (cdr (assq alert-default-style - alert-styles))))))) - -(provide 'alert) - -;;; alert.el ends here diff --git a/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-autoloads.el b/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-autoloads.el deleted file mode 100644 index ac1f97a..0000000 --- a/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-autoloads.el +++ /dev/null @@ -1,73 +0,0 @@ -;;; ascii-art-to-unicode-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "ascii-art-to-unicode" "ascii-art-to-unicode.el" -;;;;;; (22505 22834 381650 654000)) -;;; Generated autoloads from ascii-art-to-unicode.el - -(autoload 'aa2u "ascii-art-to-unicode" "\ -Convert simple ASCII art line drawings to Unicode. -Specifically, perform the following replacements: - - - (hyphen) BOX DRAWINGS LIGHT HORIZONTAL - | (vertical bar) BOX DRAWINGS LIGHT VERTICAL - + (plus) (one of) - BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL - BOX DRAWINGS LIGHT DOWN AND RIGHT - BOX DRAWINGS LIGHT DOWN AND LEFT - BOX DRAWINGS LIGHT UP AND RIGHT - BOX DRAWINGS LIGHT UP AND LEFT - BOX DRAWINGS LIGHT VERTICAL AND RIGHT - BOX DRAWINGS LIGHT VERTICAL AND LEFT - BOX DRAWINGS LIGHT UP AND HORIZONTAL - BOX DRAWINGS LIGHT DOWN AND HORIZONTAL - BOX DRAWINGS LIGHT UP - BOX DRAWINGS LIGHT DOWN - BOX DRAWINGS LIGHT LEFT - BOX DRAWINGS LIGHT RIGHT - QUESTION MARK - -More precisely, hyphen and vertical bar are substituted unconditionally, -first, and plus is substituted with a character depending on its north, -south, east and west neighbors. - -NB: Actually, `aa2u' can also use \"HEAVY\" instead of \"LIGHT\", -depending on the value of variable `aa2u-uniform-weight'. - -This command operates on either the active region, -or the accessible portion otherwise. - -\(fn BEG END &optional INTERACTIVE)" t nil) - -(autoload 'aa2u-rectangle "ascii-art-to-unicode" "\ -Like `aa2u' on the region-rectangle. -When called from a program the rectangle's corners -are START (top left) and END (bottom right). - -\(fn START END)" t nil) - -(autoload 'aa2u-mark-as-text "ascii-art-to-unicode" "\ -Set property `aa2u-text' of the text from START to END. -This prevents `aa2u' from misinterpreting \"|\", \"-\" and \"+\" -in that region as lines and intersections to be replaced. -Prefix arg means to remove property `aa2u-text', instead. - -\(fn START END &optional UNMARK)" t nil) - -(autoload 'aa2u-mark-rectangle-as-text "ascii-art-to-unicode" "\ -Like `aa2u-mark-as-text' on the region-rectangle. -When called from a program the rectangle's corners -are START (top left) and END (bottom right). - -\(fn START END &optional UNMARK)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; ascii-art-to-unicode-autoloads.el ends here diff --git a/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-pkg.el b/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-pkg.el deleted file mode 100644 index 5fbb02b..0000000 --- a/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "ascii-art-to-unicode" "1.9" "a small artist adjunct" 'nil :url "http://www.gnuvola.org/software/aa2u/" :keywords '("ascii" "unicode" "box-drawing")) diff --git a/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode.el b/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode.el deleted file mode 100644 index 83be00d..0000000 --- a/elpa/ascii-art-to-unicode-1.9/ascii-art-to-unicode.el +++ /dev/null @@ -1,510 +0,0 @@ -;;; ascii-art-to-unicode.el --- a small artist adjunct -*- lexical-binding: t -*- - -;; Copyright (C) 2014 Free Software Foundation, Inc. - -;; Author: Thien-Thi Nguyen -;; Maintainer: Thien-Thi Nguyen -;; Version: 1.9 -;; Keywords: ascii, unicode, box-drawing -;; URL: http://www.gnuvola.org/software/aa2u/ - -;; 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 3 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 . - -;;; Commentary: - -;; The command `aa2u' converts simple ASCII art line drawings in -;; the {active,accessible} region of the current buffer to Unicode. -;; Command `aa2u-rectangle' is like `aa2u', but works on rectangles. -;; -;; Example use case: -;; - M-x artist-mode RET -;; - C-c C-a r ; artist-select-op-rectangle -;; - (draw two rectangles) -;; -;; +---------------+ -;; | | -;; | +-------+--+ -;; | | | | -;; | | | | -;; | | | | -;; +-------+-------+ | -;; | | -;; | | -;; | | -;; +----------+ -;; -;; - C-c C-c ; artist-mode-off (optional) -;; - C-x n n ; narrow-to-region -;; - M-x aa2u RET -;; -;; ┌───────────────┐ -;; │ │ -;; │ ┌───────┼──┐ -;; │ │ │ │ -;; │ │ │ │ -;; │ │ │ │ -;; └───────┼───────┘ │ -;; │ │ -;; │ │ -;; │ │ -;; └──────────┘ -;; -;; Much easier on the eyes now! -;; -;; Normally, lines are drawn with the `LIGHT' weight. If you set var -;; `aa2u-uniform-weight' to symbol `HEAVY', you will see, instead: -;; -;; ┏━━━━━━━━━━━━━━━┓ -;; ┃ ┃ -;; ┃ ┏━━━━━━━╋━━┓ -;; ┃ ┃ ┃ ┃ -;; ┃ ┃ ┃ ┃ -;; ┃ ┃ ┃ ┃ -;; ┗━━━━━━━╋━━━━━━━┛ ┃ -;; ┃ ┃ -;; ┃ ┃ -;; ┃ ┃ -;; ┗━━━━━━━━━━┛ -;; -;; To protect particular ‘|’, ‘-’ or ‘+’ characters from conversion, -;; you can set the property `aa2u-text' on that text with command -;; `aa2u-mark-as-text'. A prefix arg clears the property, instead. -;; (You can use `describe-text-properties' to check.) For example: -;; -;; ┌───────────────────┐ -;; │ │ -;; │ |\/| │ -;; │ `Oo' --Oop Ack! │ -;; │ ^&-MM. │ -;; │ │ -;; └─────────┬─────────┘ -;; │ -;; """"""""" -;; -;; Command `aa2u-mark-rectangle-as-text' is similar, for rectangles. -;; -;; Tip: For best results, you should make sure all the tab characaters -;; are converted to spaces. See: `untabify', `indent-tabs-mode'. - -;;; Code: - -(require 'cl-lib) -(require 'pcase) - -(autoload 'apply-on-rectangle "rect") - -(defvar aa2u-uniform-weight 'LIGHT - "A symbol, either `LIGHT' or `HEAVY'. -This specifies the weight of all the lines.") - -;;;--------------------------------------------------------------------------- -;;; support - -(defsubst aa2u--text-p (pos) - (get-text-property pos 'aa2u-text)) - -(defun aa2u-ucs-bd-uniform-name (&rest components) - "Return a string naming UCS char w/ WEIGHT and COMPONENTS. -The string begins with \"BOX DRAWINGS\"; followed by the weight -as per variable `aa2u-uniform-weight', followed by COMPONENTS, -a list of one or two symbols from the set: - - VERTICAL - HORIZONTAL - DOWN - UP - RIGHT - LEFT - -If of length two, the first element in COMPONENTS should be -the \"Y-axis\" (VERTICAL, DOWN, UP). In that case, the returned -string includes \"AND\" between the elements of COMPONENTS. - -Lastly, all words are separated by space (U+20)." - (format "BOX DRAWINGS %s %s" - aa2u-uniform-weight - (mapconcat 'symbol-name components - " AND "))) - -(defun aa2u-1c (stringifier &rest components) - "Apply STRINGIFIER to COMPONENTS; return the UCS char w/ this name. -The char is a string (of length one), with two properties: - - aa2u-stringifier - aa2u-components - -Their values are STRINGIFIER and COMPONENTS, respectively." - (let ((s (string (cdr (assoc-string (apply stringifier components) - (ucs-names)))))) - (propertize s - 'aa2u-stringifier stringifier - 'aa2u-components components))) - -(defun aa2u-phase-1 () - (cl-flet - ((gsr (was name) - (goto-char (point-min)) - (let ((now (aa2u-1c 'aa2u-ucs-bd-uniform-name name))) - (while (search-forward was nil t) - (unless (aa2u--text-p (match-beginning 0)) - (replace-match now t t)))))) - (gsr "|" 'VERTICAL) - (gsr "-" 'HORIZONTAL))) - -(defun aa2u-replacement (pos) - (let ((cc (- pos (line-beginning-position)))) - (cl-flet* - ((ok (name pos) - (when (or - ;; Infer LIGHTness between "snug" ‘?+’es. - ;; | - ;; +-----------++--+ + - ;; | somewhere ++--+---+-+----+ - ;; +-+---------+ nowhere |+--+ - ;; + +---------++ - ;; | +---| - (eq ?+ (char-after pos)) - ;; Require properly directional neighborliness. - (memq (cl-case name - ((UP DOWN) 'VERTICAL) - ((LEFT RIGHT) 'HORIZONTAL)) - (get-text-property pos 'aa2u-components))) - name)) - (v (name dir) (let ((bol (line-beginning-position dir)) - (eol (line-end-position dir))) - (when (< cc (- eol bol)) - (ok name (+ bol cc))))) - (h (name dir) (let ((bol (line-beginning-position)) - (eol (line-end-position)) - (pos (+ pos dir))) - (unless (or (> bol pos) - (<= eol pos)) - (ok name pos)))) - (two-p (ls) (= 2 (length ls))) - (just (&rest args) (delq nil args))) - (apply 'aa2u-1c - 'aa2u-ucs-bd-uniform-name - (just (pcase (just (v 'UP 0) - (v 'DOWN 2)) - ((pred two-p) 'VERTICAL) - (`(,vc) vc) - (_ nil)) - (pcase (just (h 'LEFT -1) - (h 'RIGHT 1)) - ((pred two-p) 'HORIZONTAL) - (`(,hc) hc) - (_ nil))))))) - -(defun aa2u-phase-2 () - (goto-char (point-min)) - (let (changes) - ;; (phase 2.1 -- what WOULD change) - ;; This is for the benefit of ‘aa2u-replacement ok’, which - ;; otherwise (monolithic phase 2) would need to convert the - ;; "properly directional neighborliness" impl from a simple - ;; ‘memq’ to an ‘intersction’. - (while (search-forward "+" nil t) - (let ((p (point))) - (unless (aa2u--text-p (1- p)) - (push (cons p (or (aa2u-replacement (1- p)) - "?")) - changes)))) - ;; (phase 2.2 -- apply changes) - (dolist (ch changes) - (goto-char (car ch)) - (delete-char -1) - (insert (cdr ch))))) - -(defun aa2u-phase-3 () - (remove-text-properties (point-min) (point-max) - (list 'aa2u-stringifier nil - 'aa2u-components nil))) - -;;;--------------------------------------------------------------------------- -;;; commands - -;;;###autoload -(defun aa2u (beg end &optional interactive) - "Convert simple ASCII art line drawings to Unicode. -Specifically, perform the following replacements: - - - (hyphen) BOX DRAWINGS LIGHT HORIZONTAL - | (vertical bar) BOX DRAWINGS LIGHT VERTICAL - + (plus) (one of) - BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL - BOX DRAWINGS LIGHT DOWN AND RIGHT - BOX DRAWINGS LIGHT DOWN AND LEFT - BOX DRAWINGS LIGHT UP AND RIGHT - BOX DRAWINGS LIGHT UP AND LEFT - BOX DRAWINGS LIGHT VERTICAL AND RIGHT - BOX DRAWINGS LIGHT VERTICAL AND LEFT - BOX DRAWINGS LIGHT UP AND HORIZONTAL - BOX DRAWINGS LIGHT DOWN AND HORIZONTAL - BOX DRAWINGS LIGHT UP - BOX DRAWINGS LIGHT DOWN - BOX DRAWINGS LIGHT LEFT - BOX DRAWINGS LIGHT RIGHT - QUESTION MARK - -More precisely, hyphen and vertical bar are substituted unconditionally, -first, and plus is substituted with a character depending on its north, -south, east and west neighbors. - -NB: Actually, `aa2u' can also use \"HEAVY\" instead of \"LIGHT\", -depending on the value of variable `aa2u-uniform-weight'. - -This command operates on either the active region, -or the accessible portion otherwise." - (interactive "r\np") - ;; This weirdness, along w/ the undocumented "p" in the ‘interactive’ - ;; form, is to allow ‘M-x aa2u’ (interactive invocation) w/ no region - ;; selected to default to the accessible portion (as documented), which - ;; was the norm in ascii-art-to-unicode.el prior to 1.5. A bugfix, - ;; essentially. This is ugly, unfortunately -- is there a better way?! - (when (and interactive (not (region-active-p))) - (setq beg (point-min) - end (point-max))) - (save-excursion - (save-restriction - (widen) - (narrow-to-region beg end) - (aa2u-phase-1) - (aa2u-phase-2) - (aa2u-phase-3)))) - -;;;###autoload -(defun aa2u-rectangle (start end) - "Like `aa2u' on the region-rectangle. -When called from a program the rectangle's corners -are START (top left) and END (bottom right)." - (interactive "r") - (let* ((was (delete-extract-rectangle start end)) - (now (with-temp-buffer - (insert-rectangle was) - (aa2u (point) (mark)) - (extract-rectangle (point-min) (point-max))))) - (goto-char (min start end)) - (insert-rectangle now))) - -;;;###autoload -(defun aa2u-mark-as-text (start end &optional unmark) - "Set property `aa2u-text' of the text from START to END. -This prevents `aa2u' from misinterpreting \"|\", \"-\" and \"+\" -in that region as lines and intersections to be replaced. -Prefix arg means to remove property `aa2u-text', instead." - (interactive "r\nP") - (funcall (if unmark - 'remove-text-properties - 'add-text-properties) - start end - '(aa2u-text t))) - -;;;###autoload -(defun aa2u-mark-rectangle-as-text (start end &optional unmark) - "Like `aa2u-mark-as-text' on the region-rectangle. -When called from a program the rectangle's corners -are START (top left) and END (bottom right)." - (interactive "r\nP") - (apply-on-rectangle - (lambda (scol ecol unmark) - (let ((p (point))) - (aa2u-mark-as-text (+ p scol) (+ p ecol) unmark))) - start end - unmark)) - -;;;--------------------------------------------------------------------------- -;;; that's it - -;;;; ChangeLog: - -;; 2014-05-29 Thien-Thi Nguyen -;; -;; [aa2u] Release: 1.9 -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Version]: Bump -;; to "1.9". -;; -;; 2014-05-29 Thien-Thi Nguyen -;; -;; [aa2u] Mention TAB infelicity. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Commentary]: -;; ...here. -;; -;; 2014-05-29 Thien-Thi Nguyen -;; -;; [aa2u] Update homepage; drop other links. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [URL]: New -;; header. -;; [Commentary]: Remove the HACKING and Tip Jar links. -;; -;; 2014-05-29 Thien-Thi Nguyen -;; -;; [aa2u] New command: aa2u-mark-rectangle-as-text -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el: Arrange to -;; autoload "rect" for ‘apply-on-rectangle’. -;; (aa2u-mark-rectangle-as-text): New command, w/ autoload cookie. -;; -;; 2014-05-24 Thien-Thi Nguyen -;; -;; [aa2u maint] Mention TAB infelicity in HACKING; nfc. -;; -;; 2014-05-21 Thien-Thi Nguyen -;; -;; [aa2u] Release: 1.8 -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Version]: Bump -;; to "1.8". -;; -;; 2014-05-21 Thien-Thi Nguyen -;; -;; [aa2u] New command: aa2u-mark-as-text -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el -;; (aa2u--text-p): New defsubst. -;; (aa2u-phase-1, aa2u-phase-2): If the character in question is -;; ‘aa2u--text-p’, just ignore it. -;; (aa2u-mark-as-text): New command, w/ autoload cookie. -;; -;; 2014-05-21 Thien-Thi Nguyen -;; -;; [aa2u int] Add abstraction: gsr -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el -;; (aa2u-phase-1 gsr): New internal func. -;; -;; 2014-05-21 Thien-Thi Nguyen -;; -;; [aa2u] Declare package keywords. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Keywords]: New -;; header. -;; -;; 2014-05-21 Thien-Thi Nguyen -;; -;; [aa2u maint] Add ‘Maintainer’ header per top-level README; nfc. -;; -;; 2014-05-11 Thien-Thi Nguyen -;; -;; [aa2u] Release: 1.7 -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Version]: Bump -;; to "1.7". -;; -;; 2014-05-11 Thien-Thi Nguyen -;; -;; [aa2u] New command: aa2u-rectangle -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el -;; (aa2u-rectangle): New command. -;; -;; 2014-05-11 Andreas Schwab -;; -;; ascii-art-to-unicode.el (aa2u-replacement): Use cl-case instead of -;; case. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; fixup! [aa2u] Make weight dynamically customizable. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; [aa2u maint] Update HACKING; nfc. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; [aa2u] Make weight dynamically customizable. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el -;; (aa2u-uniform-weight): New defvar. -;; (aa2u-ucs-bd-uniform-name): Don't take arg WEIGHT; instead, consult -;; ‘aa2u-uniform-weight’. -;; (aa2u-phase-1, aa2u-replacement): Update calls to -;; ‘aa2u-ucs-bd-uniform-name’. -;; (aa2u): Mention new var in docstring. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; [aa2u int] Compute vertical/horizontal components separately. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el -;; (aa2u-replacement ok): Recognize ‘UP’, ‘DOWN’, ‘LEFT’, ‘RIGHT’ instead -;; of ‘n’, ‘s’, ‘w’, ‘e’. -;; (aa2u-replacement two-p): New internal func. -;; (aa2u-replacement just): Likewise. -;; (aa2u-replacement): Don't glom everything for one ‘pcase’; instead, -;; construct args to ‘aa2u-ucs-bd-uniform-name’ by computing vertical and -;; horizontal components separately. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; [aa2u int] Don't use ‘cl-labels’ when ‘cl-flet*’ will do. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el -;; (aa2u-replacement): ...here. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; [aa2u int] Add "Tip Jar" URL in Commentary; nfc. -;; -;; 2014-05-09 Thien-Thi Nguyen -;; -;; [aa2u maint] Extract NEWS and HACKING to separate files; nfc. -;; -;; 2014-05-08 Thien-Thi Nguyen -;; -;; [aa2u] Release: 1.6 -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Version]: Bump -;; to "1.6". -;; -;; 2014-05-08 Thien-Thi Nguyen -;; -;; [aa2u] Fix bug: Make ‘M-x aa2u’ operate on accessible portion. -;; -;; Regression introduced 2014-04-03, "Make ‘aa2u’ region-aware". -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el (aa2u): Take -;; optional arg INTERACTIVE; add "p" to ‘interactive’ form; when -;; INTERACTIVE and region is not active, set BEG, END. -;; -;; 2014-04-03 Thien-Thi Nguyen -;; -;; [aa2u] Release: 1.5 -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el [Version]: Bump -;; to "1.5". -;; -;; 2014-04-03 Thien-Thi Nguyen -;; -;; [aa2u] Make ‘aa2u’ region-aware. -;; -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el (aa2u): Take -;; args BEG and END; use "r" in ‘interactive’ spec; don't bother w/ -;; internal func ‘do-it!’. -;; -;; 2014-01-14 Thien-Thi Nguyen -;; -;; New package: ascii-art-to-unicode -;; -;; * packages/ascii-art-to-unicode/: New dir. -;; * packages/ascii-art-to-unicode/ascii-art-to-unicode.el: New file. -;; - - -(provide 'ascii-art-to-unicode) - -;;; ascii-art-to-unicode.el ends here diff --git a/elpa/async-20161010.2322/async-autoloads.el b/elpa/async-20161010.2322/async-autoloads.el deleted file mode 100644 index e5ee731..0000000 --- a/elpa/async-20161010.2322/async-autoloads.el +++ /dev/null @@ -1,131 +0,0 @@ -;;; async-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "async" "async.el" (22525 59329 588470 914000)) -;;; Generated autoloads from async.el - -(autoload 'async-start-process "async" "\ -Start the executable PROGRAM asynchronously. See `async-start'. -PROGRAM is passed PROGRAM-ARGS, calling FINISH-FUNC with the -process object when done. If FINISH-FUNC is nil, the future -object will return the process object when the program is -finished. Set DEFAULT-DIRECTORY to change PROGRAM's current -working directory. - -\(fn NAME PROGRAM FINISH-FUNC &rest PROGRAM-ARGS)" nil nil) - -(autoload 'async-start "async" "\ -Execute START-FUNC (often a lambda) in a subordinate Emacs process. -When done, the return value is passed to FINISH-FUNC. Example: - - (async-start - ;; What to do in the child process - (lambda () - (message \"This is a test\") - (sleep-for 3) - 222) - - ;; What to do when it finishes - (lambda (result) - (message \"Async process done, result should be 222: %s\" - result))) - -If FINISH-FUNC is nil or missing, a future is returned that can -be inspected using `async-get', blocking until the value is -ready. Example: - - (let ((proc (async-start - ;; What to do in the child process - (lambda () - (message \"This is a test\") - (sleep-for 3) - 222)))) - - (message \"I'm going to do some work here\") ;; .... - - (message \"Waiting on async process, result should be 222: %s\" - (async-get proc))) - -If you don't want to use a callback, and you don't care about any -return value from the child process, pass the `ignore' symbol as -the second argument (if you don't, and never call `async-get', it -will leave *emacs* process buffers hanging around): - - (async-start - (lambda () - (delete-file \"a remote file on a slow link\" nil)) - 'ignore) - -Note: Even when FINISH-FUNC is present, a future is still -returned except that it yields no value (since the value is -passed to FINISH-FUNC). Call `async-get' on such a future always -returns nil. It can still be useful, however, as an argument to -`async-ready' or `async-wait'. - -\(fn START-FUNC &optional FINISH-FUNC)" nil nil) - -;;;*** - -;;;### (autoloads nil "async-bytecomp" "async-bytecomp.el" (22525 -;;;;;; 59329 584470 885000)) -;;; Generated autoloads from async-bytecomp.el - -(autoload 'async-byte-recompile-directory "async-bytecomp" "\ -Compile all *.el files in DIRECTORY asynchronously. -All *.elc files are systematically deleted before proceeding. - -\(fn DIRECTORY &optional QUIET)" nil nil) - -(defvar async-bytecomp-package-mode nil "\ -Non-nil if Async-Bytecomp-Package mode is enabled. -See the `async-bytecomp-package-mode' command -for a description of this minor mode. -Setting this variable directly does not take effect; -either customize it (see the info node `Easy Customization') -or call the function `async-bytecomp-package-mode'.") - -(custom-autoload 'async-bytecomp-package-mode "async-bytecomp" nil) - -(autoload 'async-bytecomp-package-mode "async-bytecomp" "\ -Byte compile asynchronously packages installed with package.el. -Async compilation of packages can be controlled by -`async-bytecomp-allowed-packages'. - -\(fn &optional ARG)" t nil) - -;;;*** - -;;;### (autoloads nil "dired-async" "dired-async.el" (22525 59329 -;;;;;; 572470 801000)) -;;; Generated autoloads from dired-async.el - -(defvar dired-async-mode nil "\ -Non-nil if Dired-Async mode is enabled. -See the `dired-async-mode' command -for a description of this minor mode. -Setting this variable directly does not take effect; -either customize it (see the info node `Easy Customization') -or call the function `dired-async-mode'.") - -(custom-autoload 'dired-async-mode "dired-async" nil) - -(autoload 'dired-async-mode "dired-async" "\ -Do dired actions asynchronously. - -\(fn &optional ARG)" t nil) - -;;;*** - -;;;### (autoloads nil nil ("async-pkg.el" "smtpmail-async.el") (22525 -;;;;;; 59329 592470 942000)) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; async-autoloads.el ends here diff --git a/elpa/async-20161010.2322/async-bytecomp.el b/elpa/async-20161010.2322/async-bytecomp.el deleted file mode 100644 index 2c96da0..0000000 --- a/elpa/async-20161010.2322/async-bytecomp.el +++ /dev/null @@ -1,177 +0,0 @@ -;;; async-bytecomp.el --- Compile elisp files asynchronously -*- lexical-binding: t -*- - -;; Copyright (C) 2014-2016 Free Software Foundation, Inc. - -;; Authors: John Wiegley -;; Thierry Volpiatto - -;; Keywords: dired async byte-compile -;; X-URL: https://github.com/jwiegley/dired-async - -;; 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, 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: -;; -;; This package provide the `async-byte-recompile-directory' function -;; which allows, as the name says to recompile a directory outside of -;; your running emacs. -;; The benefit is your files will be compiled in a clean environment without -;; the old *.el files loaded. -;; Among other things, this fix a bug in package.el which recompile -;; the new files in the current environment with the old files loaded, creating -;; errors in most packages after upgrades. -;; -;; NB: This package is advicing the function `package--compile'. - -;;; Code: - -(require 'cl-lib) -(require 'async) - -(defcustom async-bytecomp-allowed-packages - '(async helm helm-core helm-ls-git helm-ls-hg magit) - "Packages in this list will be compiled asynchronously by `package--compile'. -All the dependencies of these packages will be compiled async too, -so no need to add dependencies to this list. -The value of this variable can also be a list with a single element, -the symbol `all', in this case packages are always compiled asynchronously." - :group 'async - :type '(repeat (choice symbol))) - -(defvar async-byte-compile-log-file "~/.emacs.d/async-bytecomp.log") - -;;;###autoload -(defun async-byte-recompile-directory (directory &optional quiet) - "Compile all *.el files in DIRECTORY asynchronously. -All *.elc files are systematically deleted before proceeding." - (cl-loop with dir = (directory-files directory t "\\.elc\\'") - unless dir return nil - for f in dir - when (file-exists-p f) do (delete-file f)) - ;; Ensure async is reloaded when async.elc is deleted. - ;; This happen when recompiling its own directory. - (load "async") - (let ((call-back - (lambda (&optional _ignore) - (if (file-exists-p async-byte-compile-log-file) - (let ((buf (get-buffer-create byte-compile-log-buffer)) - (n 0)) - (with-current-buffer buf - (goto-char (point-max)) - (let ((inhibit-read-only t)) - (insert-file-contents async-byte-compile-log-file) - (compilation-mode)) - (display-buffer buf) - (delete-file async-byte-compile-log-file) - (unless quiet - (save-excursion - (goto-char (point-min)) - (while (re-search-forward "^.*:Error:" nil t) - (cl-incf n))) - (if (> n 0) - (message "Failed to compile %d files in directory `%s'" n directory) - (message "Directory `%s' compiled asynchronously with warnings" directory))))) - (unless quiet - (message "Directory `%s' compiled asynchronously with success" directory)))))) - (async-start - `(lambda () - (require 'bytecomp) - ,(async-inject-variables "\\`\\(load-path\\)\\|byte\\'") - (let ((default-directory (file-name-as-directory ,directory)) - error-data) - (add-to-list 'load-path default-directory) - (byte-recompile-directory ,directory 0 t) - (when (get-buffer byte-compile-log-buffer) - (setq error-data (with-current-buffer byte-compile-log-buffer - (buffer-substring-no-properties (point-min) (point-max)))) - (unless (string= error-data "") - (with-temp-file ,async-byte-compile-log-file - (erase-buffer) - (insert error-data)))))) - call-back) - (unless quiet (message "Started compiling asynchronously directory %s" directory)))) - -(defvar package-archive-contents) -(defvar package-alist) -(declare-function package-desc-reqs "package.el" (cl-x)) - -(defun async-bytecomp--get-package-deps (pkg &optional only) - ;; Same as `package--get-deps' but parse instead `package-archive-contents' - ;; because PKG is not already installed and not present in `package-alist'. - ;; However fallback to `package-alist' in case PKG no more present - ;; in `package-archive-contents' due to modification to `package-archives'. - ;; See issue #58. - (let* ((pkg-desc (cadr (or (assq pkg package-archive-contents) - (assq pkg package-alist)))) - (direct-deps (cl-loop for p in (package-desc-reqs pkg-desc) - for name = (car p) - when (or (assq name package-archive-contents) - (assq name package-alist)) - collect name)) - (indirect-deps (unless (eq only 'direct) - (delete-dups - (cl-loop for p in direct-deps append - (async-bytecomp--get-package-deps p)))))) - (cl-case only - (direct direct-deps) - (separate (list direct-deps indirect-deps)) - (indirect indirect-deps) - (t (delete-dups (append direct-deps indirect-deps)))))) - -(defun async-bytecomp-get-allowed-pkgs () - (when (and async-bytecomp-allowed-packages - (listp async-bytecomp-allowed-packages)) - (if package-archive-contents - (cl-loop for p in async-bytecomp-allowed-packages - when (assq p package-archive-contents) - append (async-bytecomp--get-package-deps p) into reqs - finally return - (delete-dups - (append async-bytecomp-allowed-packages reqs))) - async-bytecomp-allowed-packages))) - -(defadvice package--compile (around byte-compile-async) - (let ((cur-package (package-desc-name pkg-desc)) - (pkg-dir (package-desc-dir pkg-desc))) - (if (or (equal async-bytecomp-allowed-packages '(all)) - (memq cur-package (async-bytecomp-get-allowed-pkgs))) - (progn - (when (eq cur-package 'async) - (fmakunbound 'async-byte-recompile-directory)) - ;; Add to `load-path' the latest version of async and - ;; reload it when reinstalling async. - (when (string= cur-package "async") - (cl-pushnew pkg-dir load-path) - (load "async-bytecomp")) - ;; `async-byte-recompile-directory' will add directory - ;; as needed to `load-path'. - (async-byte-recompile-directory (package-desc-dir pkg-desc) t)) - ad-do-it))) - -;;;###autoload -(define-minor-mode async-bytecomp-package-mode - "Byte compile asynchronously packages installed with package.el. -Async compilation of packages can be controlled by -`async-bytecomp-allowed-packages'." - :group 'async - :global t - (if async-bytecomp-package-mode - (ad-activate 'package--compile) - (ad-deactivate 'package--compile))) - -(provide 'async-bytecomp) - -;;; async-bytecomp.el ends here diff --git a/elpa/async-20161010.2322/async-pkg.el b/elpa/async-20161010.2322/async-pkg.el deleted file mode 100644 index 62214d0..0000000 --- a/elpa/async-20161010.2322/async-pkg.el +++ /dev/null @@ -1,6 +0,0 @@ -(define-package "async" "20161010.2322" "Asynchronous processing in Emacs" 'nil :keywords - '("async") - :url "https://github.com/jwiegley/emacs-async") -;; Local Variables: -;; no-byte-compile: t -;; End: diff --git a/elpa/async-20161010.2322/async.el b/elpa/async-20161010.2322/async.el deleted file mode 100644 index 3798c95..0000000 --- a/elpa/async-20161010.2322/async.el +++ /dev/null @@ -1,303 +0,0 @@ -;;; async.el --- Asynchronous processing in Emacs -*- lexical-binding: t -*- - -;; Copyright (C) 2012-2016 Free Software Foundation, Inc. - -;; Author: John Wiegley -;; Created: 18 Jun 2012 -;; Version: 1.9 - -;; Keywords: async -;; X-URL: https://github.com/jwiegley/emacs-async - -;; 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, 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: - -;; Adds the ability to call asynchronous functions and process with ease. See -;; the documentation for `async-start' and `async-start-process'. - -;;; Code: - -(defgroup async nil - "Simple asynchronous processing in Emacs" - :group 'emacs) - -(defvar async-debug nil) -(defvar async-send-over-pipe t) -(defvar async-in-child-emacs nil) -(defvar async-callback nil) -(defvar async-callback-for-process nil) -(defvar async-callback-value nil) -(defvar async-callback-value-set nil) -(defvar async-current-process nil) -(defvar async--procvar nil) - -(defun async-inject-variables - (include-regexp &optional predicate exclude-regexp) - "Return a `setq' form that replicates part of the calling environment. -It sets the value for every variable matching INCLUDE-REGEXP and -also PREDICATE. It will not perform injection for any variable -matching EXCLUDE-REGEXP (if present). It is intended to be used -as follows: - - (async-start - `(lambda () - (require 'smtpmail) - (with-temp-buffer - (insert ,(buffer-substring-no-properties (point-min) (point-max))) - ;; Pass in the variable environment for smtpmail - ,(async-inject-variables \"\\`\\(smtpmail\\|\\(user-\\)?mail\\)-\") - (smtpmail-send-it))) - 'ignore)" - `(setq - ,@(let (bindings) - (mapatoms - (lambda (sym) - (if (and (boundp sym) - (or (null include-regexp) - (string-match include-regexp (symbol-name sym))) - (not (string-match - (or exclude-regexp "-syntax-table\\'") - (symbol-name sym)))) - (let ((value (symbol-value sym))) - (when (or (null predicate) - (funcall predicate sym)) - (setq bindings (cons `(quote ,value) bindings) - bindings (cons sym bindings))))))) - bindings))) - -(defalias 'async-inject-environment 'async-inject-variables) - -(defun async-handle-result (func result buf) - (if (null func) - (progn - (set (make-local-variable 'async-callback-value) result) - (set (make-local-variable 'async-callback-value-set) t)) - (unwind-protect - (if (and (listp result) - (eq 'async-signal (nth 0 result))) - (signal (car (nth 1 result)) - (cdr (nth 1 result))) - (funcall func result)) - (unless async-debug - (kill-buffer buf))))) - -(defun async-when-done (proc &optional _change) - "Process sentinel used to retrieve the value from the child process." - (when (eq 'exit (process-status proc)) - (with-current-buffer (process-buffer proc) - (let ((async-current-process proc)) - (if (= 0 (process-exit-status proc)) - (if async-callback-for-process - (if async-callback - (prog1 - (funcall async-callback proc) - (unless async-debug - (kill-buffer (current-buffer)))) - (set (make-local-variable 'async-callback-value) proc) - (set (make-local-variable 'async-callback-value-set) t)) - (goto-char (point-max)) - (backward-sexp) - (async-handle-result async-callback (read (current-buffer)) - (current-buffer))) - (set (make-local-variable 'async-callback-value) - (list 'error - (format "Async process '%s' failed with exit code %d" - (process-name proc) (process-exit-status proc)))) - (set (make-local-variable 'async-callback-value-set) t)))))) - -(defun async--receive-sexp (&optional stream) - (let ((sexp (decode-coding-string (base64-decode-string - (read stream)) 'utf-8-unix)) - ;; Parent expects UTF-8 encoded text. - (coding-system-for-write 'utf-8-unix)) - (if async-debug - (message "Received sexp {{{%s}}}" (pp-to-string sexp))) - (setq sexp (read sexp)) - (if async-debug - (message "Read sexp {{{%s}}}" (pp-to-string sexp))) - (eval sexp))) - -(defun async--insert-sexp (sexp) - (let (print-level - print-length - (print-escape-nonascii t) - (print-circle t)) - (prin1 sexp (current-buffer)) - ;; Just in case the string we're sending might contain EOF - (encode-coding-region (point-min) (point-max) 'utf-8-unix) - (base64-encode-region (point-min) (point-max) t) - (goto-char (point-min)) (insert ?\") - (goto-char (point-max)) (insert ?\" ?\n))) - -(defun async--transmit-sexp (process sexp) - (with-temp-buffer - (if async-debug - (message "Transmitting sexp {{{%s}}}" (pp-to-string sexp))) - (async--insert-sexp sexp) - (process-send-region process (point-min) (point-max)))) - -(defun async-batch-invoke () - "Called from the child Emacs process' command-line." - ;; Make sure 'message' and 'prin1' encode stuff in UTF-8, as parent - ;; process expects. - (let ((coding-system-for-write 'utf-8-unix)) - (setq async-in-child-emacs t - debug-on-error async-debug) - (if debug-on-error - (prin1 (funcall - (async--receive-sexp (unless async-send-over-pipe - command-line-args-left)))) - (condition-case err - (prin1 (funcall - (async--receive-sexp (unless async-send-over-pipe - command-line-args-left)))) - (error - (prin1 (list 'async-signal err))))))) - -(defun async-ready (future) - "Query a FUTURE to see if the ready is ready -- i.e., if no blocking -would result from a call to `async-get' on that FUTURE." - (and (memq (process-status future) '(exit signal)) - (with-current-buffer (process-buffer future) - async-callback-value-set))) - -(defun async-wait (future) - "Wait for FUTURE to become ready." - (while (not (async-ready future)) - (sit-for 0.05))) - -(defun async-get (future) - "Get the value from an asynchronously function when it is ready. -FUTURE is returned by `async-start' or `async-start-process' when -its FINISH-FUNC is nil." - (async-wait future) - (with-current-buffer (process-buffer future) - (async-handle-result #'identity async-callback-value (current-buffer)))) - -(defun async-message-p (value) - "Return true of VALUE is an async.el message packet." - (and (listp value) - (plist-get value :async-message))) - -(defun async-send (&rest args) - "Send the given messages to the asychronous Emacs PROCESS." - (let ((args (append args '(:async-message t)))) - (if async-in-child-emacs - (if async-callback - (funcall async-callback args)) - (async--transmit-sexp (car args) (list 'quote (cdr args)))))) - -(defun async-receive () - "Send the given messages to the asychronous Emacs PROCESS." - (async--receive-sexp)) - -;;;###autoload -(defun async-start-process (name program finish-func &rest program-args) - "Start the executable PROGRAM asynchronously. See `async-start'. -PROGRAM is passed PROGRAM-ARGS, calling FINISH-FUNC with the -process object when done. If FINISH-FUNC is nil, the future -object will return the process object when the program is -finished. Set DEFAULT-DIRECTORY to change PROGRAM's current -working directory." - (let* ((buf (generate-new-buffer (concat "*" name "*"))) - (proc (let ((process-connection-type nil)) - (apply #'start-process name buf program program-args)))) - (with-current-buffer buf - (set (make-local-variable 'async-callback) finish-func) - (set-process-sentinel proc #'async-when-done) - (unless (string= name "emacs") - (set (make-local-variable 'async-callback-for-process) t)) - proc))) - -;;;###autoload -(defun async-start (start-func &optional finish-func) - "Execute START-FUNC (often a lambda) in a subordinate Emacs process. -When done, the return value is passed to FINISH-FUNC. Example: - - (async-start - ;; What to do in the child process - (lambda () - (message \"This is a test\") - (sleep-for 3) - 222) - - ;; What to do when it finishes - (lambda (result) - (message \"Async process done, result should be 222: %s\" - result))) - -If FINISH-FUNC is nil or missing, a future is returned that can -be inspected using `async-get', blocking until the value is -ready. Example: - - (let ((proc (async-start - ;; What to do in the child process - (lambda () - (message \"This is a test\") - (sleep-for 3) - 222)))) - - (message \"I'm going to do some work here\") ;; .... - - (message \"Waiting on async process, result should be 222: %s\" - (async-get proc))) - -If you don't want to use a callback, and you don't care about any -return value from the child process, pass the `ignore' symbol as -the second argument (if you don't, and never call `async-get', it -will leave *emacs* process buffers hanging around): - - (async-start - (lambda () - (delete-file \"a remote file on a slow link\" nil)) - 'ignore) - -Note: Even when FINISH-FUNC is present, a future is still -returned except that it yields no value (since the value is -passed to FINISH-FUNC). Call `async-get' on such a future always -returns nil. It can still be useful, however, as an argument to -`async-ready' or `async-wait'." - (let ((sexp start-func) - ;; Subordinate Emacs will send text encoded in UTF-8. - (coding-system-for-read 'utf-8-unix)) - (setq async--procvar - (async-start-process - "emacs" (file-truename - (expand-file-name invocation-name - invocation-directory)) - finish-func - "-Q" "-l" - ;; Using `locate-library' ensure we use the right file - ;; when the .elc have been deleted. - (locate-library "async") - "-batch" "-f" "async-batch-invoke" - (if async-send-over-pipe - "" - (with-temp-buffer - (async--insert-sexp (list 'quote sexp)) - (buffer-string))))) - (if async-send-over-pipe - (async--transmit-sexp async--procvar (list 'quote sexp))) - async--procvar)) - -(defmacro async-sandbox(func) - "Evaluate FUNC in a separate Emacs process, synchronously." - `(async-get (async-start ,func))) - -(provide 'async) - -;;; async.el ends here diff --git a/elpa/async-20161010.2322/dired-async.el b/elpa/async-20161010.2322/dired-async.el deleted file mode 100644 index ed37953..0000000 --- a/elpa/async-20161010.2322/dired-async.el +++ /dev/null @@ -1,333 +0,0 @@ -;;; dired-async.el --- Asynchronous dired actions -*- lexical-binding: t -*- - -;; Copyright (C) 2012-2016 Free Software Foundation, Inc. - -;; Authors: John Wiegley -;; Thierry Volpiatto - -;; Keywords: dired async network -;; X-URL: https://github.com/jwiegley/dired-async - -;; 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, 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: - -;; This file provide a redefinition of `dired-create-file' function, -;; performs copies, moves and all what is handled by `dired-create-file' -;; in the background using a slave Emacs process, -;; by means of the async.el module. -;; To use it, put this in your .emacs: - -;; (dired-async-mode 1) - -;; This will enable async copy/rename etc... -;; in dired and helm. - -;;; Code: - -(require 'cl-lib) -(require 'dired-aux) -(require 'async) - -(eval-when-compile - (defvar async-callback)) - -(defgroup dired-async nil - "Copy rename files asynchronously from dired." - :group 'dired) - -(defcustom dired-async-env-variables-regexp - "\\`\\(tramp-\\(default\\|connection\\|remote\\)\\|ange-ftp\\)-.*" - "Variables matching this regexp will be loaded on Child Emacs." - :type 'regexp - :group 'dired-async) - -(defcustom dired-async-message-function 'dired-async-mode-line-message - "Function to use to notify result when operation finish. -Should take same args as `message'." - :group 'dired-async - :type 'function) - -(defcustom dired-async-log-file "/tmp/dired-async.log" - "File use to communicate errors from Child Emacs to host Emacs." - :group 'dired-async - :type 'string) - -(defface dired-async-message - '((t (:foreground "yellow"))) - "Face used for mode-line message." - :group 'dired-async) - -(defface dired-async-failures - '((t (:foreground "red"))) - "Face used for mode-line message." - :group 'dired-async) - -(defface dired-async-mode-message - '((t (:foreground "Gold"))) - "Face used for `dired-async--modeline-mode' lighter." - :group 'dired-async) - -(define-minor-mode dired-async--modeline-mode - "Notify mode-line that an async process run." - :group 'dired-async - :global t - :lighter (:eval (propertize (format " [%s Async job(s) running]" - (length (dired-async-processes))) - 'face 'dired-async-mode-message)) - (unless dired-async--modeline-mode - (let ((visible-bell t)) (ding)))) - -(defun dired-async-mode-line-message (text face &rest args) - "Notify end of operation in `mode-line'." - (message nil) - (let ((mode-line-format (concat - " " (propertize - (if args - (apply #'format text args) - text) - 'face face)))) - (force-mode-line-update) - (sit-for 3) - (force-mode-line-update))) - -(defun dired-async-processes () - (cl-loop for p in (process-list) - when (cl-loop for c in (process-command p) thereis - (string= "async-batch-invoke" c)) - collect p)) - -(defun dired-async-kill-process () - (interactive) - (let* ((processes (dired-async-processes)) - (proc (car (last processes)))) - (and proc (delete-process proc)) - (unless (> (length processes) 1) - (dired-async--modeline-mode -1)))) - -(defun dired-async-after-file-create (total operation failures skipped) - "Callback function used for operation handled by `dired-create-file'." - (unless (dired-async-processes) - ;; Turn off mode-line notification - ;; only when last process end. - (dired-async--modeline-mode -1)) - (when operation - (if (file-exists-p dired-async-log-file) - (progn - (pop-to-buffer (get-buffer-create dired-log-buffer)) - (goto-char (point-max)) - (setq inhibit-read-only t) - (insert "Error: ") - (insert-file-contents dired-async-log-file) - (special-mode) - (shrink-window-if-larger-than-buffer) - (delete-file dired-async-log-file)) - (run-with-timer - 0.1 nil - (lambda () - ;; First send error messages. - (cond (failures - (funcall dired-async-message-function - "%s failed for %d of %d file%s -- See *Dired log* buffer" - 'dired-async-failures - (car operation) (length failures) - total (dired-plural-s total))) - (skipped - (funcall dired-async-message-function - "%s: %d of %d file%s skipped -- See *Dired log* buffer" - 'dired-async-failures - (car operation) (length skipped) total - (dired-plural-s total)))) - ;; Finally send the success message. - (funcall dired-async-message-function - "Asynchronous %s of %s on %s file%s done" - 'dired-async-message - (car operation) (cadr operation) - total (dired-plural-s total))))))) - -(defun dired-async-maybe-kill-ftp () - "Return a form to kill ftp process in child emacs." - (quote - (progn - (require 'cl-lib) - (let ((buf (cl-loop for b in (buffer-list) - thereis (and (string-match - "\\`\\*ftp.*" - (buffer-name b)) b)))) - (when buf (kill-buffer buf)))))) - -(defvar overwrite-query) -(defun dired-async-create-files (file-creator operation fn-list name-constructor - &optional _marker-char) - "Same as `dired-create-files' but asynchronous. - -See `dired-create-files' for the behavior of arguments." - (setq overwrite-query nil) - (let ((total (length fn-list)) - failures async-fn-list skipped callback) - (let (to) - (dolist (from fn-list) - (setq to (funcall name-constructor from)) - (if (equal to from) - (progn - (setq to nil) - (dired-log "Cannot %s to same file: %s\n" - (downcase operation) from))) - (if (not to) - (setq skipped (cons (dired-make-relative from) skipped)) - (let* ((overwrite (and (null (eq file-creator 'backup-file)) - (file-exists-p to))) - (dired-overwrite-confirmed ; for dired-handle-overwrite - (and overwrite - (let ((help-form `(format "\ -Type SPC or `y' to overwrite file `%s', -DEL or `n' to skip to next, -ESC or `q' to not overwrite any of the remaining files, -`!' to overwrite all remaining files with no more questions." ,to))) - (dired-query 'overwrite-query "Overwrite `%s'?" to))))) - ;; Handle the `dired-copy-file' file-creator specially - ;; When copying a directory to another directory or - ;; possibly to itself or one of its subdirectories. - ;; e.g "~/foo/" => "~/test/" - ;; or "~/foo/" =>"~/foo/" - ;; or "~/foo/ => ~/foo/bar/") - ;; In this case the 'name-constructor' have set the destination - ;; TO to "~/test/foo" because the old emacs23 behavior - ;; of `copy-directory' was to not create the subdirectory - ;; and instead copy the contents. - ;; With the new behavior of `copy-directory' - ;; (similar to the `cp' shell command) we don't - ;; need such a construction of the target directory, - ;; so modify the destination TO to "~/test/" instead of "~/test/foo/". - (let ((destname (file-name-directory to))) - (when (and (file-directory-p from) - (file-directory-p to) - (eq file-creator 'dired-copy-file)) - (setq to destname)) - ;; If DESTNAME is a subdirectory of FROM, not a symlink, - ;; and the method in use is copying, signal an error. - (and (eq t (car (file-attributes destname))) - (eq file-creator 'dired-copy-file) - (file-in-directory-p destname from) - (error "Cannot copy `%s' into its subdirectory `%s'" - from to))) - (if overwrite - (or (and dired-overwrite-confirmed - (push (cons from to) async-fn-list)) - (progn - (push (dired-make-relative from) failures) - (dired-log "%s `%s' to `%s' failed\n" - operation from to))) - (push (cons from to) async-fn-list))))) - ;; When failures have been printed to dired log add the date at bob. - (when (or failures skipped) (dired-log t)) - ;; When async-fn-list is empty that's mean only one file - ;; had to be copied and user finally answer NO. - ;; In this case async process will never start and callback - ;; will have no chance to run, so notify failures here. - (unless async-fn-list - (cond (failures - (funcall dired-async-message-function - "%s failed for %d of %d file%s -- See *Dired log* buffer" - 'dired-async-failures - operation (length failures) - total (dired-plural-s total))) - (skipped - (funcall dired-async-message-function - "%s: %d of %d file%s skipped -- See *Dired log* buffer" - 'dired-async-failures - operation (length skipped) total - (dired-plural-s total))))) - ;; Setup callback. - (setq callback - (lambda (&optional _ignore) - (dired-async-after-file-create - total (list operation (length async-fn-list)) failures skipped) - (when (string= (downcase operation) "rename") - (cl-loop for (file . to) in async-fn-list - for bf = (get-file-buffer file) - for destp = (file-exists-p to) - do (and bf destp - (with-current-buffer bf - (set-visited-file-name to t t)))))))) - ;; Start async process. - (when async-fn-list - (async-start `(lambda () - (require 'cl-lib) (require 'dired-aux) (require 'dired-x) - ,(async-inject-variables dired-async-env-variables-regexp) - (let ((dired-recursive-copies (quote always)) - (dired-copy-preserve-time - ,dired-copy-preserve-time)) - (setq overwrite-backup-query nil) - ;; Inline `backup-file' as long as it is not - ;; available in emacs. - (defalias 'backup-file - ;; Same feature as "cp --backup=numbered from to" - ;; Symlinks are copied as file from source unlike - ;; `dired-copy-file' which is same as cp -d. - ;; Directories are omitted. - (lambda (from to ok) - (cond ((file-directory-p from) (ignore)) - (t (let ((count 0)) - (while (let ((attrs (file-attributes to))) - (and attrs (null (nth 0 attrs)))) - (cl-incf count) - (setq to (concat (file-name-sans-versions to) - (format ".~%s~" count))))) - (condition-case err - (copy-file from to ok dired-copy-preserve-time) - (file-date-error - (dired-log "Can't set date on %s:\n%s\n" from err))))))) - ;; Now run the FILE-CREATOR function on files. - (cl-loop with fn = (quote ,file-creator) - for (from . dest) in (quote ,async-fn-list) - do (condition-case err - (funcall fn from dest t) - (file-error - (dired-log "%s: %s\n" (car err) (cdr err))) - nil)) - (when (get-buffer dired-log-buffer) - (dired-log t) - (with-current-buffer dired-log-buffer - (write-region (point-min) (point-max) - ,dired-async-log-file)))) - ,(dired-async-maybe-kill-ftp)) - callback) - ;; Run mode-line notifications while process running. - (dired-async--modeline-mode 1) - (message "%s proceeding asynchronously..." operation)))) - -(defadvice dired-create-files (around dired-async) - (dired-async-create-files file-creator operation fn-list - name-constructor marker-char)) - -;;;###autoload -(define-minor-mode dired-async-mode - "Do dired actions asynchronously." - :group 'dired-async - :global t - (if dired-async-mode - (if (fboundp 'advice-add) - (advice-add 'dired-create-files :override #'dired-async-create-files) - (ad-activate 'dired-create-files)) - (if (fboundp 'advice-remove) - (advice-remove 'dired-create-files #'dired-async-create-files) - (ad-deactivate 'dired-create-files)))) - - -(provide 'dired-async) - -;;; dired-async.el ends here diff --git a/elpa/async-20161010.2322/smtpmail-async.el b/elpa/async-20161010.2322/smtpmail-async.el deleted file mode 100644 index 6fcf287..0000000 --- a/elpa/async-20161010.2322/smtpmail-async.el +++ /dev/null @@ -1,73 +0,0 @@ -;;; smtpmail-async.el --- Send e-mail with smtpmail.el asynchronously -*- lexical-binding: t -*- - -;; Copyright (C) 2012-2016 Free Software Foundation, Inc. - -;; Author: John Wiegley -;; Created: 18 Jun 2012 - -;; Keywords: email async -;; X-URL: https://github.com/jwiegley/emacs-async - -;; 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, 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: - -;; Send e-mail with smtpmail.el asynchronously. To use: -;; -;; (require 'smtpmail-async) -;; -;; (setq send-mail-function 'async-smtpmail-send-it -;; message-send-mail-function 'async-smtpmail-send-it) -;; -;; This assumes you already have smtpmail.el working. - -;;; Code: - -(defgroup smtpmail-async nil - "Send e-mail with smtpmail.el asynchronously" - :group 'smptmail) - -(require 'async) -(require 'smtpmail) -(require 'message) - -(defvar async-smtpmail-before-send-hook nil - "Hook running in the child emacs in `async-smtpmail-send-it'. -It is called just before calling `smtpmail-send-it'.") - -(defun async-smtpmail-send-it () - (let ((to (message-field-value "To")) - (buf-content (buffer-substring-no-properties - (point-min) (point-max)))) - (message "Delivering message to %s..." to) - (async-start - `(lambda () - (require 'smtpmail) - (with-temp-buffer - (insert ,buf-content) - (set-buffer-multibyte nil) - ;; Pass in the variable environment for smtpmail - ,(async-inject-variables - "\\`\\(smtpmail\\|async-smtpmail\\|\\(user-\\)?mail\\)-\\|auth-sources\\|epg" - nil "\\`\\(mail-header-format-function\\|smtpmail-address-buffer\\|mail-mode-abbrev-table\\)") - (run-hooks 'async-smtpmail-before-send-hook) - (smtpmail-send-it))) - (lambda (&optional _ignore) - (message "Delivering message to %s...done" to))))) - -(provide 'smtpmail-async) - -;;; smtpmail-async.el ends here diff --git a/elpa/avy-20160814.250/avy-autoloads.el b/elpa/avy-20160814.250/avy-autoloads.el deleted file mode 100644 index 68af33f..0000000 --- a/elpa/avy-20160814.250/avy-autoloads.el +++ /dev/null @@ -1,218 +0,0 @@ -;;; avy-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "avy" "avy.el" (22527 12801 314759 26000)) -;;; Generated autoloads from avy.el - -(autoload 'avy-goto-char "avy" "\ -Jump to the currently visible CHAR. -The window scope is determined by `avy-all-windows' (ARG negates it). - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-char-in-line "avy" "\ -Jump to the currently visible CHAR in the current line. - -\(fn CHAR)" t nil) - -(autoload 'avy-goto-char-2 "avy" "\ -Jump to the currently visible CHAR1 followed by CHAR2. -The window scope is determined by `avy-all-windows' (ARG negates it). - -\(fn CHAR1 CHAR2 &optional ARG BEG END)" t nil) - -(autoload 'avy-goto-char-2-above "avy" "\ -Jump to the currently visible CHAR1 followed by CHAR2. -This is a scoped version of `avy-goto-char-2', where the scope is -the visible part of the current buffer up to point. - -\(fn CHAR1 CHAR2 &optional ARG)" t nil) - -(autoload 'avy-goto-char-2-below "avy" "\ -Jump to the currently visible CHAR1 followed by CHAR2. -This is a scoped version of `avy-goto-char-2', where the scope is -the visible part of the current buffer following point. - -\(fn CHAR1 CHAR2 &optional ARG)" t nil) - -(autoload 'avy-isearch "avy" "\ -Jump to one of the current isearch candidates. - -\(fn)" t nil) - -(autoload 'avy-goto-word-0 "avy" "\ -Jump to a word start. -The window scope is determined by `avy-all-windows' (ARG negates it). - -\(fn ARG)" t nil) - -(autoload 'avy-goto-word-1 "avy" "\ -Jump to the currently visible CHAR at a word start. -The window scope is determined by `avy-all-windows' (ARG negates it). - -\(fn CHAR &optional ARG BEG END SYMBOL)" t nil) - -(autoload 'avy-goto-word-1-above "avy" "\ -Jump to the currently visible CHAR at a word start. -This is a scoped version of `avy-goto-word-1', where the scope is -the visible part of the current buffer up to point. - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-word-1-below "avy" "\ -Jump to the currently visible CHAR at a word start. -This is a scoped version of `avy-goto-word-1', where the scope is -the visible part of the current buffer following point. - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-symbol-1 "avy" "\ -Jump to the currently visible CHAR at a symbol start. -The window scope is determined by `avy-all-windows' (ARG negates it). - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-symbol-1-above "avy" "\ -Jump to the currently visible CHAR at a symbol start. -This is a scoped version of `avy-goto-symbol-1', where the scope is -the visible part of the current buffer up to point. - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-symbol-1-below "avy" "\ -Jump to the currently visible CHAR at a symbol start. -This is a scoped version of `avy-goto-symbol-1', where the scope is -the visible part of the current buffer following point. - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-subword-0 "avy" "\ -Jump to a word or subword start. - -The window scope is determined by `avy-all-windows' (ARG negates it). - -When PREDICATE is non-nil it's a function of zero parameters that -should return true. - -\(fn &optional ARG PREDICATE)" t nil) - -(autoload 'avy-goto-subword-1 "avy" "\ -Jump to the currently visible CHAR at a subword start. -The window scope is determined by `avy-all-windows' (ARG negates it). -The case of CHAR is ignored. - -\(fn CHAR &optional ARG)" t nil) - -(autoload 'avy-goto-word-or-subword-1 "avy" "\ -Forward to `avy-goto-subword-1' or `avy-goto-word-1'. -Which one depends on variable `subword-mode'. - -\(fn)" t nil) - -(autoload 'avy-goto-line "avy" "\ -Jump to a line start in current buffer. - -When ARG is 1, jump to lines currently visible, with the option -to cancel to `goto-line' by entering a number. - -When ARG is 4, negate the window scope determined by -`avy-all-windows'. - -Otherwise, forward to `goto-line' with ARG. - -\(fn &optional ARG)" t nil) - -(autoload 'avy-goto-line-above "avy" "\ -Goto visible line above the cursor. - -\(fn)" t nil) - -(autoload 'avy-goto-line-below "avy" "\ -Goto visible line below the cursor. - -\(fn)" t nil) - -(autoload 'avy-copy-line "avy" "\ -Copy a selected line above the current line. -ARG lines can be used. - -\(fn ARG)" t nil) - -(autoload 'avy-move-line "avy" "\ -Move a selected line above the current line. -ARG lines can be used. - -\(fn ARG)" t nil) - -(autoload 'avy-copy-region "avy" "\ -Select two lines and copy the text between them to point. - -The window scope is determined by `avy-all-windows' or -`avy-all-windows-alt' when ARG is non-nil. - -\(fn ARG)" t nil) - -(autoload 'avy-move-region "avy" "\ -Select two lines and move the text between them here. - -\(fn)" t nil) - -(autoload 'avy-kill-region "avy" "\ -Select two lines and kill the region between them. - -The window scope is determined by `avy-all-windows' or -`avy-all-windows-alt' when ARG is non-nil. - -\(fn ARG)" t nil) - -(autoload 'avy-kill-ring-save-region "avy" "\ -Select two lines and save the region between them to the kill ring. - -\(fn ARG)" t nil) - -(autoload 'avy-kill-whole-line "avy" "\ -Select line and kill the whole selected line. - -With a numerical prefix ARG, kill ARG line(s) starting from the -selected line. If ARG is negative, kill backward. - -If ARG is zero, kill the selected line but exclude the trailing -newline. - -\\[universal-argument] 3 \\[avy-kil-whole-line] kill three lines -starting from the selected line. \\[universal-argument] -3 - -\\[avy-kill-whole-line] kill three lines backward including the -selected line. - -\(fn ARG)" t nil) - -(autoload 'avy-kill-ring-save-whole-line "avy" "\ -Select line and Save the whole selected line as if killed, but don’t kill it. - -This command is similar to `avy-kill-whole-line', except that it -saves the line(s) as if killed, but does not kill it(them). - -\(fn ARG)" t nil) - -(autoload 'avy-setup-default "avy" "\ -Setup the default shortcuts. - -\(fn)" nil nil) - -(autoload 'avy-goto-char-timer "avy" "\ -Read one or many consecutive chars and jump to the first one. -The window scope is determined by `avy-all-windows' (ARG negates it). - -\(fn &optional ARG)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; avy-autoloads.el ends here diff --git a/elpa/avy-20160814.250/avy-pkg.el b/elpa/avy-20160814.250/avy-pkg.el deleted file mode 100644 index 003fd4c..0000000 --- a/elpa/avy-20160814.250/avy-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "avy" "20160814.250" "tree-based completion" '((emacs "24.1") (cl-lib "0.5")) :url "https://github.com/abo-abo/avy" :keywords '("point" "location")) diff --git a/elpa/avy-20160814.250/avy.el b/elpa/avy-20160814.250/avy.el deleted file mode 100644 index 9883361..0000000 --- a/elpa/avy-20160814.250/avy.el +++ /dev/null @@ -1,1699 +0,0 @@ -;;; avy.el --- tree-based completion -*- lexical-binding: t -*- - -;; Copyright (C) 2015 Free Software Foundation, Inc. - -;; Author: Oleh Krehel -;; URL: https://github.com/abo-abo/avy -;; Package-Version: 20160814.250 -;; Version: 0.4.0 -;; Package-Requires: ((emacs "24.1") (cl-lib "0.5")) -;; Keywords: point, location - -;; This file is part of GNU Emacs. - -;; This file 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 3, 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. - -;; For a full copy of the GNU General Public License -;; see . - -;;; Commentary: -;; -;; This package provides a generic completion method based on building -;; a balanced decision tree with each candidate being a leaf. To -;; traverse the tree from the root to a desired leaf, typically a -;; sequence of `read-key' can be used. -;; -;; In order for `read-key' to make sense, the tree needs to be -;; visualized appropriately, with a character at each branch node. So -;; this completion method works only for things that you can see on -;; your screen, all at once: -;; -;; * character positions -;; * word or subword start positions -;; * line beginning positions -;; * link positions -;; * window positions -;; -;; If you're familiar with the popular `ace-jump-mode' package, this -;; package does all that and more, without the implementation -;; headache. - -;;; Code: -(require 'cl-lib) -(require 'ring) - -;;* Customization -(defgroup avy nil - "Jump to things tree-style." - :group 'convenience - :prefix "avy-") - -(defcustom avy-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l) - "Default keys for jumping. -Any key is either a character representing a self-inserting -key (letters, digits, punctuation, etc.) or a symbol denoting a -non-printing key like an arrow key (left, right, up, down). For -non-printing keys, a corresponding entry in -`avy-key-to-char-alist' must exist in order to visualize the key -in the avy overlays." - :type '(repeat :tag "Keys" (choice - (character :tag "char") - (symbol :tag "non-printing key")))) - -(defcustom avy-keys-alist nil - "Alist of avy-jump commands to `avy-keys' overriding the default `avy-keys'." - :type '(alist - :key-type (choice :tag "Command" - (const avy-goto-char) - (const avy-goto-char-2) - (const avy-isearch) - (const avy-goto-line) - (const avy-goto-subword-0) - (const avy-goto-subword-1) - (const avy-goto-word-0) - (const avy-goto-word-1) - (const avy-copy-line) - (const avy-copy-region) - (const avy-move-line) - (const avy-move-region) - (const avy-kill-whole-line) - (const avy-kill-region) - (const avy-kill-ring-save-whole-line) - (const avy-kill-ring-save-region) - (function :tag "Other command")) - :value-type (repeat :tag "Keys" character))) - -(defcustom avy-style 'at-full - "The default method of displaying the overlays. -Use `avy-styles-alist' to customize this per-command." - :type '(choice - (const :tag "Pre" pre) - (const :tag "At" at) - (const :tag "At Full" at-full) - (const :tag "Post" post) - (const :tag "De Bruijn" de-bruijn))) - -(defcustom avy-styles-alist nil - "Alist of avy-jump commands to the style for each command. -If the commands isn't on the list, `avy-style' is used." - :type '(alist - :key-type (choice :tag "Command" - (const avy-goto-char) - (const avy-goto-char-2) - (const avy-isearch) - (const avy-goto-line) - (const avy-goto-subword-0) - (const avy-goto-subword-1) - (const avy-goto-word-0) - (const avy-goto-word-1) - (const avy-copy-line) - (const avy-copy-region) - (const avy-move-line) - (const avy-move-region) - (const avy-kill-whole-line) - (const avy-kill-region) - (const avy-kill-ring-save-whole-line) - (const avy-kill-ring-save-region) - (function :tag "Other command")) - :value-type (choice - (const :tag "Pre" pre) - (const :tag "At" at) - (const :tag "At Full" at-full) - (const :tag "Post" post) - (const :tag "De Bruijn" de-bruijn)))) - -(defcustom avy-dispatch-alist - '((?x . avy-action-kill-move) - (?X . avy-action-kill-stay) - (?m . avy-action-mark) - (?n . avy-action-copy) - (?i . avy-action-ispell)) - "List of actions for `avy-handler-default'. - -Each item is (KEY . ACTION). When KEY not on `avy-keys' is -pressed during the dispatch, ACTION is set to replace the default -`avy-action-goto' once a candidate is finally selected." - :type - '(alist - :key-type (choice (character :tag "Char")) - :value-type (choice - (const :tag "Mark" avy-action-mark) - (const :tag "Copy" avy-action-copy) - (const :tag "Kill and move point" avy-action-kill-move) - (const :tag "Kill" avy-action-kill-stay)))) - -(defcustom avy-background nil - "When non-nil, a gray background will be added during the selection." - :type 'boolean) - -(defcustom avy-all-windows t - "Determine the list of windows to consider in search of candidates." - :type - '(choice - (const :tag "All Frames" all-frames) - (const :tag "This Frame" t) - (const :tag "This Window" nil))) - -(defcustom avy-case-fold-search t - "Non-nil if searches should ignore case." - :type 'boolean) - -(defcustom avy-word-punc-regexp "[!-/:-@[-`{-~]" - "Regexp of punctuation chars that count as word starts for `avy-goto-word-1. -When nil, punctuation chars will not be matched. - -\"[!-/:-@[-`{-~]\" will match all printable punctuation chars." - :type 'regexp) - -(defcustom avy-goto-word-0-regexp "\\b\\sw" - "Regexp that determines positions for `avy-goto-word-0'." - :type '(choice - (const :tag "Default" "\\b\\sw") - (const :tag "Symbol" "\\_<\\(\\sw\\|\\s_\\)") - (const :tag "Not whitespace" "[^ \r\n\t]+") - (regexp :tag "Regex"))) - -(defcustom avy-ignored-modes '(image-mode doc-view-mode pdf-view-mode) - "List of modes to ignore when searching for candidates. -Typically, these modes don't use the text representation." - :type 'list) - -(defvar avy-ring (make-ring 20) - "Hold the window and point history.") - -(defvar avy-translate-char-function #'identity - "Function to translate user input key into another key. -For example, to make SPC do the same as ?a, use -\(lambda (c) (if (= c 32) ?a c)).") - -(defface avy-lead-face-0 - '((t (:foreground "white" :background "#4f57f9"))) - "Face used for first non-terminating leading chars.") - -(defface avy-lead-face-1 - '((t (:foreground "white" :background "gray"))) - "Face used for matched leading chars.") - -(defface avy-lead-face-2 - '((t (:foreground "white" :background "#f86bf3"))) - "Face used for leading chars.") - -(defface avy-lead-face - '((t (:foreground "white" :background "#e52b50"))) - "Face used for the leading chars.") - -(defface avy-background-face - '((t (:foreground "gray40"))) - "Face for whole window background during selection.") - -(defface avy-goto-char-timer-face - '((t (:inherit highlight))) - "Face for matches during reading chars using `avy-goto-char-timer'.") - -(defconst avy-lead-faces '(avy-lead-face - avy-lead-face-0 - avy-lead-face-2 - avy-lead-face - avy-lead-face-0 - avy-lead-face-2) - "Face sequence for `avy--overlay-at-full'.") - -(defvar avy-key-to-char-alist '((left . ?◀) - (right . ?▶) - (up . ?▲) - (down . ?▼) - (prior . ?△) - (next . ?▽)) - "An alist from non-character keys to printable chars used in avy overlays. -This alist must contain all keys used in `avy-keys' which are not -self-inserting keys and thus aren't read as characters.") - -;;* Internals -;;** Tree -(defmacro avy-multipop (lst n) - "Remove LST's first N elements and return them." - `(if (<= (length ,lst) ,n) - (prog1 ,lst - (setq ,lst nil)) - (prog1 ,lst - (setcdr - (nthcdr (1- ,n) (prog1 ,lst (setq ,lst (nthcdr ,n ,lst)))) - nil)))) - -(defun avy--de-bruijn (keys n) - "De Bruijn sequence for alphabet KEYS and subsequences of length N." - (let* ((k (length keys)) - (a (make-list (* n k) 0)) - sequence) - (cl-labels ((db (T p) - (if (> T n) - (if (eq (% n p) 0) - (setq sequence - (append sequence - (cl-subseq a 1 (1+ p))))) - (setf (nth T a) (nth (- T p) a)) - (db (1+ T) p) - (cl-loop for j from (1+ (nth (- T p) a)) to (1- k) do - (setf (nth T a) j) - (db (1+ T) T))))) - (db 1 1) - (mapcar (lambda (n) - (nth n keys)) - sequence)))) - -(defun avy--path-alist-1 (lst seq-len keys) - "Build a De Bruin sequence from LST. -SEQ-LEN is how many elements of KEYS it takes to identify a match." - (let ((db-seq (avy--de-bruijn keys seq-len)) - prev-pos prev-seq prev-win path-alist) - ;; The De Bruijn seq is cyclic, so append the seq-len - 1 first chars to - ;; the end. - (setq db-seq (nconc db-seq (cl-subseq db-seq 0 (1- seq-len)))) - (cl-labels ((subseq-and-pop () - (when (nth (1- seq-len) db-seq) - (prog1 (cl-subseq db-seq 0 seq-len) - (pop db-seq))))) - (while lst - (let* ((cur (car lst)) - (pos (cond - ;; ace-window has matches of the form (pos . wnd) - ((integerp (car cur)) (car cur)) - ;; avy-jump have form ((start . end) . wnd) - ((consp (car cur)) (caar cur)) - (t (error "Unexpected match representation: %s" cur)))) - (win (cdr cur)) - (path (if prev-pos - (let ((diff (if (eq win prev-win) - (- pos prev-pos) - 0))) - (when (and (> diff 0) (< diff seq-len)) - (while (and (nth (1- seq-len) db-seq) - (not - (eq 0 - (cl-search - (cl-subseq prev-seq diff) - (cl-subseq db-seq 0 seq-len))))) - (pop db-seq))) - (subseq-and-pop)) - (subseq-and-pop)))) - (if (not path) - (setq lst nil - path-alist nil) - (push (cons path (car lst)) path-alist) - (setq prev-pos pos - prev-seq path - prev-win win - lst (cdr lst)))))) - (nreverse path-alist))) - -(defun avy-tree (lst keys) - "Coerce LST into a balanced tree. -The degree of the tree is the length of KEYS. -KEYS are placed appropriately on internal nodes." - (let ((len (length keys))) - (cl-labels - ((rd (ls) - (let ((ln (length ls))) - (if (< ln len) - (cl-pairlis keys - (mapcar (lambda (x) (cons 'leaf x)) ls)) - (let ((ks (copy-sequence keys)) - res) - (dolist (s (avy-subdiv ln len)) - (push (cons (pop ks) - (if (eq s 1) - (cons 'leaf (pop ls)) - (rd (avy-multipop ls s)))) - res)) - (nreverse res)))))) - (rd lst)))) - -(defun avy-subdiv (n b) - "Distribute N in B terms in a balanced way." - (let* ((p (1- (floor (+ (log n b) 1e-6)))) - (x1 (expt b p)) - (x2 (* b x1)) - (delta (- n x2)) - (n2 (/ delta (- x2 x1))) - (n1 (- b n2 1))) - (append - (make-list n1 x1) - (list - (- n (* n1 x1) (* n2 x2))) - (make-list n2 x2)))) - -(defun avy-traverse (tree walker &optional recur-key) - "Traverse TREE generated by `avy-tree'. -WALKER is a function that takes KEYS and LEAF. - -RECUR-KEY is used in recursion. - -LEAF is a member of LST argument of `avy-tree'. - -KEYS is the path from the root of `avy-tree' to LEAF." - (dolist (br tree) - (let ((key (cons (car br) recur-key))) - (if (eq (cadr br) 'leaf) - (funcall walker key (cddr br)) - (avy-traverse (cdr br) walker key))))) - -(defvar avy-action nil - "Function to call at the end of select.") - -(defun avy-handler-default (char) - "The default handler for a bad CHAR." - (let (dispatch) - (cond ((setq dispatch (assoc char avy-dispatch-alist)) - (setq avy-action (cdr dispatch)) - (throw 'done 'restart)) - ((memq char '(27 ?\C-g)) - ;; exit silently - (throw 'done 'exit)) - (t - (signal 'user-error (list "No such candidate" char)) - (throw 'done nil))))) - -(defvar avy-handler-function 'avy-handler-default - "A function to call for a bad `read-key' in `avy-read'.") - -(defvar avy-current-path "" - "Store the current incomplete path during `avy-read'.") - -(defun avy-read (tree display-fn cleanup-fn) - "Select a leaf from TREE using consecutive `read-char'. - -DISPLAY-FN should take CHAR and LEAF and signify that LEAFs -associated with CHAR will be selected if CHAR is pressed. This is -commonly done by adding a CHAR overlay at LEAF position. - -CLEANUP-FN should take no arguments and remove the effects of -multiple DISPLAY-FN invokations." - (catch 'done - (setq avy-current-path "") - (while tree - (let ((avy--leafs nil)) - (avy-traverse tree - (lambda (path leaf) - (push (cons path leaf) avy--leafs))) - (dolist (x avy--leafs) - (funcall display-fn (car x) (cdr x)))) - (let ((char (funcall avy-translate-char-function (read-key))) - branch) - (funcall cleanup-fn) - (if (setq branch (assoc char tree)) - (if (eq (car (setq tree (cdr branch))) 'leaf) - (throw 'done (cdr tree)) - (setq avy-current-path - (concat avy-current-path (string (avy--key-to-char char))))) - (funcall avy-handler-function char)))))) - -(defun avy-read-de-bruijn (lst keys) - "Select from LST dispatching on KEYS." - ;; In theory, the De Bruijn sequence B(k,n) has k^n subsequences of length n - ;; (the path length) usable as paths, thus that's the lower bound. Due to - ;; partially overlapping matches, not all subsequences may be usable, so it's - ;; possible that the path-len must be incremented, e.g., if we're matching - ;; for x and a buffer contains xaxbxcx only every second subsequence is - ;; usable for the four matches. - (catch 'done - (let* ((path-len (ceiling (log (length lst) (length keys)))) - (alist (avy--path-alist-1 lst path-len keys))) - (while (not alist) - (cl-incf path-len) - (setq alist (avy--path-alist-1 lst path-len keys))) - (let* ((len (length (caar alist))) - (i 0)) - (setq avy-current-path "") - (while (< i len) - (dolist (x (reverse alist)) - (avy--overlay-at-full (reverse (car x)) (cdr x))) - (let ((char (funcall avy-translate-char-function (read-key)))) - (avy--remove-leading-chars) - (setq alist - (delq nil - (mapcar (lambda (x) - (when (eq (caar x) char) - (cons (cdr (car x)) (cdr x)))) - alist))) - (setq avy-current-path - (concat avy-current-path (string (avy--key-to-char char)))) - (cl-incf i) - (unless alist - (funcall avy-handler-function char)))) - (cdar alist))))) - -;;** Rest -(defun avy-window-list () - "Return a list of windows depending on `avy-all-windows'." - (cond ((eq avy-all-windows 'all-frames) - (cl-mapcan #'window-list (frame-list))) - - ((eq avy-all-windows t) - (window-list)) - - ((null avy-all-windows) - (list (selected-window))) - - (t - (error "Unrecognized option: %S" avy-all-windows)))) - -(defcustom avy-all-windows-alt nil - "The alternative `avy-all-windows' for use with \\[universal-argument]." - :type '(choice - (const :tag "Current window" nil) - (const :tag "All windows on the current frame" t) - (const :tag "All windows on all frames" all-frames))) - -(defmacro avy-dowindows (flip &rest body) - "Depending on FLIP and `avy-all-windows' run BODY in each or selected window." - (declare (indent 1) - (debug (form body))) - `(let ((avy-all-windows (if ,flip - avy-all-windows-alt - avy-all-windows))) - (dolist (wnd (avy-window-list)) - (with-selected-window wnd - (unless (memq major-mode avy-ignored-modes) - ,@body))))) - -(defun avy-resume () - "Stub to hold last avy command. -Commands using `avy-with' macro can be resumed." - (interactive)) - -(defmacro avy-with (command &rest body) - "Set `avy-keys' according to COMMAND and execute BODY. -Set `avy-style' according to COMMMAND as well." - (declare (indent 1) - (debug (form body))) - `(let ((avy-keys (or (cdr (assq ',command avy-keys-alist)) - avy-keys)) - (avy-style (or (cdr (assq ',command avy-styles-alist)) - avy-style))) - (setq avy-action nil) - (setf (symbol-function 'avy-resume) - (lambda () - (interactive) - ,@body)) - ,@body)) - -(defun avy-action-goto (pt) - "Goto PT." - (goto-char pt)) - -(defun avy-action-mark (pt) - "Mark sexp at PT." - (goto-char pt) - (set-mark (point)) - (forward-sexp)) - -(defun avy-action-copy (pt) - "Copy sexp starting on PT." - (save-excursion - (let (str) - (goto-char pt) - (forward-sexp) - (setq str (buffer-substring pt (point))) - (kill-new str) - (message "Copied: %s" str))) - (let ((dat (ring-ref avy-ring 0))) - (select-frame-set-input-focus - (window-frame (cdr dat))) - (select-window (cdr dat)) - (goto-char (car dat)))) - -(defun avy-action-kill-move (pt) - "Kill sexp at PT and move there." - (goto-char pt) - (forward-sexp) - (kill-region pt (point)) - (message "Killed: %s" (current-kill 0))) - -(defun avy-action-kill-stay (pt) - "Kill sexp at PT." - (save-excursion - (goto-char pt) - (forward-sexp) - (kill-region pt (point)) - (just-one-space)) - (message "Killed: %s" (current-kill 0))) - -(declare-function flyspell-correct-word-before-point "flyspell") - -(defun avy-action-ispell (pt) - "Auto correct word at PT." - (save-excursion - (goto-char pt) - (if (bound-and-true-p flyspell-mode) - (flyspell-correct-word-before-point) - (if (looking-at-p "\\b") - (ispell-word) - (progn - (backward-word) - (when (looking-at-p "\\b") - (ispell-word))))))) - -(defun avy--process (candidates overlay-fn) - "Select one of CANDIDATES using `avy-read'. -Use OVERLAY-FN to visualize the decision overlay." - (unless (and (consp (car candidates)) - (windowp (cdar candidates))) - (setq candidates - (mapcar (lambda (x) (cons x (selected-window))) - candidates))) - (let ((len (length candidates)) - (cands (copy-sequence candidates)) - res) - (if (= len 0) - (message "zero candidates") - (if (= len 1) - (setq res (car candidates)) - (unwind-protect - (progn - (avy--make-backgrounds - (avy-window-list)) - (setq res (if (eq avy-style 'de-bruijn) - (avy-read-de-bruijn - candidates avy-keys) - (avy-read (avy-tree candidates avy-keys) - overlay-fn - #'avy--remove-leading-chars)))) - (avy--done))) - (cond ((eq res 'restart) - (avy--process cands overlay-fn)) - ;; ignore exit from `avy-handler-function' - ((eq res 'exit)) - (t - (avy-push-mark) - (when (and (consp res) - (windowp (cdr res))) - (let* ((window (cdr res)) - (frame (window-frame window))) - (unless (equal frame (selected-frame)) - (select-frame-set-input-focus frame)) - (select-window window)) - (setq res (car res))) - - (funcall (or avy-action 'avy-action-goto) - (if (consp res) - (car res) - res))))))) - -(defvar avy--overlays-back nil - "Hold overlays for when `avy-background' is t.") - -(defun avy--make-backgrounds (wnd-list) - "Create a dim background overlay for each window on WND-LIST." - (when avy-background - (setq avy--overlays-back - (mapcar (lambda (w) - (let ((ol (make-overlay - (window-start w) - (window-end w) - (window-buffer w)))) - (overlay-put ol 'face 'avy-background-face) - (overlay-put ol 'window w) - ol)) - wnd-list)))) - -(defun avy--done () - "Clean up overlays." - (mapc #'delete-overlay avy--overlays-back) - (setq avy--overlays-back nil) - (avy--remove-leading-chars)) - -(defun avy--next-visible-point () - "Return the next closest point without 'invisible property." - (let ((s (point))) - (while (and (not (= (point-max) (setq s (next-char-property-change s)))) - (get-char-property s 'invisible))) - s)) - -(defun avy--next-invisible-point () - "Return the next closest point with 'invisible property." - (let ((s (point))) - (while (and (not (= (point-max) (setq s (next-char-property-change s)))) - (not (get-char-property s 'invisible)))) - s)) - -(defun avy--find-visible-regions (rbeg rend) - "Return a list of all visible regions between RBEG and REND." - (setq rbeg (max rbeg (point-min))) - (setq rend (min rend (point-max))) - (when (< rbeg rend) - (let (visibles beg) - (save-excursion - (save-restriction - (narrow-to-region rbeg rend) - (setq beg (goto-char (point-min))) - (while (not (= (point) (point-max))) - (goto-char (avy--next-invisible-point)) - (push (cons beg (point)) visibles) - (setq beg (goto-char (avy--next-visible-point)))) - (nreverse visibles)))))) - -(defun avy--regex-candidates (regex &optional beg end pred group) - "Return all elements that match REGEX. -Each element of the list is ((BEG . END) . WND) -When PRED is non-nil, it's a filter for matching point positions. -When GROUP is non-nil, (BEG . END) should delimit that regex group." - (setq group (or group 0)) - (let ((case-fold-search (or avy-case-fold-search - (string= regex (downcase regex)))) - candidates) - (avy-dowindows current-prefix-arg - (dolist (pair (avy--find-visible-regions - (or beg (window-start)) - (or end (window-end (selected-window) t)))) - (save-excursion - (goto-char (car pair)) - (while (re-search-forward regex (cdr pair) t) - (unless (get-char-property (1- (point)) 'invisible) - (when (or (null pred) - (funcall pred)) - (push (cons (cons (match-beginning group) - (match-end group)) - wnd) candidates))))))) - (nreverse candidates))) - -(defvar avy--overlay-offset 0 - "The offset to apply in `avy--overlay'.") - -(defvar avy--overlays-lead nil - "Hold overlays for leading chars.") - -(defun avy--remove-leading-chars () - "Remove leading char overlays." - (mapc #'delete-overlay avy--overlays-lead) - (setq avy--overlays-lead nil)) - -(defun avy--old-str (pt wnd) - "Return a one-char string at PT in WND." - (let ((old-str (with-selected-window wnd - (buffer-substring pt (1+ pt))))) - (if avy-background - (propertize old-str 'face 'avy-background-face) - old-str))) - -(defun avy--overlay (str beg end wnd &optional compose-fn) - "Create an overlay with STR from BEG to END in WND. -COMPOSE-FN is a lambda that concatenates the old string at BEG with STR." - (let ((eob (with-selected-window wnd (point-max)))) - (when (<= beg eob) - (let* ((beg (+ beg avy--overlay-offset)) - (ol (make-overlay beg (or end (1+ beg)) (window-buffer wnd))) - (old-str (if (eq beg eob) "" (avy--old-str beg wnd))) - (os-line-prefix (get-text-property 0 'line-prefix old-str)) - (os-wrap-prefix (get-text-property 0 'wrap-prefix old-str)) - other-ol) - (when os-line-prefix - (add-text-properties 0 1 `(line-prefix ,os-line-prefix) str)) - (when os-wrap-prefix - (add-text-properties 0 1 `(wrap-prefix ,os-wrap-prefix) str)) - (when (setq other-ol (cl-find-if - (lambda (o) (overlay-get o 'goto-address)) - (overlays-at beg))) - (add-text-properties - 0 (length old-str) - `(face ,(overlay-get other-ol 'face)) old-str)) - (overlay-put ol 'window wnd) - (overlay-put ol 'category 'avy) - (overlay-put ol (if (eq beg eob) - 'after-string - 'display) - (funcall - (or compose-fn #'concat) - str old-str)) - (push ol avy--overlays-lead))))) - -(defcustom avy-highlight-first nil - "When non-nil highlight the first decision char with `avy-lead-face-0'. -Do this even when the char is terminating." - :type 'boolean) - -(defun avy--key-to-char (c) - "If C is no character, translate it using `avy-key-to-char-alist'." - (if (characterp c) - c - (or (cdr (assoc c avy-key-to-char-alist)) - (error "Unknown key %s" c)))) - -(defun avy-candidate-beg (leaf) - "Return the start position for LEAF." - (cond ((numberp leaf) - leaf) - ((consp (car leaf)) - (caar leaf)) - (t - (car leaf)))) - -(defun avy-candidate-end (leaf) - "Return the end position for LEAF." - (cond ((numberp leaf) - leaf) - ((consp (car leaf)) - (cdar leaf)) - (t - (car leaf)))) - -(defun avy-candidate-wnd (leaf) - "Return the window for LEAF." - (if (consp leaf) - (cdr leaf) - (selected-window))) - -(defun avy--overlay-pre (path leaf) - "Create an overlay with PATH at LEAF. -PATH is a list of keys from tree root to LEAF. -LEAF is normally ((BEG . END) . WND)." - (let* ((path (mapcar #'avy--key-to-char path)) - (str (propertize (apply #'string (reverse path)) - 'face 'avy-lead-face))) - (when (or avy-highlight-first (> (length str) 1)) - (set-text-properties 0 1 '(face avy-lead-face-0) str)) - (setq str (concat - (propertize avy-current-path - 'face 'avy-lead-face-1) - str)) - (avy--overlay - str - (avy-candidate-beg leaf) nil - (avy-candidate-wnd leaf)))) - -(defun avy--overlay-at (path leaf) - "Create an overlay with PATH at LEAF. -PATH is a list of keys from tree root to LEAF. -LEAF is normally ((BEG . END) . WND)." - (let* ((path (mapcar #'avy--key-to-char path)) - (str (propertize - (string (car (last path))) - 'face 'avy-lead-face))) - (avy--overlay - str - (avy-candidate-beg leaf) nil - (avy-candidate-wnd leaf) - (lambda (str old-str) - (cond ((string= old-str "\n") - (concat str "\n")) - ;; add padding for wide-width character - ((eq (string-width old-str) 2) - (concat str " ")) - (t - str)))))) - -(defun avy--overlay-at-full (path leaf) - "Create an overlay with PATH at LEAF. -PATH is a list of keys from tree root to LEAF. -LEAF is normally ((BEG . END) . WND)." - (let* ((path (mapcar #'avy--key-to-char path)) - (str (propertize - (apply #'string (reverse path)) - 'face 'avy-lead-face)) - (len (length path)) - (beg (avy-candidate-beg leaf)) - (wnd (cdr leaf)) - end) - (dotimes (i len) - (set-text-properties (- len i 1) (- len i) - `(face ,(nth i avy-lead-faces)) - str)) - (when (eq avy-style 'de-bruijn) - (setq str (concat - (propertize avy-current-path - 'face 'avy-lead-face-1) - str)) - (setq len (length str))) - (with-selected-window wnd - (save-excursion - (goto-char beg) - (let* ((lep (if (bound-and-true-p visual-line-mode) - (save-excursion - (end-of-visual-line) - (point)) - (line-end-position))) - (len-and-str (avy--update-offset-and-str len str lep))) - (setq len (car len-and-str)) - (setq str (cdr len-and-str)) - (setq end (if (= beg lep) - (1+ beg) - (min (+ beg - (if (eq (char-after) ?\t) - 1 - len)) - lep))) - (when (and (bound-and-true-p visual-line-mode) - (> len (- end beg)) - (not (eq lep beg))) - (setq len (- end beg)) - (let ((old-str (apply #'string (reverse path)))) - (setq str - (substring - (propertize - old-str - 'face - (if (= (length old-str) 1) - 'avy-lead-face - 'avy-lead-face-0)) - 0 len))))))) - (avy--overlay - str beg end wnd - (lambda (str old-str) - (cond ((string= old-str "\n") - (concat str "\n")) - ((string= old-str "\t") - (concat str (make-string (max (- tab-width len) 0) ?\ ))) - (t - ;; add padding for wide-width character - (if (eq (string-width old-str) 2) - (concat str " ") - str))))))) - -(defun avy--overlay-post (path leaf) - "Create an overlay with PATH at LEAF. -PATH is a list of keys from tree root to LEAF. -LEAF is normally ((BEG . END) . WND)." - (let* ((path (mapcar #'avy--key-to-char path)) - (str (propertize (apply #'string (reverse path)) - 'face 'avy-lead-face))) - (when (or avy-highlight-first (> (length str) 1)) - (set-text-properties 0 1 '(face avy-lead-face-0) str)) - (setq str (concat - (propertize avy-current-path - 'face 'avy-lead-face-1) - str)) - (avy--overlay - str - (avy-candidate-end leaf) nil - (avy-candidate-wnd leaf)))) - -(defun avy--update-offset-and-str (offset str lep) - "Recalculate the length of the new overlay at point. - -OFFSET is the previous overlay length. -STR is the overlay string that we wish to add. -LEP is the line end position. - -We want to add an overlay between point and END=point+OFFSET. -When other overlays already exist between point and END, set -OFFSET to be the difference between the start of the first -overlay and point. This is equivalent to truncating our new -overlay, so that it doesn't intersect with overlays that already -exist." - (let* ((wnd (selected-window)) - (beg (point)) - (oov (delq nil - (mapcar - (lambda (o) - (and (eq (overlay-get o 'category) 'avy) - (eq (overlay-get o 'window) wnd) - (overlay-start o))) - (overlays-in beg (min (+ beg offset) lep)))))) - (when oov - (setq offset (- (apply #'min oov) beg)) - (setq str (substring str 0 offset))) - (let ((other-ov (cl-find-if - (lambda (o) - (and (eq (overlay-get o 'category) 'avy) - (eq (overlay-start o) beg) - (not (eq (overlay-get o 'window) wnd)))) - (overlays-in (point) (min (+ (point) offset) lep))))) - (when (and other-ov - (> (overlay-end other-ov) - (+ beg offset))) - (setq str (concat str (buffer-substring - (+ beg offset) - (overlay-end other-ov)))) - (setq offset (- (overlay-end other-ov) - beg)))) - (cons offset str))) - -(defun avy--style-fn (style) - "Transform STYLE symbol to a style function." - (cl-case style - (pre #'avy--overlay-pre) - (at #'avy--overlay-at) - (at-full 'avy--overlay-at-full) - (post #'avy--overlay-post) - (de-bruijn #'avy--overlay-at-full) - (t (error "Unexpected style %S" style)))) - -(defun avy--generic-jump (regex window-flip style &optional beg end) - "Jump to REGEX. -When WINDOW-FLIP is non-nil, do the opposite of `avy-all-windows'. -STYLE determines the leading char overlay style. -BEG and END delimit the area where candidates are searched." - (let ((avy-all-windows - (if window-flip - (not avy-all-windows) - avy-all-windows))) - (avy--process - (avy--regex-candidates regex beg end) - (avy--style-fn style)))) - -;;* Commands -;;;###autoload -(defun avy-goto-char (char &optional arg) - "Jump to the currently visible CHAR. -The window scope is determined by `avy-all-windows' (ARG negates it)." - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-char - (avy--generic-jump - (if (= 13 char) - "\n" - (regexp-quote (string char))) - arg - avy-style))) - -;;;###autoload -(defun avy-goto-char-in-line (char) - "Jump to the currently visible CHAR in the current line." - (interactive (list (read-char "char: " t))) - (avy-with avy-goto-char - (avy--generic-jump - (regexp-quote (string char)) - avy-all-windows - avy-style - (line-beginning-position) - (line-end-position)))) - -;;;###autoload -(defun avy-goto-char-2 (char1 char2 &optional arg beg end) - "Jump to the currently visible CHAR1 followed by CHAR2. -The window scope is determined by `avy-all-windows' (ARG negates it)." - (interactive (list (read-char "char 1: " t) - (read-char "char 2: " t) - current-prefix-arg - nil nil)) - (when (eq char1 ? ) - (setq char1 ?\n)) - (when (eq char2 ? ) - (setq char2 ?\n)) - (avy-with avy-goto-char-2 - (avy--generic-jump - (regexp-quote (string char1 char2)) - arg - avy-style - beg end))) - -;;;###autoload -(defun avy-goto-char-2-above (char1 char2 &optional arg) - "Jump to the currently visible CHAR1 followed by CHAR2. -This is a scoped version of `avy-goto-char-2', where the scope is -the visible part of the current buffer up to point." - (interactive (list (read-char "char 1: " t) - (read-char "char 2: " t) - current-prefix-arg)) - (avy-with avy-goto-char-2-above - (avy-goto-char-2 - char1 char2 arg - (window-start) (point)))) - -;;;###autoload -(defun avy-goto-char-2-below (char1 char2 &optional arg) - "Jump to the currently visible CHAR1 followed by CHAR2. -This is a scoped version of `avy-goto-char-2', where the scope is -the visible part of the current buffer following point." - (interactive (list (read-char "char 1: " t) - (read-char "char 2: " t) - current-prefix-arg)) - (avy-with avy-goto-char-2-below - (avy-goto-char-2 - char1 char2 arg - (point) (window-end (selected-window) t)))) - -;;;###autoload -(defun avy-isearch () - "Jump to one of the current isearch candidates." - (interactive) - (avy-with avy-isearch - (let ((avy-background nil)) - (avy--process - (avy--regex-candidates (if isearch-regexp - isearch-string - (regexp-quote isearch-string))) - (avy--style-fn avy-style)) - (isearch-done)))) - -;;;###autoload -(defun avy-goto-word-0 (arg) - "Jump to a word start. -The window scope is determined by `avy-all-windows' (ARG negates it)." - (interactive "P") - (avy-with avy-goto-word-0 - (avy--generic-jump avy-goto-word-0-regexp arg avy-style))) - -;;;###autoload -(defun avy-goto-word-1 (char &optional arg beg end symbol) - "Jump to the currently visible CHAR at a word start. -The window scope is determined by `avy-all-windows' (ARG negates it)." - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-word-1 - (let* ((str (string char)) - (regex (cond ((string= str ".") - "\\.") - ((and avy-word-punc-regexp - (string-match avy-word-punc-regexp str)) - (regexp-quote str)) - ((<= char 26) - str) - (t - (concat - (if symbol "\\_<" "\\b") - str))))) - (avy--generic-jump regex arg avy-style beg end)))) - -;;;###autoload -(defun avy-goto-word-1-above (char &optional arg) - "Jump to the currently visible CHAR at a word start. -This is a scoped version of `avy-goto-word-1', where the scope is -the visible part of the current buffer up to point. " - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-word-1 - (avy-goto-word-1 char arg (window-start) (point)))) - -;;;###autoload -(defun avy-goto-word-1-below (char &optional arg) - "Jump to the currently visible CHAR at a word start. -This is a scoped version of `avy-goto-word-1', where the scope is -the visible part of the current buffer following point. " - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-word-1 - (avy-goto-word-1 char arg (point) (window-end (selected-window) t)))) - -;;;###autoload -(defun avy-goto-symbol-1 (char &optional arg) - "Jump to the currently visible CHAR at a symbol start. -The window scope is determined by `avy-all-windows' (ARG negates it)." - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-symbol-1 - (avy-goto-word-1 char arg nil nil t))) - -;;;###autoload -(defun avy-goto-symbol-1-above (char &optional arg) - "Jump to the currently visible CHAR at a symbol start. -This is a scoped version of `avy-goto-symbol-1', where the scope is -the visible part of the current buffer up to point. " - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-symbol-1-above - (avy-goto-word-1 char arg (window-start) (point) t))) - -;;;###autoload -(defun avy-goto-symbol-1-below (char &optional arg) - "Jump to the currently visible CHAR at a symbol start. -This is a scoped version of `avy-goto-symbol-1', where the scope is -the visible part of the current buffer following point. " - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-symbol-1-below - (avy-goto-word-1 char arg (point) (window-end (selected-window) t) t))) - -(declare-function subword-backward "subword") -(defvar subword-backward-regexp) - -(defcustom avy-subword-extra-word-chars '(?{ ?= ?} ?* ?: ?> ?<) - "A list of characters that should temporarily match \"\\w\". -This variable is used by `avy-goto-subword-0' and `avy-goto-subword-1'." - :type '(repeat character)) - -;;;###autoload -(defun avy-goto-subword-0 (&optional arg predicate) - "Jump to a word or subword start. - -The window scope is determined by `avy-all-windows' (ARG negates it). - -When PREDICATE is non-nil it's a function of zero parameters that -should return true." - (interactive "P") - (require 'subword) - (avy-with avy-goto-subword-0 - (let ((case-fold-search nil) - (subword-backward-regexp - "\\(\\(\\W\\|[[:lower:][:digit:]]\\)\\([!-/:@`~[:upper:]]+\\W*\\)\\|\\W\\w+\\)") - candidates) - (avy-dowindows arg - (let ((syn-tbl (copy-syntax-table))) - (dolist (char avy-subword-extra-word-chars) - (modify-syntax-entry char "w" syn-tbl)) - (with-syntax-table syn-tbl - (let ((ws (window-start)) - window-cands) - (save-excursion - (goto-char (window-end (selected-window) t)) - (subword-backward) - (while (> (point) ws) - (when (or (null predicate) - (and predicate (funcall predicate))) - (unless (get-char-property (point) 'invisible) - (push (cons (point) (selected-window)) window-cands))) - (subword-backward)) - (and (= (point) ws) - (or (null predicate) - (and predicate (funcall predicate))) - (not (get-char-property (point) 'invisible)) - (push (cons (point) (selected-window)) window-cands))) - (setq candidates (nconc candidates window-cands)))))) - (avy--process candidates (avy--style-fn avy-style))))) - -;;;###autoload -(defun avy-goto-subword-1 (char &optional arg) - "Jump to the currently visible CHAR at a subword start. -The window scope is determined by `avy-all-windows' (ARG negates it). -The case of CHAR is ignored." - (interactive (list (read-char "char: " t) - current-prefix-arg)) - (avy-with avy-goto-subword-1 - (let ((char (downcase char))) - (avy-goto-subword-0 - arg (lambda () - (and (char-after) - (eq (downcase (char-after)) char))))))) - -;;;###autoload -(defun avy-goto-word-or-subword-1 () - "Forward to `avy-goto-subword-1' or `avy-goto-word-1'. -Which one depends on variable `subword-mode'." - (interactive) - (if (bound-and-true-p subword-mode) - (call-interactively #'avy-goto-subword-1) - (call-interactively #'avy-goto-word-1))) - -(defvar visual-line-mode) - -(defun avy--line-cands (&optional arg beg end) - (let (candidates) - (avy-dowindows arg - (let ((ws (or beg (window-start)))) - (save-excursion - (save-restriction - (narrow-to-region ws (or end (window-end (selected-window) t))) - (goto-char (point-min)) - (while (< (point) (point-max)) - (unless (get-char-property - (max (1- (point)) ws) 'invisible) - (push (cons - (if (eq avy-style 'post) - (line-end-position) - (point)) - (selected-window)) candidates)) - (if visual-line-mode - (progn - (setq temporary-goal-column 0) - (line-move-visual 1 t)) - (forward-line 1))))))) - (nreverse candidates))) - -(defun avy--linum-strings () - (let* ((lines (mapcar #'car (avy--line-cands))) - (line-tree (avy-tree lines avy-keys)) - (line-list nil)) - (avy-traverse - line-tree - (lambda (path _leaf) - (let ((str (propertize (apply #'string (reverse path)) - 'face 'avy-lead-face))) - (when (> (length str) 1) - (set-text-properties 0 1 '(face avy-lead-face-0) str)) - (push str line-list)))) - (nreverse line-list))) - -(defvar linum-available) -(defvar linum-overlays) -(defvar linum-format) -(declare-function linum--face-width "linum") - -(define-minor-mode avy-linum-mode - "Minor mode that uses avy hints for `linum-mode'." - :group 'avy - (if avy-linum-mode - (progn - (require 'linum) - (advice-add 'linum-update-window :around 'avy--linum-update-window) - (linum-mode 1)) - (advice-remove 'linum-update-window 'avy--linum-update-window) - (linum-mode -1))) - -(defun avy--linum-update-window (_ win) - "Update line numbers for the portion visible in window WIN." - (goto-char (window-start win)) - (let ((line (line-number-at-pos)) - (limit (window-end win t)) - (fmt (cond ((stringp linum-format) linum-format) - ((eq linum-format 'dynamic) - (let ((w (length (number-to-string - (count-lines (point-min) (point-max)))))) - (concat "%" (number-to-string w) "d"))))) - (width 0) - (avy-strs (when avy-linum-mode - (avy--linum-strings)))) - (run-hooks 'linum-before-numbering-hook) - ;; Create an overlay (or reuse an existing one) for each - ;; line visible in this window, if necessary. - (while (and (not (eobp)) (< (point) limit)) - (let* ((str - (cond (avy-linum-mode - (pop avy-strs)) - (fmt - (propertize (format fmt line) 'face 'linum)) - (t - (funcall linum-format line)))) - (visited (catch 'visited - (dolist (o (overlays-in (point) (point))) - (when (equal-including-properties - (overlay-get o 'linum-str) str) - (unless (memq o linum-overlays) - (push o linum-overlays)) - (setq linum-available (delq o linum-available)) - (throw 'visited t)))))) - (setq width (max width (length str))) - (unless visited - (let ((ov (if (null linum-available) - (make-overlay (point) (point)) - (move-overlay (pop linum-available) (point) (point))))) - (push ov linum-overlays) - (overlay-put ov 'before-string - (propertize " " 'display `((margin left-margin) ,str))) - (overlay-put ov 'linum-str str)))) - ;; Text may contain those nasty intangible properties, but that - ;; shouldn't prevent us from counting those lines. - (let ((inhibit-point-motion-hooks t)) - (forward-line)) - (setq line (1+ line))) - (when (display-graphic-p) - (setq width (ceiling - (/ (* width 1.0 (linum--face-width 'linum)) - (frame-char-width))))) - (set-window-margins win width (cdr (window-margins win))))) - -(defun avy--line (&optional arg beg end) - "Select a line. -The window scope is determined by `avy-all-windows' (ARG negates it). -Narrow the scope to BEG END." - (let ((avy-action #'identity)) - (avy--process - (avy--line-cands arg beg end) - (if avy-linum-mode - (progn (message "Goto line:") - 'ignore) - (avy--style-fn avy-style))))) - -;;;###autoload -(defun avy-goto-line (&optional arg) - "Jump to a line start in current buffer. - -When ARG is 1, jump to lines currently visible, with the option -to cancel to `goto-line' by entering a number. - -When ARG is 4, negate the window scope determined by -`avy-all-windows'. - -Otherwise, forward to `goto-line' with ARG." - (interactive "p") - (setq arg (or arg 1)) - (if (not (memq arg '(1 4))) - (progn - (goto-char (point-min)) - (forward-line (1- arg))) - (avy-with avy-goto-line - (let* ((avy-handler-old avy-handler-function) - (avy-handler-function - (lambda (char) - (if (or (< char ?0) - (> char ?9)) - (funcall avy-handler-old char) - (let ((line (read-from-minibuffer - "Goto line: " (string char)))) - (when line - (avy-push-mark) - (save-restriction - (widen) - (goto-char (point-min)) - (forward-line (1- (string-to-number line)))) - (throw 'done 'exit)))))) - (r (avy--line (eq arg 4)))) - (unless (eq r t) - (avy-action-goto r)))))) - -;;;###autoload -(defun avy-goto-line-above () - "Goto visible line above the cursor." - (interactive) - (let* ((avy-all-windows nil) - (r (avy--line nil (window-start) - (line-beginning-position)))) - (unless (eq r t) - (avy-action-goto r)))) - -;;;###autoload -(defun avy-goto-line-below () - "Goto visible line below the cursor." - (interactive) - (let* ((avy-all-windows nil) - (r (avy--line - nil (line-beginning-position 2) - (window-end (selected-window) t)))) - (unless (eq r t) - (avy-action-goto r)))) - -(defcustom avy-line-insert-style 'above - "How to insert the newly copied/cut line." - :type '(choice - (const :tag "Above" above) - (const :tag "Below" below))) - -;;;###autoload -(defun avy-copy-line (arg) - "Copy a selected line above the current line. -ARG lines can be used." - (interactive "p") - (let ((initial-window (selected-window))) - (avy-with avy-copy-line - (let* ((start (avy--line)) - (str (buffer-substring-no-properties - start - (save-excursion - (goto-char start) - (move-end-of-line arg) - (point))))) - (select-window initial-window) - (cond ((eq avy-line-insert-style 'above) - (beginning-of-line) - (save-excursion - (insert str "\n"))) - ((eq avy-line-insert-style 'below) - (end-of-line) - (insert "\n" str) - (beginning-of-line)) - (t - (user-error "Unexpected `avy-line-insert-style'"))))))) - -;;;###autoload -(defun avy-move-line (arg) - "Move a selected line above the current line. -ARG lines can be used." - (interactive "p") - (let ((initial-window (selected-window))) - (avy-with avy-move-line - (let ((start (avy--line))) - (save-excursion - (goto-char start) - (kill-whole-line arg)) - (select-window initial-window) - (cond ((eq avy-line-insert-style 'above) - (beginning-of-line) - (save-excursion - (insert - (current-kill 0)))) - ((eq avy-line-insert-style 'below) - (end-of-line) - (newline) - (save-excursion - (insert (substring (current-kill 0) 0 -1)))) - (t - (user-error "Unexpected `avy-line-insert-style'"))))))) - -;;;###autoload -(defun avy-copy-region (arg) - "Select two lines and copy the text between them to point. - -The window scope is determined by `avy-all-windows' or -`avy-all-windows-alt' when ARG is non-nil." - (interactive "P") - (let ((initial-window (selected-window))) - (avy-with avy-copy-region - (let* ((beg (save-selected-window - (avy--line arg))) - (end (avy--line arg)) - (str (buffer-substring-no-properties - beg - (save-excursion - (goto-char end) - (line-end-position))))) - (select-window initial-window) - (cond ((eq avy-line-insert-style 'above) - (beginning-of-line) - (save-excursion - (insert str "\n"))) - ((eq avy-line-insert-style 'below) - (end-of-line) - (newline) - (save-excursion - (insert str))) - (t - (user-error "Unexpected `avy-line-insert-style'"))))))) - -;;;###autoload -(defun avy-move-region () - "Select two lines and move the text between them here." - (interactive) - (avy-with avy-move-region - (let* ((beg (avy--line)) - (end (save-excursion - (goto-char (avy--line)) - (forward-line) - (point))) - (text (buffer-substring beg end)) - (pad (if (bolp) "" "\n"))) - (move-beginning-of-line nil) - (delete-region beg end) - (insert text pad)))) - -;;;###autoload -(defun avy-kill-region (arg) - "Select two lines and kill the region between them. - -The window scope is determined by `avy-all-windows' or -`avy-all-windows-alt' when ARG is non-nil." - (interactive "P") - (let ((initial-window (selected-window))) - (avy-with avy-kill-region - (let* ((beg (save-selected-window - (list (avy--line arg) (selected-window)))) - (end (list (avy--line arg) (selected-window)))) - (cond - ((not (numberp (car beg))) - (user-error "Fail to select the beginning of region.")) - ((not (numberp (car end))) - (user-error "Fail to select the end of region")) - ;; Restrict operation to same window. It's better if it can be - ;; different windows but same buffer; however, then the cloned - ;; buffers with different narrowed regions might cause problem. - ((not (equal (cdr beg) (cdr end))) - (user-error "Selected points are not in the same window")) - ((< (car beg) (car end)) - (save-excursion - (kill-region - (car beg) - (progn (goto-char (car end)) (forward-visible-line 1) (point))))) - (t - (save-excursion - (kill-region - (progn (goto-char (car beg)) (forward-visible-line 1) (point)) - (car end))))))) - (select-window initial-window))) - -;;;###autoload -(defun avy-kill-ring-save-region (arg) - "Select two lines and save the region between them to the kill ring." - (interactive "P") - (let ((initial-window (selected-window))) - (avy-with avy-kill-ring-save-region - (let* ((beg (save-selected-window - (list (avy--line arg) (selected-window)))) - (end (list (avy--line arg) (selected-window)))) - (cond - ((not (numberp (car beg))) - (user-error "Fail to select the beginning of region.")) - ((not (numberp (car end))) - (user-error "Fail to select the end of region")) - ((not (equal (cdr beg) (cdr end))) - (user-error "Selected points are not in the same window")) - ((< (car beg) (car end)) - (save-excursion - (kill-ring-save - (car beg) - (progn (goto-char (car end)) (forward-visible-line 1) (point))))) - (t - (save-excursion - (kill-ring-save - (progn (goto-char (car beg)) (forward-visible-line 1) (point)) - (car end))))))) - (select-window initial-window))) - -;;;###autoload -(defun avy-kill-whole-line (arg) - "Select line and kill the whole selected line. - -With a numerical prefix ARG, kill ARG line(s) starting from the -selected line. If ARG is negative, kill backward. - -If ARG is zero, kill the selected line but exclude the trailing -newline. - -\\[universal-argument] 3 \\[avy-kil-whole-line] kill three lines -starting from the selected line. \\[universal-argument] -3 - -\\[avy-kill-whole-line] kill three lines backward including the -selected line." - (interactive "P") - (let ((initial-window (selected-window))) - (avy-with avy-kill-whole-line - (let* ((start (avy--line))) - (if (not (numberp start)) - (user-error "Fail to select the line to kill") - (save-excursion (goto-char start) - (kill-whole-line arg))))) - (select-window initial-window))) - -;;;###autoload -(defun avy-kill-ring-save-whole-line (arg) - "Select line and Save the whole selected line as if killed, but don’t kill it. - -This command is similar to `avy-kill-whole-line', except that it -saves the line(s) as if killed, but does not kill it(them)." - (interactive "P") - (let ((initial-window (selected-window))) - (avy-with avy-kill-ring-save-whole-line - (let* ((start (avy--line))) - (if (not (numberp start)) - (user-error "Fail to select the line to kill") - (save-excursion - (let ((kill-read-only-ok t) - (buffer-read-only t)) - (goto-char start) - (kill-whole-line arg)))))) - (select-window initial-window))) - -;;;###autoload -(defun avy-setup-default () - "Setup the default shortcuts." - (eval-after-load "isearch" - '(define-key isearch-mode-map (kbd "C-'") 'avy-isearch))) - -(defcustom avy-timeout-seconds 0.5 - "How many seconds to wait for the second char." - :type 'float) - -(defun avy--read-candidates () - "Read as many chars as possible and return their occurences. -At least one char must be read, and then repeatedly one next char -may be read if it is entered before `avy-timeout-seconds'. `DEL' -deletes the last char entered, and `RET' exits with the currently -read string immediately instead of waiting for another char for -`avy-timeout-seconds'. -The format of the result is the same as that of `avy--regex-candidates'. -This function obeys `avy-all-windows' setting." - (let ((str "") char break overlays regex) - (unwind-protect - (progn - (while (and (not break) - (setq char - (read-char (format "char%s: " - (if (string= str "") - str - (format " (%s)" str))) - t - (and (not (string= str "")) - avy-timeout-seconds)))) - ;; Unhighlight - (dolist (ov overlays) - (delete-overlay ov)) - (setq overlays nil) - (cond - ;; Handle RET - ((= char 13) - (setq break t)) - ;; Handle DEL - ((= char 127) - (let ((l (length str))) - (when (>= l 1) - (setq str (substring str 0 (1- l)))))) - (t - (setq str (concat str (list char))))) - ;; Highlight - (when (>= (length str) 1) - (let ((case-fold-search - (or avy-case-fold-search (string= str (downcase str)))) - found) - (avy-dowindows current-prefix-arg - (dolist (pair (avy--find-visible-regions - (window-start) - (window-end (selected-window) t))) - (save-excursion - (goto-char (car pair)) - (setq regex (regexp-quote str)) - (while (re-search-forward regex (cdr pair) t) - (unless (get-char-property (1- (point)) 'invisible) - (let ((ov (make-overlay - (match-beginning 0) - (match-end 0)))) - (setq found t) - (push ov overlays) - (overlay-put - ov 'window (selected-window)) - (overlay-put - ov 'face 'avy-goto-char-timer-face))))))) - ;; No matches at all, so there's surely a typo in the input. - (unless found (beep))))) - (nreverse (mapcar (lambda (ov) - (cons (cons (overlay-start ov) - (overlay-end ov)) - (overlay-get ov 'window))) - overlays))) - (dolist (ov overlays) - (delete-overlay ov))))) - -;;;###autoload -(defun avy-goto-char-timer (&optional arg) - "Read one or many consecutive chars and jump to the first one. -The window scope is determined by `avy-all-windows' (ARG negates it)." - (interactive "P") - (let ((avy-all-windows (if arg - (not avy-all-windows) - avy-all-windows))) - (avy-with avy-goto-char-timer - (avy--process - (avy--read-candidates) - (avy--style-fn avy-style))))) - -(defun avy-push-mark () - "Store the current point and window." - (ring-insert avy-ring - (cons (point) (selected-window))) - (unless (region-active-p) - (push-mark))) - -(defun avy-pop-mark () - "Jump back to the last location of `avy-push-mark'." - (interactive) - (let (res) - (condition-case nil - (progn - (while (not (window-live-p - (cdr (setq res (ring-remove avy-ring 0)))))) - (let* ((window (cdr res)) - (frame (window-frame window))) - (when (and (frame-live-p frame) - (not (eq frame (selected-frame)))) - (select-frame-set-input-focus frame)) - (select-window window) - (goto-char (car res)))) - (error - (set-mark-command 4))))) - -(provide 'avy) - -;;; avy.el ends here diff --git a/elpa/beacon-20161004.756/beacon-autoloads.el b/elpa/beacon-20161004.756/beacon-autoloads.el deleted file mode 100644 index d9b2d94..0000000 --- a/elpa/beacon-20161004.756/beacon-autoloads.el +++ /dev/null @@ -1,43 +0,0 @@ -;;; beacon-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "beacon" "beacon.el" (22536 46955 18715 721000)) -;;; Generated autoloads from beacon.el - -(autoload 'beacon-blink "beacon" "\ -Blink the beacon at the position of the cursor. -Unlike `beacon-blink-automated', the beacon will blink -unconditionally (even if `beacon-mode' is disabled), and this can -be invoked as a user command or called from lisp code. - -\(fn)" t nil) - -(defvar beacon-mode nil "\ -Non-nil if Beacon mode is enabled. -See the `beacon-mode' command -for a description of this minor mode. -Setting this variable directly does not take effect; -either customize it (see the info node `Easy Customization') -or call the function `beacon-mode'.") - -(custom-autoload 'beacon-mode "beacon" nil) - -(autoload 'beacon-mode "beacon" "\ -Toggle Beacon mode on or off. -With a prefix argument ARG, enable Beacon mode if ARG is -positive, and disable it otherwise. If called from Lisp, enable -the mode if ARG is omitted or nil, and toggle it if ARG is `toggle'. -\\{beacon-mode-map} - -\(fn &optional ARG)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; beacon-autoloads.el ends here diff --git a/elpa/beacon-20161004.756/beacon-pkg.el b/elpa/beacon-20161004.756/beacon-pkg.el deleted file mode 100644 index dd7b1cc..0000000 --- a/elpa/beacon-20161004.756/beacon-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "beacon" "20161004.756" "Highlight the cursor whenever the window scrolls" '((seq "2.14")) :url "https://github.com/Malabarba/beacon" :keywords '("convenience")) diff --git a/elpa/beacon-20161004.756/beacon.el b/elpa/beacon-20161004.756/beacon.el deleted file mode 100644 index 57b17e2..0000000 --- a/elpa/beacon-20161004.756/beacon.el +++ /dev/null @@ -1,481 +0,0 @@ -;;; beacon.el --- Highlight the cursor whenever the window scrolls -*- lexical-binding: t; -*- - -;; Copyright (C) 2015 Free Software Foundation, Inc. - -;; Author: Artur Malabarba -;; URL: https://github.com/Malabarba/beacon -;; Package-Version: 20161004.756 -;; Keywords: convenience -;; Version: 1.3.2 -;; Package-Requires: ((seq "2.14")) - -;; 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 3 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 . - -;;; Commentary: - -;; This is a global minor-mode. Turn it on everywhere with: -;; ┌──── -;; │ (beacon-mode 1) -;; └──── -;; -;; Whenever the window scrolls a light will shine on top of your cursor so -;; you know where it is. -;; -;; That’s it. -;; -;; See the accompanying Readme.org for configuration details. - -;;; Code: - -(require 'seq) -(require 'faces) -(unless (fboundp 'seq-mapn) - ;; This is for people who are on outdated Emacs snapshots. Will be - ;; deleted in a couple of weeks. - (defun seq-mapn (function sequence &rest sequences) - "Like `seq-map' but FUNCTION is mapped over all SEQUENCES. -The arity of FUNCTION must match the number of SEQUENCES, and the -mapping stops on the shortest sequence. -Return a list of the results. - -\(fn FUNCTION SEQUENCES...)" - (let ((result nil) - (sequences (seq-map (lambda (s) (seq-into s 'list)) - (cons sequence sequences)))) - (while (not (memq nil sequences)) - (push (apply function (seq-map #'car sequences)) result) - (setq sequences (seq-map #'cdr sequences))) - (nreverse result)))) - -(defgroup beacon nil - "Customization group for beacon." - :group 'emacs - :prefix "beacon-") - -(defvar beacon--timer nil) - -(defcustom beacon-push-mark 35 - "Should the mark be pushed before long movements? -If nil, `beacon' will not push the mark. -Otherwise this should be a number, and `beacon' will push the -mark whenever point moves more than that many lines." - :type '(choice integer (const nil))) - -(defcustom beacon-blink-when-point-moves-vertically nil - "Should the beacon blink when moving a long distance vertically? -If nil, don't blink due to vertical movement. -If non-nil, this should be an integer, which is the minimum -movement distance (in lines) that triggers a beacon blink." - :type '(choice integer (const nil))) - -(defcustom beacon-blink-when-point-moves-horizontally nil - "Should the beacon blink when moving a long distance horizontally? -If nil, don't blink due to horizontal movement. -If non-nil, this should be an integer, which is the minimum -movement distance (in columns) that triggers a beacon blink." - :type '(choice integer (const nil))) - -(defcustom beacon-blink-when-buffer-changes t - "Should the beacon blink when changing buffer?" - :type 'boolean) - -(defcustom beacon-blink-when-window-scrolls t - "Should the beacon blink when the window scrolls?" - :type 'boolean) - -(defcustom beacon-blink-when-window-changes t - "Should the beacon blink when the window changes?" - :type 'boolean) - -(defcustom beacon-blink-when-focused nil - "Should the beacon blink when Emacs gains focus? -Note that, due to a limitation of `focus-in-hook', this might -trigger false positives on some systems." - :type 'boolean - :package-version '(beacon . "0.2")) - -(defcustom beacon-blink-duration 0.3 - "Time, in seconds, that the blink should last." - :type 'number) - -(defcustom beacon-blink-delay 0.3 - "Time, in seconds, before starting to fade the beacon." - :type 'number) - -(defcustom beacon-size 40 - "Size of the beacon in characters." - :type 'number) - -(defcustom beacon-color 0.5 - "Color of the beacon. -This can be a string or a number. - -If it is a number, the color is taken to be white or -black (depending on the current theme's background) and this -number is a float between 0 and 1 specifing the brightness. - -If it is a string, it is a color name or specification, -e.g. \"#666600\"." - :type '(choice number color)) - -(defface beacon-fallback-background - '((((class color) (background light)) (:background "black")) - (((class color) (background dark)) (:background "white"))) - "Fallback beacon background color. -Used in cases where the color can't be determined by Emacs. -Only the background of this face is used.") - -(defvar beacon-dont-blink-predicates nil - "A list of predicates that prevent the beacon blink. -These predicate functions are called in order, with no -arguments, before blinking the beacon. If any returns -non-nil, the beacon will not blink. - -For instance, if you want to disable beacon on buffers where -`hl-line-mode' is on, you can do: - - (add-hook \\='beacon-dont-blink-predicates - (lambda () (bound-and-true-p hl-line-mode)))") - -(defun beacon--compilation-mode-p () - "Non-nil if this is some form of compilation mode." - (or (derived-mode-p 'compilation-mode) - (bound-and-true-p compilation-minor-mode))) - -(add-hook 'beacon-dont-blink-predicates #'window-minibuffer-p) -(add-hook 'beacon-dont-blink-predicates #'beacon--compilation-mode-p) - -(defcustom beacon-dont-blink-major-modes '(t magit-status-mode magit-popup-mode - inf-ruby-mode - gnus-summary-mode gnus-group-mode) - "A list of major-modes where the beacon won't blink. -Whenever the current buffer satisfies `derived-mode-p' for -one of the major-modes on this list, the beacon will not -blink." - :type '(repeat symbol)) - -(defcustom beacon-dont-blink-commands '(next-line previous-line - forward-line) - "A list of commands that should not make the beacon blink. -Use this for commands that scroll the window in very -predictable ways, when the blink would be more distracting -than helpful.." - :type '(repeat symbol)) - -(defcustom beacon-before-blink-hook nil - "Hook run immediately before blinking the beacon." - :type 'hook) - - -;;; Internal variables -(defvar beacon--window-scrolled nil) -(defvar beacon--previous-place nil) -(defvar beacon--previous-mark-head nil) -(defvar beacon--previous-window nil) -(defvar beacon--previous-window-start 0) - -(defun beacon--record-vars () - (unless (window-minibuffer-p) - (setq beacon--previous-mark-head (car mark-ring)) - (setq beacon--previous-place (point-marker)) - (setq beacon--previous-window (selected-window)) - (setq beacon--previous-window-start (window-start)))) - - -;;; Overlays -(defvar beacon--ovs nil) - -(defconst beacon-overlay-priority (/ most-positive-fixnum 2) - "Priotiy used on all of our overlays.") - -(defun beacon--make-overlay (length &rest properties) - "Put an overlay at point with background COLOR." - (let ((ov (make-overlay (point) (+ length (point))))) - (overlay-put ov 'beacon t) - ;; Our overlay is very temporary, so we take the liberty of giving - ;; it a high priority. - (overlay-put ov 'priority beacon-overlay-priority) - (overlay-put ov 'window (selected-window)) - (while properties - (overlay-put ov (pop properties) (pop properties))) - (push ov beacon--ovs) - ov)) - -(defun beacon--colored-overlay (color) - "Put an overlay at point with background COLOR." - (beacon--make-overlay 1 'face (list :background color))) - -(defun beacon--ov-put-after-string (overlay colors) - "Add an after-string property to OVERLAY. -The property's value is a string of spaces with background -COLORS applied to each one. -If COLORS is nil, OVERLAY is deleted!" - (if (not colors) - (when (overlayp overlay) - (delete-overlay overlay)) - (overlay-put overlay 'beacon-colors colors) - (overlay-put overlay 'after-string - (propertize - (mapconcat (lambda (c) (propertize " " 'face (list :background c))) - colors - "") - 'cursor 1000)))) - -(defun beacon--after-string-overlay (colors) - "Put an overlay at point with an after-string property. -The property's value is a string of spaces with background -COLORS applied to each one." - ;; The after-string must not be longer than the remaining columns - ;; from point to right window-end else it will be wrapped around. - (let ((colors (seq-take colors (- (window-width) (current-column))))) - (beacon--ov-put-after-string (beacon--make-overlay 0) colors))) - -(defun beacon--ov-at-point () - (car (or (seq-filter (lambda (o) (overlay-get o 'beacon)) - (overlays-in (point) (point))) - (seq-filter (lambda (o) (overlay-get o 'beacon)) - (overlays-at (point)))))) - -(defun beacon--vanish (&rest _) - "Turn off the beacon." - (unless (string-match "\\` \\*\\(temp-buffer\\|Echo Area.*\\)\\*" - (buffer-name)) - (when (timerp beacon--timer) - (cancel-timer beacon--timer)) - (mapc #'delete-overlay beacon--ovs) - (setq beacon--ovs nil))) - - -;;; Colors -(defun beacon--int-range (a b) - "Return a list of integers between A inclusive and B exclusive. -Only returns `beacon-size' elements." - (let ((d (/ (- b a) beacon-size)) - (out (list a))) - (dotimes (_ (1- beacon-size)) - (push (+ (car out) d) out)) - (nreverse out))) - -(defun beacon--color-range () - "Return a list of background colors for the beacon." - (let* ((default-bg (or (save-excursion - (unless (eobp) - (forward-line 1) - (unless (or (bobp) (not (bolp))) - (forward-char -1))) - (background-color-at-point)) - (face-background 'default))) - (bg (color-values (if (or (not (stringp default-bg)) - (string-match "\\`unspecified-" default-bg)) - (face-attribute 'beacon-fallback-background :background) - default-bg))) - (fg (cond - ((stringp beacon-color) (color-values beacon-color)) - ((and (stringp bg) - (< (color-distance "black" bg) - (color-distance "white" bg))) - (make-list 3 (* beacon-color 65535))) - (t (make-list 3 (* (- 1 beacon-color) 65535)))))) - (when bg - (apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b)) - (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt bg n)))) - [0 1 2]))))) - - -;;; Blinking -(defun beacon--shine () - "Shine a beacon at point." - (let ((colors (beacon--color-range))) - (save-excursion - (while colors - (if (looking-at "$") - (progn - (beacon--after-string-overlay colors) - (setq colors nil)) - (beacon--colored-overlay (pop colors)) - (forward-char 1)))))) - -(defun beacon--dec () - "Decrease the beacon brightness by one." - (pcase (beacon--ov-at-point) - (`nil (beacon--vanish)) - ((and o (let c (overlay-get o 'beacon-colors)) (guard c)) - (beacon--ov-put-after-string o (cdr c))) - (o - (delete-overlay o) - (save-excursion - (while (and (condition-case nil - (progn (forward-char 1) t) - (end-of-buffer nil)) - (setq o (beacon--ov-at-point))) - (let ((colors (overlay-get o 'beacon-colors))) - (if (not colors) - (move-overlay o (1- (point)) (point)) - (forward-char -1) - (beacon--colored-overlay (pop colors)) - (beacon--ov-put-after-string o colors) - (forward-char 1)))))))) - -;;;###autoload -(defun beacon-blink () - "Blink the beacon at the position of the cursor. -Unlike `beacon-blink-automated', the beacon will blink -unconditionally (even if `beacon-mode' is disabled), and this can -be invoked as a user command or called from lisp code." - (interactive) - (beacon--vanish) - (run-hooks 'beacon-before-blink-hook) - (beacon--shine) - (setq beacon--timer - (run-at-time beacon-blink-delay - (/ beacon-blink-duration 1.0 beacon-size) - #'beacon--dec))) - -(defun beacon-blink-automated () - "If appropriate, blink the beacon at the position of the cursor. -Unlike `beacon-blink', the blinking is conditioned on a series of -variables: `beacon-mode', `beacon-dont-blink-commands', -`beacon-dont-blink-major-modes', and -`beacon-dont-blink-predicates'." - ;; Record vars here in case something is blinking outside the - ;; command loop. - (beacon--record-vars) - (unless (or (not beacon-mode) - (run-hook-with-args-until-success 'beacon-dont-blink-predicates) - (seq-find #'derived-mode-p beacon-dont-blink-major-modes) - (memq (or this-command last-command) beacon-dont-blink-commands)) - (beacon-blink))) - - -;;; Movement detection -(defun beacon--movement-> (delta-y &optional delta-x) - "Return non-nil if latest vertical movement is > DELTA-Y. -If DELTA-Y is nil, return nil. -The same is true for DELTA-X and horizonta movement." - (and delta-y - (markerp beacon--previous-place) - (equal (marker-buffer beacon--previous-place) - (current-buffer)) - ;; Quick check that prevents running the code below in very - ;; short movements (like typing). - (> (abs (- (point) beacon--previous-place)) - delta-y) - ;; Col movement. - (or (and delta-x - (> (abs (- (current-column) - (save-excursion - (goto-char beacon--previous-place) - (current-column)))) - delta-x)) - ;; Check if the movement was >= DELTA lines by moving DELTA - ;; lines. `count-screen-lines' is too slow if the movement had - ;; thousands of lines. - (save-excursion - (let ((p (point))) - (goto-char (min beacon--previous-place p)) - (vertical-motion delta-y) - (> (max p beacon--previous-place) - (line-beginning-position))))))) - -(defun beacon--maybe-push-mark () - "Push mark if it seems to be safe." - (when (and (not mark-active) - (beacon--movement-> beacon-push-mark)) - (let ((head (car mark-ring))) - (when (and (eq beacon--previous-mark-head head) - (not (equal head beacon--previous-place))) - (push-mark beacon--previous-place 'silent))))) - -(defun beacon--post-command () - "Blink if point moved very far." - (cond - ;; Sanity check. - ((not (markerp beacon--previous-place))) - ;; Blink for switching buffers. - ((and beacon-blink-when-buffer-changes - (not (eq (marker-buffer beacon--previous-place) - (current-buffer)))) - (beacon-blink-automated)) - ;; Blink for switching windows. - ((and beacon-blink-when-window-changes - (not (eq beacon--previous-window (selected-window)))) - (beacon-blink-automated)) - ;; Blink for scrolling. - ((and beacon--window-scrolled - (equal beacon--window-scrolled (selected-window))) - (beacon-blink-automated)) - ;; Blink for movement - ((beacon--movement-> beacon-blink-when-point-moves-vertically - beacon-blink-when-point-moves-horizontally) - (beacon-blink-automated))) - (beacon--maybe-push-mark) - (setq beacon--window-scrolled nil)) - -(defun beacon--window-scroll-function (win start-pos) - "Blink the beacon or record that window has been scrolled. -If invoked during the command loop, record the current window so -that it may be blinked on post-command. This is because the -scrolled window might not be active, but we only know that at -`post-command-hook'. - -If invoked outside the command loop, `post-command-hook' would be -unreliable, so just blink immediately." - (unless (or (and (equal beacon--previous-window-start start-pos) - (equal beacon--previous-window win)) - (not beacon-blink-when-window-scrolls)) - (if this-command - (setq beacon--window-scrolled win) - (setq beacon--window-scrolled nil) - (beacon-blink-automated)))) - -(defun beacon--blink-on-focus () - "Blink if `beacon-blink-when-focused' is non-nil" - (when beacon-blink-when-focused - (beacon-blink-automated))) - - -;;; Minor-mode -(defcustom beacon-lighter - (cond - ;; ((char-displayable-p ?💡) " 💡") - ;; ((char-displayable-p ?Λ) " Λ") - (t " (*)")) - "Lighter string used on the mode-line." - :type 'string) - -;;;###autoload -(define-minor-mode beacon-mode - nil nil beacon-lighter nil - :global t - (if beacon-mode - (progn - (add-hook 'window-scroll-functions #'beacon--window-scroll-function) - (add-hook 'focus-in-hook #'beacon--blink-on-focus) - (add-hook 'post-command-hook #'beacon--post-command) - (add-hook 'before-change-functions #'beacon--vanish) - (add-hook 'pre-command-hook #'beacon--record-vars) - (add-hook 'pre-command-hook #'beacon--vanish)) - (remove-hook 'focus-in-hook #'beacon--blink-on-focus) - (remove-hook 'window-scroll-functions #'beacon--window-scroll-function) - (remove-hook 'post-command-hook #'beacon--post-command) - (remove-hook 'before-change-functions #'beacon--vanish) - (remove-hook 'pre-command-hook #'beacon--record-vars) - (remove-hook 'pre-command-hook #'beacon--vanish))) - -(provide 'beacon) -;;; beacon.el ends here - -;; Local Variables: -;; indent-tabs-mode: nil -;; End: diff --git a/elpa/bind-key-20160227.48/bind-key-autoloads.el b/elpa/bind-key-20160227.48/bind-key-autoloads.el deleted file mode 100644 index e6a6987..0000000 --- a/elpa/bind-key-20160227.48/bind-key-autoloads.el +++ /dev/null @@ -1,72 +0,0 @@ -;;; bind-key-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "bind-key" "bind-key.el" (22523 35882 90832 -;;;;;; 599000)) -;;; Generated autoloads from bind-key.el - -(autoload 'bind-key "bind-key" "\ -Bind KEY-NAME to COMMAND in KEYMAP (`global-map' if not passed). - -KEY-NAME may be a vector, in which case it is passed straight to -`define-key'. Or it may be a string to be interpreted as -spelled-out keystrokes, e.g., \"C-c C-z\". See documentation of -`edmacro-mode' for details. - -If PREDICATE is non-nil, it is a form evaluated to determine when -a key should be bound. It must return non-nil in such cases. -Emacs can evaluate this form at any time that it does redisplay -or operates on menu data structures, so you should write it so it -can safely be called at any time. - -\(fn KEY-NAME COMMAND &optional KEYMAP PREDICATE)" nil t) - -(autoload 'unbind-key "bind-key" "\ -Unbind the given KEY-NAME, within the KEYMAP (if specified). -See `bind-key' for more details. - -\(fn KEY-NAME &optional KEYMAP)" nil t) - -(autoload 'bind-key* "bind-key" "\ -Similar to `bind-key', but overrides any mode-specific bindings. - -\(fn KEY-NAME COMMAND &optional PREDICATE)" nil t) - -(autoload 'bind-keys "bind-key" "\ -Bind multiple keys at once. - -Accepts keyword arguments: -:map MAP - a keymap into which the keybindings should be - added -:prefix KEY - prefix key for these bindings -:prefix-map MAP - name of the prefix map that should be created - for these bindings -:prefix-docstring STR - docstring for the prefix-map variable -:menu-name NAME - optional menu string for prefix map -:filter FORM - optional form to determine when bindings apply - -The rest of the arguments are conses of keybinding string and a -function symbol (unquoted). - -\(fn &rest ARGS)" nil t) - -(autoload 'bind-keys* "bind-key" "\ - - -\(fn &rest ARGS)" nil t) - -(autoload 'describe-personal-keybindings "bind-key" "\ -Display all the personal keybindings defined by `bind-key'. - -\(fn)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; bind-key-autoloads.el ends here diff --git a/elpa/bind-key-20160227.48/bind-key-pkg.el b/elpa/bind-key-20160227.48/bind-key-pkg.el deleted file mode 100644 index 9dc5345..0000000 --- a/elpa/bind-key-20160227.48/bind-key-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "bind-key" "20160227.48" "A simple way to manage personal keybindings" 'nil :url "https://github.com/jwiegley/use-package" :keywords '("keys" "keybinding" "config" "dotemacs")) diff --git a/elpa/bind-key-20160227.48/bind-key.el b/elpa/bind-key-20160227.48/bind-key.el deleted file mode 100644 index 0d99951..0000000 --- a/elpa/bind-key-20160227.48/bind-key.el +++ /dev/null @@ -1,414 +0,0 @@ -;;; bind-key.el --- A simple way to manage personal keybindings - -;; Copyright (c) 2012-2015 john wiegley - -;; Author: John Wiegley -;; Maintainer: John Wiegley -;; Created: 16 Jun 2012 -;; Version: 1.0 -;; Package-Version: 20160227.48 -;; Keywords: keys keybinding config dotemacs -;; URL: https://github.com/jwiegley/use-package - -;; 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, 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 gnu emacs; see the file copying. if not, write to the -;; free software foundation, inc., 59 temple place - suite 330, -;; boston, ma 02111-1307, usa. - -;;; Commentary: - -;; If you have lots of keybindings set in your .emacs file, it can be hard to -;; know which ones you haven't set yet, and which may now be overriding some -;; new default in a new emacs version. This module aims to solve that -;; problem. -;; -;; Bind keys as follows in your .emacs: -;; -;; (require 'bind-key) -;; -;; (bind-key "C-c x" 'my-ctrl-c-x-command) -;; -;; If you want the keybinding to override all minor modes that may also bind -;; the same key, use the `bind-key*' form: -;; -;; (bind-key* "" 'other-window) -;; -;; If you want to rebind a key only in a particular keymap, use: -;; -;; (bind-key "C-c x" 'my-ctrl-c-x-command some-other-mode-map) -;; -;; To unbind a key within a keymap (for example, to stop your favorite major -;; mode from changing a binding that you don't want to override everywhere), -;; use `unbind-key': -;; -;; (unbind-key "C-c x" some-other-mode-map) -;; -;; To bind multiple keys at once, or set up a prefix map, a `bind-keys' macro -;; is provided. It accepts keyword arguments, please see its documentation -;; for a detailed description. -;; -;; To add keys into a specific map, use :map argument -;; -;; (bind-keys :map dired-mode-map -;; ("o" . dired-omit-mode) -;; ("a" . some-custom-dired-function)) -;; -;; To set up a prefix map, use `:prefix-map' and `:prefix' arguments (both are -;; required) -;; -;; (bind-keys :prefix-map my-customize-prefix-map -;; :prefix "C-c c" -;; ("f" . customize-face) -;; ("v" . customize-variable)) -;; -;; You can combine all the keywords together. Additionally, -;; `:prefix-docstring' can be specified to set documentation of created -;; `:prefix-map' variable. -;; -;; To bind multiple keys in a `bind-key*' way (to be sure that your bindings -;; will not be overridden by other modes), you may use `bind-keys*' macro: -;; -;; (bind-keys* -;; ("C-o" . other-window) -;; ("C-M-n" . forward-page) -;; ("C-M-p" . backward-page)) -;; -;; After Emacs loads, you can see a summary of all your personal keybindings -;; currently in effect with this command: -;; -;; M-x describe-personal-keybindings -;; -;; This display will tell you if you've overriden a default keybinding, and -;; what the default was. Also, it will tell you if the key was rebound after -;; your binding it with `bind-key', and what it was rebound it to. - -(require 'cl-lib) -(require 'easy-mmode) - -(defgroup bind-key nil - "A simple way to manage personal keybindings" - :group 'emacs) - -(defcustom bind-key-column-widths '(18 . 40) - "Width of columns in `describe-personal-keybindings'." - :type '(cons integer integer) - :group 'bind-key) - -(defcustom bind-key-segregation-regexp - "\\`\\(\\(C-[chx] \\|M-[gso] \\)\\([CM]-\\)?\\|.+-\\)" - "Regular expression used to divide key sets in the output from -\\[describe-personal-keybindings]." - :type 'regexp - :group 'bind-key) - -(defcustom bind-key-describe-special-forms nil - "If non-nil, extract docstrings from lambdas, closures and keymaps if possible." - :type 'boolean - :group 'bind-key) - -;; Create override-global-mode to force key remappings - -(defvar override-global-map (make-keymap) - "override-global-mode keymap") - -(define-minor-mode override-global-mode - "A minor mode so that keymap settings override other modes." - t "") - -;; the keymaps in `emulation-mode-map-alists' take precedence over -;; `minor-mode-map-alist' -(add-to-list 'emulation-mode-map-alists - `((override-global-mode . ,override-global-map))) - -(defvar personal-keybindings nil - "List of bindings performed by `bind-key'. - -Elements have the form ((KEY . [MAP]) CMD ORIGINAL-CMD)") - -;;;###autoload -(defmacro bind-key (key-name command &optional keymap predicate) - "Bind KEY-NAME to COMMAND in KEYMAP (`global-map' if not passed). - -KEY-NAME may be a vector, in which case it is passed straight to -`define-key'. Or it may be a string to be interpreted as -spelled-out keystrokes, e.g., \"C-c C-z\". See documentation of -`edmacro-mode' for details. - -If PREDICATE is non-nil, it is a form evaluated to determine when -a key should be bound. It must return non-nil in such cases. -Emacs can evaluate this form at any time that it does redisplay -or operates on menu data structures, so you should write it so it -can safely be called at any time." - (let ((namevar (make-symbol "name")) - (keyvar (make-symbol "key")) - (kdescvar (make-symbol "kdesc")) - (bindingvar (make-symbol "binding"))) - `(let* ((,namevar ,key-name) - (,keyvar (if (vectorp ,namevar) ,namevar - (read-kbd-macro ,namevar))) - (,kdescvar (cons (if (stringp ,namevar) ,namevar - (key-description ,namevar)) - (quote ,keymap))) - (,bindingvar (lookup-key (or ,keymap global-map) ,keyvar))) - (add-to-list 'personal-keybindings - (list ,kdescvar ,command - (unless (numberp ,bindingvar) ,bindingvar))) - ,(if predicate - `(define-key (or ,keymap global-map) ,keyvar - '(menu-item "" nil :filter (lambda (&optional _) - (when ,predicate - ,command)))) - `(define-key (or ,keymap global-map) ,keyvar ,command))))) - -;;;###autoload -(defmacro unbind-key (key-name &optional keymap) - "Unbind the given KEY-NAME, within the KEYMAP (if specified). -See `bind-key' for more details." - `(progn - (bind-key ,key-name nil ,keymap) - (setq personal-keybindings - (cl-delete-if #'(lambda (k) - ,(if keymap - `(and (consp (car k)) - (string= (caar k) ,key-name) - (eq (cdar k) ',keymap)) - `(and (stringp (car k)) - (string= (car k) ,key-name)))) - personal-keybindings)))) - -;;;###autoload -(defmacro bind-key* (key-name command &optional predicate) - "Similar to `bind-key', but overrides any mode-specific bindings." - `(bind-key ,key-name ,command override-global-map ,predicate)) - -(defun bind-keys-form (args) - "Bind multiple keys at once. - -Accepts keyword arguments: -:map MAP - a keymap into which the keybindings should be - added -:prefix KEY - prefix key for these bindings -:prefix-map MAP - name of the prefix map that should be created - for these bindings -:prefix-docstring STR - docstring for the prefix-map variable -:menu-name NAME - optional menu string for prefix map -:filter FORM - optional form to determine when bindings apply - -The rest of the arguments are conses of keybinding string and a -function symbol (unquoted)." - ;; jww (2016-02-26): This is a hack; this whole function needs to be - ;; rewritten to normalize arguments the way that use-package.el does. - (if (and (eq (car args) :package) - (not (eq (car (cdr (cdr args))) :map))) - (setq args (cons :map (cons 'global-map args)))) - (let* ((map (plist-get args :map)) - (doc (plist-get args :prefix-docstring)) - (prefix-map (plist-get args :prefix-map)) - (prefix (plist-get args :prefix)) - (filter (plist-get args :filter)) - (menu-name (plist-get args :menu-name)) - (pkg (plist-get args :package)) - (key-bindings (progn - (while (keywordp (car args)) - (pop args) - (pop args)) - args))) - (when (or (and prefix-map (not prefix)) - (and prefix (not prefix-map))) - (error "Both :prefix-map and :prefix must be supplied")) - (when (and menu-name (not prefix)) - (error "If :menu-name is supplied, :prefix must be too")) - (let ((args key-bindings) - saw-map first next) - (while args - (if (keywordp (car args)) - (progn - (setq next args) - (setq args nil)) - (if first - (nconc first (list (car args))) - (setq first (list (car args)))) - (setq args (cdr args)))) - (cl-flet - ((wrap (map bindings) - (if (and map pkg (not (eq map 'global-map))) - (if (boundp map) - bindings - `((eval-after-load - ,(if (symbolp pkg) `',pkg pkg) - '(progn ,@bindings)))) - bindings))) - (append - (when prefix-map - `((defvar ,prefix-map) - ,@(when doc `((put ',prefix-map 'variable-documentation ,doc))) - ,@(if menu-name - `((define-prefix-command ',prefix-map nil ,menu-name)) - `((define-prefix-command ',prefix-map))) - ,@(if (and map (not (eq map 'global-map))) - (wrap map `((bind-key ,prefix ',prefix-map ,map ,filter))) - `((bind-key ,prefix ',prefix-map nil ,filter))))) - (wrap map - (cl-mapcan - (lambda (form) - (if prefix-map - `((bind-key ,(car form) ',(cdr form) ,prefix-map ,filter)) - (if (and map (not (eq map 'global-map))) - `((bind-key ,(car form) ',(cdr form) ,map ,filter)) - `((bind-key ,(car form) ',(cdr form) nil ,filter))))) - first)) - (when next - (bind-keys-form - (if pkg - (cons :package (cons pkg next)) - next)))))))) - -;;;###autoload -(defmacro bind-keys (&rest args) - "Bind multiple keys at once. - -Accepts keyword arguments: -:map MAP - a keymap into which the keybindings should be - added -:prefix KEY - prefix key for these bindings -:prefix-map MAP - name of the prefix map that should be created - for these bindings -:prefix-docstring STR - docstring for the prefix-map variable -:menu-name NAME - optional menu string for prefix map -:filter FORM - optional form to determine when bindings apply - -The rest of the arguments are conses of keybinding string and a -function symbol (unquoted)." - (macroexp-progn (bind-keys-form args))) - -;;;###autoload -(defmacro bind-keys* (&rest args) - (macroexp-progn - (bind-keys-form `(:map override-global-map ,@args)))) - -(defun get-binding-description (elem) - (cond - ((listp elem) - (cond - ((eq 'lambda (car elem)) - (if (and bind-key-describe-special-forms - (stringp (nth 2 elem))) - (nth 2 elem) - "#")) - ((eq 'closure (car elem)) - (if (and bind-key-describe-special-forms - (stringp (nth 3 elem))) - (nth 3 elem) - "#")) - ((eq 'keymap (car elem)) - "#") - (t - elem))) - ;; must be a symbol, non-symbol keymap case covered above - ((and bind-key-describe-special-forms (keymapp elem)) - (let ((doc (get elem 'variable-documentation))) - (if (stringp doc) doc elem))) - ((symbolp elem) - elem) - (t - "#"))) - -(defun compare-keybindings (l r) - (let* ((regex bind-key-segregation-regexp) - (lgroup (and (string-match regex (caar l)) - (match-string 0 (caar l)))) - (rgroup (and (string-match regex (caar r)) - (match-string 0 (caar r)))) - (lkeymap (cdar l)) - (rkeymap (cdar r))) - (cond - ((and (null lkeymap) rkeymap) - (cons t t)) - ((and lkeymap (null rkeymap)) - (cons nil t)) - ((and lkeymap rkeymap - (not (string= (symbol-name lkeymap) (symbol-name rkeymap)))) - (cons (string< (symbol-name lkeymap) (symbol-name rkeymap)) t)) - ((and (null lgroup) rgroup) - (cons t t)) - ((and lgroup (null rgroup)) - (cons nil t)) - ((and lgroup rgroup) - (if (string= lgroup rgroup) - (cons (string< (caar l) (caar r)) nil) - (cons (string< lgroup rgroup) t))) - (t - (cons (string< (caar l) (caar r)) nil))))) - -;;;###autoload -(defun describe-personal-keybindings () - "Display all the personal keybindings defined by `bind-key'." - (interactive) - (with-output-to-temp-buffer "*Personal Keybindings*" - (princ (format (concat "Key name%s Command%s Comments\n%s %s " - "---------------------\n") - (make-string (- (car bind-key-column-widths) 9) ? ) - (make-string (- (cdr bind-key-column-widths) 8) ? ) - (make-string (1- (car bind-key-column-widths)) ?-) - (make-string (1- (cdr bind-key-column-widths)) ?-))) - (let (last-binding) - (dolist (binding - (setq personal-keybindings - (sort personal-keybindings - (lambda (l r) - (car (compare-keybindings l r)))))) - - (if (not (eq (cdar last-binding) (cdar binding))) - (princ (format "\n\n%s\n%s\n\n" - (cdar binding) - (make-string (+ 21 (car bind-key-column-widths) - (cdr bind-key-column-widths)) ?-))) - (if (and last-binding - (cdr (compare-keybindings last-binding binding))) - (princ "\n"))) - - (let* ((key-name (caar binding)) - (at-present (lookup-key (or (symbol-value (cdar binding)) - (current-global-map)) - (read-kbd-macro key-name))) - (command (nth 1 binding)) - (was-command (nth 2 binding)) - (command-desc (get-binding-description command)) - (was-command-desc (and was-command - (get-binding-description was-command))) - (at-present-desc (get-binding-description at-present)) - ) - (let ((line - (format - (format "%%-%ds%%-%ds%%s\n" (car bind-key-column-widths) - (cdr bind-key-column-widths)) - key-name (format "`%s\'" command-desc) - (if (string= command-desc at-present-desc) - (if (or (null was-command) - (string= command-desc was-command-desc)) - "" - (format "was `%s\'" was-command-desc)) - (format "[now: `%s\']" at-present))))) - (princ (if (string-match "[ \t]+\n" line) - (replace-match "\n" t t line) - line)))) - - (setq last-binding binding))))) - -(provide 'bind-key) - -;; Local Variables: -;; indent-tabs-mode: nil -;; End: - -;;; bind-key.el ends here diff --git a/elpa/cheatsheet-20151203.151/cheatsheet-autoloads.el b/elpa/cheatsheet-20151203.151/cheatsheet-autoloads.el deleted file mode 100644 index 63cba4c..0000000 --- a/elpa/cheatsheet-20151203.151/cheatsheet-autoloads.el +++ /dev/null @@ -1,27 +0,0 @@ -;;; cheatsheet-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "cheatsheet" "cheatsheet.el" (22539 27682 220569 -;;;;;; 346000)) -;;; Generated autoloads from cheatsheet.el - -(autoload 'cheatsheet-add "cheatsheet" "\ -Add CHEAT to cheatsheet. - -\(fn &rest CHEAT)" nil nil) - -(autoload 'cheatsheet-show "cheatsheet" "\ -Create buffer and show cheatsheet. - -\(fn)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; cheatsheet-autoloads.el ends here diff --git a/elpa/cheatsheet-20151203.151/cheatsheet-pkg.el b/elpa/cheatsheet-20151203.151/cheatsheet-pkg.el deleted file mode 100644 index 1035db5..0000000 --- a/elpa/cheatsheet-20151203.151/cheatsheet-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "cheatsheet" "20151203.151" "create your own cheatsheet" '((emacs "24") (cl-lib "0.5")) :url "http://github.com/darksmile/cheatsheet/" :keywords '("convenience" "usability")) diff --git a/elpa/cheatsheet-20151203.151/cheatsheet.el b/elpa/cheatsheet-20151203.151/cheatsheet.el deleted file mode 100644 index cccda65..0000000 --- a/elpa/cheatsheet-20151203.151/cheatsheet.el +++ /dev/null @@ -1,145 +0,0 @@ -;;; cheatsheet.el --- create your own cheatsheet - -;; Copyright (C) 2015 Shirin Nikita and contributors -;; -;; Author: Shirin Nikita and contributors -;; URL: http://github.com/darksmile/cheatsheet/ -;; Package-Version: 20151203.151 -;; Package-Requires: ((emacs "24") (cl-lib "0.5")) -;; Version: 1.0 -;; Keywords: convenience, usability - -;; This file is not part of GNU Emacs - -;;; Licence: - -;; Licensed under the same terms as Emacs. - -;;; Commentary: - -;; Quick start: -;; Load package -;; Add your first cheat: -;; (cheatsheet-add :group 'Common -;; :key "C-x C-c" -;; :description "leave Emacs.") -;; Run (cheatsheet-show) and enjoy looking at your own Emacs cheatsheet. - -;;; Code: - -(require 'cl-lib) - -(defconst cheatsheet--group-face - '(:foreground "red") - "Group name font face.") - -(defconst cheatsheet--key-face - '(:foreground "orange") - "Cheat key font face.") - -(defconst cheatsheet--keymap - (let ((map (make-sparse-keymap))) - (define-key map (kbd "C-q") 'kill-buffer-and-window) - map)) - - -(defvar cheatsheet--cheat-list '() - "List of cheats.") - -;; Getters for CHEAT and GROUP plists -(defun cheatsheet--if-symbol-to-string (string-like) - "Convert STRING-LIKE to string." - (if (symbolp string-like) (symbol-name string-like) string-like)) - -(defun cheatsheet--group-name (group) - "Get GROUP name." - (cheatsheet--if-symbol-to-string (plist-get group :name))) - -(defun cheatsheet--group-cheats (group) - "Get GROUP cheats." - (cheatsheet--if-symbol-to-string (plist-get group :cheats))) - -(defun cheatsheet--cheat-key (cheat) - "Get CHEAT key." - (cheatsheet--if-symbol-to-string (plist-get cheat :key))) - -(defun cheatsheet--cheat-group (cheat) - "Get CHEAT group." - (cheatsheet--if-symbol-to-string (plist-get cheat :group))) - -(defun cheatsheet--cheat-description (cheat) - "Get CHEAT description." - (cheatsheet--if-symbol-to-string (plist-get cheat :description))) - -;; Functions to get data from CHEATSHEET in convenient format -(defun cheatsheet--cheat-groups () - "Get all groups, submitted to cheatsheet." - (reverse (delete-dups - (mapcar 'cheatsheet--cheat-group - cheatsheet--cheat-list)))) - -(defun cheatsheet--get-group (group) - "Get group struct with all cheats, belonging to GROUP." - (cl-flet ((is-current-group (cheat) - (if (string= (cheatsheet--cheat-group cheat) - group) - cheat - nil))) - (delq nil (mapcar #'is-current-group cheatsheet--cheat-list)))) - -;; Functions to format cheatsheet items and prepare to print -(defun cheatsheet--format-cheat (cheat key-cell-length) - "Format CHEAT row with KEY-CELL-LENGTH key cell length." - (let* ((format-string (format "%%%ds - %%s\n" key-cell-length)) - (key (cheatsheet--cheat-key cheat)) - (description (cheatsheet--cheat-description cheat)) - (faced-key (propertize key 'face cheatsheet--key-face))) - (format format-string faced-key description))) - -(defun cheatsheet--format-group (group) - "Format GROUP to table." - (cl-flet ((key-length (cheat) (length (cheatsheet--cheat-key cheat))) - (format-cheat (key-cell-length cheat) - (cheatsheet--format-cheat cheat key-cell-length))) - - (let* ((name (cheatsheet--group-name group)) - (cheats (cheatsheet--group-cheats group)) - (key-max-length (apply 'max (mapcar #'key-length cheats))) - (key-cell-length (+ 2 key-max-length)) - (format-cheat (apply-partially #'format-cheat key-cell-length)) - (formatted-cheats (apply 'concat (mapcar format-cheat cheats))) - (faced-group-name (propertize name 'face cheatsheet--group-face))) - (concat faced-group-name "\n" formatted-cheats "\n")))) - -(defun cheatsheet--format () - "Print the whole cheatsheet." - (let* ((cheatsheet (cheatsheet-get)) - (formatted-groups (mapcar 'cheatsheet--format-group cheatsheet)) - (formatted-cheatsheet (apply 'concat formatted-groups))) - formatted-cheatsheet)) - -;; Interface -;;;###autoload -(defun cheatsheet-add (&rest cheat) - "Add CHEAT to cheatsheet." - (add-to-list 'cheatsheet--cheat-list cheat)) - -(defun cheatsheet-get () - "Get cheatsheet as list of group structs, keeping defining order." - (cl-flet ((make-group (group) - (list :name group - :cheats (cheatsheet--get-group group)))) - (mapcar #'make-group (cheatsheet--cheat-groups)))) - -;;;###autoload -(defun cheatsheet-show () - "Create buffer and show cheatsheet." - (interactive) - (switch-to-buffer-other-window "*cheatsheet*") - (use-local-map cheatsheet--keymap) - (erase-buffer) - (insert (cheatsheet--format)) - (setq buffer-read-only t)) - -(provide 'cheatsheet) -;;; cheatsheet.el ends here diff --git a/elpa/coffee-mode-20160808.1712/coffee-mode-autoloads.el b/elpa/coffee-mode-20160808.1712/coffee-mode-autoloads.el deleted file mode 100644 index f823ae1..0000000 --- a/elpa/coffee-mode-20160808.1712/coffee-mode-autoloads.el +++ /dev/null @@ -1,32 +0,0 @@ -;;; coffee-mode-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "coffee-mode" "coffee-mode.el" (22454 5298 -;;;;;; 807704 278000)) -;;; Generated autoloads from coffee-mode.el - -(autoload 'coffee-mode "coffee-mode" "\ -Major mode for editing CoffeeScript. - -\(fn)" t nil) - -(add-to-list 'auto-mode-alist '("\\.coffee\\'" . coffee-mode)) - -(add-to-list 'auto-mode-alist '("\\.iced\\'" . coffee-mode)) - -(add-to-list 'auto-mode-alist '("Cakefile\\'" . coffee-mode)) - -(add-to-list 'auto-mode-alist '("\\.cson\\'" . coffee-mode)) - -(add-to-list 'interpreter-mode-alist '("coffee" . coffee-mode)) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; coffee-mode-autoloads.el ends here diff --git a/elpa/coffee-mode-20160808.1712/coffee-mode-pkg.el b/elpa/coffee-mode-20160808.1712/coffee-mode-pkg.el deleted file mode 100644 index 12403a1..0000000 --- a/elpa/coffee-mode-20160808.1712/coffee-mode-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "coffee-mode" "20160808.1712" "Major mode for CoffeeScript code" '((emacs "24.1") (cl-lib "0.5")) :url "http://github.com/defunkt/coffee-mode" :keywords '("coffeescript" "major" "mode")) diff --git a/elpa/coffee-mode-20160808.1712/coffee-mode.el b/elpa/coffee-mode-20160808.1712/coffee-mode.el deleted file mode 100644 index a69c80f..0000000 --- a/elpa/coffee-mode-20160808.1712/coffee-mode.el +++ /dev/null @@ -1,1357 +0,0 @@ -;;; coffee-mode.el --- Major mode for CoffeeScript code -*- lexical-binding: t; -*- - -;; Copyright (C) 2010 Chris Wanstrath - -;; Version: 0.6.3 -;; Package-Version: 20160808.1712 -;; Keywords: CoffeeScript major mode -;; Author: Chris Wanstrath -;; URL: http://github.com/defunkt/coffee-mode -;; Package-Requires: ((emacs "24.1") (cl-lib "0.5")) - -;; 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, 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, write to the Free Software -;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. - -;;; Commentary: - -;; Provides syntax highlighting, indentation support, imenu support, -;; compiling to JavaScript, REPL, a menu bar, and a few cute commands. - -;;; Code: - -(require 'comint) -(require 'easymenu) -(require 'font-lock) -(require 'rx) - -(require 'cl-lib) - -(declare-function tramp-file-name-localname "tramp") -(declare-function tramp-dissect-file-name "tramp") - -;; -;; Customizable Variables -;; - -(defconst coffee-mode-version "0.6.3" - "The version of `coffee-mode'.") - -(defgroup coffee nil - "A CoffeeScript major mode." - :group 'languages) - -(defcustom coffee-tab-width tab-width - "The tab width to use when indenting." - :type 'integer - :safe 'integerp) - -(defcustom coffee-command "coffee" - "The CoffeeScript command used for evaluating code." - :type 'string) - -(defcustom coffee-js-directory "" - "The directory for compiled JavaScript files output. This can -be an absolute path starting with a `/`, or it can be path -relative to the directory containing the coffeescript sources to -be compiled." - :type 'string) - -(defcustom js2coffee-command "js2coffee" - "The js2coffee command used for evaluating code." - :type 'string) - -(defcustom coffee-args-repl '("-i") - "The arguments to pass to `coffee-command' to start a REPL." - :type '(repeat string)) - -(defcustom coffee-args-compile '("-c" "--no-header") - "The arguments to pass to `coffee-command' to compile a file." - :type '(repeat string)) - -(defcustom coffee-compiled-buffer-name "*coffee-compiled*" - "The name of the scratch buffer used for compiled CoffeeScript." - :type 'string) - -(defcustom coffee-repl-buffer "*CoffeeREPL*" - "The name of the CoffeeREPL buffer." - :type 'string) - -(defcustom coffee-compile-jump-to-error t - "Whether to jump to the first error if compilation fails. -Since the coffee compiler does not always include a line number in -its error messages, this is not always possible." - :type 'boolean) - -(defcustom coffee-watch-buffer-name "*coffee-watch*" - "The name of the scratch buffer used when using the --watch flag -with CoffeeScript." - :type 'string) - -(defcustom coffee-mode-hook nil - "Hook called by `coffee-mode'. Examples: - - ;; Compile '.coffee' files on every save - (and (file-exists-p (buffer-file-name)) - (file-exists-p (coffee-compiled-file-name)) - (coffee-cos-mode t)))" - :type 'hook) - -(defcustom coffee-indent-tabs-mode nil - "Indentation can insert tabs if this is t." - :type 'boolean) - -(defcustom coffee-show-mode 'js-mode - "Major mode to used to show the compiled Javascript." - :type 'function) - -(defcustom coffee-after-compile-hook nil - "Hook called after compile to Javascript" - :type 'hook) - -(defcustom coffee-indent-like-python-mode nil - "Indent like python-mode." - :type 'boolean) - -(defcustom coffee-switch-to-compile-buffer nil - "Switch to compilation buffer `coffee-compiled-buffer-name' after compiling -a buffer or region." - :type 'boolean) - -(defvar coffee-mode-map - (let ((map (make-sparse-keymap))) - ;; key bindings - (define-key map (kbd "A-r") 'coffee-compile-buffer) - (define-key map (kbd "C-c C-k") 'coffee-compile-buffer) - (define-key map (kbd "A-R") 'coffee-compile-region) - (define-key map (kbd "A-M-r") 'coffee-repl) - (define-key map (kbd "C-c C-z") 'coffee-repl) - (define-key map [remap comment-dwim] 'coffee-comment-dwim) - (define-key map [remap newline-and-indent] 'coffee-newline-and-indent) - (define-key map "\C-m" 'coffee-newline-and-indent) - (define-key map "\C-c\C-o\C-s" 'coffee-cos-mode) - (define-key map "\177" 'coffee-dedent-line-backspace) - (define-key map (kbd "C-c C-<") 'coffee-indent-shift-left) - (define-key map (kbd "C-c C->") 'coffee-indent-shift-right) - (define-key map (kbd "C-c C-l") 'coffee-send-line) - (define-key map (kbd "C-c C-r") 'coffee-send-region) - (define-key map (kbd "C-c C-b") 'coffee-send-buffer) - (define-key map (kbd "") 'coffee-indent-shift-left) - (define-key map (kbd "C-M-a") 'coffee-beginning-of-defun) - (define-key map (kbd "C-M-e") 'coffee-end-of-block) - (define-key map (kbd "C-M-h") 'coffee-mark-defun) - map) - "Keymap for CoffeeScript major mode.") - -(defvar coffee--process nil) - -;; -;; Commands -;; - -(defun coffee-comint-filter (string) - (ansi-color-apply - (replace-regexp-in-string - "\uFF00" "\n" - (replace-regexp-in-string "\x1b\\[.[GJK]" "" string)))) - -(defun coffee-repl () - "Launch a CoffeeScript REPL using `coffee-command' as an inferior mode." - (interactive) - - (unless (comint-check-proc coffee-repl-buffer) - (set-buffer - (apply 'make-comint "CoffeeREPL" - "env" - nil - "NODE_NO_READLINE=1" - coffee-command - coffee-args-repl)) - ;; Workaround for ansi colors - (add-hook 'comint-preoutput-filter-functions 'coffee-comint-filter nil t)) - - (pop-to-buffer coffee-repl-buffer)) - -(defun coffee-compiled-file-name (&optional filename) - ;; Returns the name of the JavaScript file compiled from a CoffeeScript file. - ;; If FILENAME is omitted, the current buffer's file name is used. - (let ((input (expand-file-name (or filename (buffer-file-name))))) - (unless (string= coffee-js-directory "") - (setq input - (expand-file-name - (concat (unless (file-name-absolute-p coffee-js-directory) - (file-name-directory input)) - (file-name-as-directory coffee-js-directory) - (file-name-nondirectory input))))) - (concat (file-name-sans-extension input) ".js"))) - -(defun coffee-revert-buffer-compiled-file (file-name) - "Revert a buffer of compiled file when the buffer exist and is not modified." - (let ((buffer (find-buffer-visiting file-name))) - (when (and buffer (not (buffer-modified-p buffer))) - (with-current-buffer buffer - (revert-buffer nil t))))) - -(defun coffee-parse-error-output (compiler-errstr) - (let* ((msg (car (split-string compiler-errstr "[\n\r]+"))) - line column) - (message msg) - (when (or (string-match "on line \\([0-9]+\\)" msg) - (string-match ":\\([0-9]+\\):\\([0-9]+\\): error:" msg)) - (setq line (string-to-number (match-string 1 msg))) - (when (match-string 2 msg) - (setq column (string-to-number (match-string 2 msg)))) - - (when coffee-compile-jump-to-error - (goto-char (point-min)) - (forward-line (1- line)) - (when column - (move-to-column (1- column))))))) - -(defun coffee-compile-file () - "Compiles and saves the current file to disk in a file of the same -base name, with extension `.js'. Subsequent runs will overwrite the -file. - -If there are compilation errors, point is moved to the first -See `coffee-compile-jump-to-error'." - (interactive) - (let* ((input (buffer-file-name)) - (basename (file-name-sans-extension input)) - (output (when (string-match-p "\\.js\\'" basename) ;; for Rails '.js.coffee' file - basename)) - (compile-args (coffee-command-compile input output)) - (compiler-output (with-temp-buffer - (unless (zerop (apply #'process-file coffee-command nil t nil compile-args)) - (error "Failed: %s %s" coffee-command compile-args)) - (buffer-substring-no-properties (point-min) (point-max))))) - (if (string= compiler-output "") - (let ((file-name (coffee-compiled-file-name (buffer-file-name)))) - (message "Compiled and saved %s" (or output (concat basename ".js"))) - (coffee-revert-buffer-compiled-file file-name)) - (coffee-parse-error-output compiler-output)))) - -(defun coffee-compile-buffer () - "Compiles the current buffer and displays the JavaScript in a buffer -called `coffee-compiled-buffer-name'." - (interactive) - (coffee-compile-region (point-min) (point-max))) - -(defsubst coffee-generate-sourcemap-p () - (cl-find-if (lambda (opt) (member opt '("-m" "--map"))) coffee-args-compile)) - -(defun coffee--coffeescript-version () - (with-temp-buffer - (unless (zerop (process-file coffee-command nil t nil "--version")) - (error "Failed: 'coffee --version'")) - (goto-char (point-min)) - (let ((line (buffer-substring-no-properties (point) (line-end-position)))) - (when (string-match "[0-9.]+\\'" line) - (match-string-no-properties 0 line))))) - -(defun coffee--map-file-name (coffee-file) - (let* ((version (coffee--coffeescript-version)) - (extension (if (version<= "1.8" version) ".js.map" ".map"))) - ;; foo.js: foo.js.map(>= 1.8), foo.map(< 1.8) - (concat (file-name-sans-extension coffee-file) extension))) - -(defmacro coffee-save-window-if (bool &rest body) - `(if ,bool (save-selected-window ,@body) ,@body)) -(put 'coffee-save-window-if 'lisp-indent-function 1) - -(defun coffee-compile-sentinel (buffer file line column) - (lambda (proc _event) - (when (eq (process-status proc) 'exit) - (setq coffee--process nil) - (coffee-save-window-if (not coffee-switch-to-compile-buffer) - (pop-to-buffer (get-buffer coffee-compiled-buffer-name)) - (ansi-color-apply-on-region (point-min) (point-max)) - (goto-char (point-min)) - (if (not (= (process-exit-status proc) 0)) - (let ((compile-output (buffer-string))) - (with-current-buffer buffer - (coffee-parse-error-output compile-output))) - (let ((props (list :sourcemap (coffee--map-file-name file) - :line line :column column :source file))) - (setq buffer-read-only t) - (when (fboundp coffee-show-mode) - (funcall coffee-show-mode)) - (run-hook-with-args 'coffee-after-compile-hook props))))))) - -(defun coffee-start-compile-process (curbuf line column) - (lambda (start end) - (let ((proc (apply 'start-file-process "coffee-mode" - (get-buffer-create coffee-compiled-buffer-name) - coffee-command (append coffee-args-compile '("-s" "-p")))) - (curfile (buffer-file-name curbuf))) - (set-process-query-on-exit-flag proc nil) - (set-process-sentinel - proc (coffee-compile-sentinel curbuf curfile line column)) - (with-current-buffer curbuf - (process-send-region proc start end)) - (process-send-string proc "\n") - (process-send-eof proc) - (setq coffee--process proc)))) - -(defun coffee-start-generate-sourcemap-process (start end) - ;; so that sourcemap generation reads from the current buffer - (save-buffer) - (let* ((file (buffer-file-name)) - (sourcemap-buf (get-buffer-create "*coffee-sourcemap*")) - (proc (start-file-process "coffee-sourcemap" sourcemap-buf - coffee-command "-m" file)) - (curbuf (current-buffer)) - (line (line-number-at-pos)) - (column (current-column))) - (setq coffee--process proc) - (set-process-query-on-exit-flag proc nil) - (set-process-sentinel - proc - (lambda (proc _event) - (when (eq (process-status proc) 'exit) - (setq coffee--process nil) - (if (not (= (process-exit-status proc) 0)) - (let ((sourcemap-output - (with-current-buffer sourcemap-buf (buffer-string)))) - (with-current-buffer curbuf - (coffee-parse-error-output sourcemap-output))) - (kill-buffer sourcemap-buf) - (funcall (coffee-start-compile-process curbuf line column) start end))))))) - -(defun coffee-cleanup-compile-buffer () - (let ((buffer (get-buffer coffee-compiled-buffer-name))) - (when buffer - (with-current-buffer buffer - (setq buffer-read-only nil) - (erase-buffer))))) - -(defun coffee-compile-region (start end) - "Compiles a region and displays the JavaScript in a buffer called -`coffee-compiled-buffer-name'." - (interactive "r") - (coffee-cleanup-compile-buffer) - (if (coffee-generate-sourcemap-p) - (coffee-start-generate-sourcemap-process start end) - (funcall (coffee-start-compile-process - (current-buffer) (line-number-at-pos) (current-column)) - start end))) - -(defun coffee-get-repl-proc () - (unless (comint-check-proc coffee-repl-buffer) - (coffee-repl) - ;; see issue #332 - (sleep-for 0 100)) - (get-buffer-process coffee-repl-buffer)) - -(defun coffee-send-line () - "Send the current line to the inferior Coffee process." - (interactive) - (coffee-send-region (line-beginning-position) (line-end-position))) - -(defun coffee-send-region (start end) - "Send the current region to the inferior Coffee process." - (interactive "r") - (deactivate-mark t) - (let* ((string (buffer-substring-no-properties start end)) - (proc (coffee-get-repl-proc)) - (multiline-escaped-string - (replace-regexp-in-string "\n" "\uFF00" string))) - (comint-simple-send proc multiline-escaped-string))) - -(defun coffee-send-buffer () - "Send the current buffer to the inferior Coffee process." - (interactive) - (coffee-send-region (point-min) (point-max))) - -(defun coffee-js2coffee-replace-region (start end) - "Convert JavaScript in the region into CoffeeScript." - (interactive "r") - - (let ((buffer (get-buffer coffee-compiled-buffer-name))) - (when buffer - (kill-buffer buffer))) - - (call-process-region start end - js2coffee-command t - (current-buffer))) - -(defun coffee-version () - "Show the `coffee-mode' version in the echo area." - (interactive) - (message (concat "coffee-mode version " coffee-mode-version))) - -(defun coffee-watch (dir-or-file) - "Run `coffee-run-cmd' with the --watch flag on a directory or file." - (interactive "fDirectory or File: ") - (let ((coffee-compiled-buffer-name coffee-watch-buffer-name) - (args (mapconcat 'identity (append coffee-args-compile (list "--watch" (expand-file-name dir-or-file))) " "))) - (coffee-run-cmd args))) - -;; -;; Menubar -;; - -(easy-menu-define coffee-mode-menu coffee-mode-map - "Menu for CoffeeScript mode" - '("CoffeeScript" - ["Compile File" coffee-compile-file] - ["Compile Buffer" coffee-compile-buffer] - ["Compile Region" coffee-compile-region] - ["REPL" coffee-repl] - "---" - ["Version" coffee-version] - )) - -;; -;; Define Language Syntax -;; - -;; Instance variables (implicit this) -(defvar coffee-this-regexp "\\(?:@[_[:word:]]+\\|\\") - -;; Prototype::access -(defvar coffee-prototype-regexp "[_[:word:].$]+?::") - -;; Assignment -(defvar coffee-assign-regexp "\\(@?[_[:word:].$]+?\\)\\s-*:") - -;; Local Assignment -(defvar coffee-local-assign-regexp "\\s-*\\([_[:word:].$]+\\)\\s-*\\??=\\(?:[^>=]\\|$\\)") - -;; Lambda -(defvar coffee-lambda-regexp "\\(?:([^)]*)\\)?\\s-*\\(->\\|=>\\)") - -;; Namespaces -(defvar coffee-namespace-regexp "\\b\\(?:class\\s-+\\(\\S-+\\)\\)\\b") - -;; Booleans -(defvar coffee-boolean-regexp - (rx (or bol (not (any "."))) - (group symbol-start - (or "true" "false" "yes" "no" "on" "off" "null" "undefined") - symbol-end))) - -;; Regular expressions -(eval-and-compile - (defvar coffee-regexp-regexp "\\s/\\(\\(?:\\\\/\\|[^/\n\r]\\)*\\)\\s/")) - -;; JavaScript Keywords -(defvar coffee-js-keywords - '("if" "else" "new" "return" "try" "catch" - "finally" "throw" "break" "continue" "for" "in" "while" - "delete" "instanceof" "typeof" "switch" "super" "extends" - "class" "until" "loop" "yield")) - -;; Reserved keywords either by JS or CS. -(defvar coffee-js-reserved - '("case" "default" "do" "function" "var" "void" "with" - "const" "let" "debugger" "enum" "export" "import" "native" - "__extends" "__hasProp")) - -;; CoffeeScript keywords. -(defvar coffee-cs-keywords - '("then" "unless" "and" "or" "is" "own" - "isnt" "not" "of" "by" "when")) - -;; Iced CoffeeScript keywords -(defvar iced-coffee-cs-keywords - '("await" "defer")) - -;; Regular expression combining the above three lists. -(defvar coffee-keywords-regexp - ;; keywords can be member names. - (concat "\\(?:^\\|[^.]\\)" - (regexp-opt (append coffee-js-reserved - coffee-js-keywords - coffee-cs-keywords - iced-coffee-cs-keywords) 'symbols))) - -;; Create the list for font-lock. Each class of keyword is given a -;; particular face. -(defvar coffee-font-lock-keywords - ;; *Note*: order below matters. `coffee-keywords-regexp' goes last - ;; because otherwise the keyword "state" in the function - ;; "state_entry" would be highlighted. - `((,coffee-regexp-regexp . font-lock-constant-face) - (,coffee-this-regexp . font-lock-variable-name-face) - (,coffee-prototype-regexp . font-lock-type-face) - (,coffee-assign-regexp . font-lock-type-face) - (,coffee-local-assign-regexp 1 font-lock-variable-name-face) - (,coffee-boolean-regexp 1 font-lock-constant-face) - (,coffee-lambda-regexp 1 font-lock-function-name-face) - (,coffee-keywords-regexp 1 font-lock-keyword-face) - (,(lambda (limit) - (let ((res nil) - start) - (while (and (not res) (search-forward "#{" limit t)) - (let ((restart-pos (match-end 0))) - (setq start (match-beginning 0)) - (let (finish) - (while (and (not finish) (search-forward "}" limit t)) - (let ((end-pos (point))) - (save-excursion - (when (and (ignore-errors (backward-list 1)) - (= start (1- (point)))) - (setq res end-pos finish t))))) - (unless finish - (goto-char restart-pos))))) - (when (and res start) - (set-match-data (list start res))) - res)) - (0 font-lock-variable-name-face t)))) - -;; -;; Helper Functions -;; - -(defun coffee-comment-dwim (arg) - "Comment or uncomment current line or region in a smart way. -For details, see `comment-dwim'." - (interactive "*P") - (require 'newcomment) - (let ((deactivate-mark nil) (comment-start "#") (comment-end "")) - (comment-dwim arg) - (deactivate-mark t))) - -(defsubst coffee-command-compile-options (output) - (if output - (append coffee-args-compile (list "-j" output)) - coffee-args-compile)) - -(defun coffee-command-compile (input output) - "Run `coffee-command' to compile FILE-NAME to file with default -.js output file, or optionally to OUTPUT-FILE-NAME." - (let* ((expanded (expand-file-name input)) - (filename (if (file-remote-p expanded) - (tramp-file-name-localname (tramp-dissect-file-name expanded)) - (file-truename expanded))) - (output-file (coffee-compiled-file-name filename)) - (output-dir (file-name-directory output-file))) - (unless (file-directory-p output-dir) - (make-directory output-dir t)) - (append (coffee-command-compile-options output) - (list "-o" output-dir filename)))) - -(defun coffee-run-cmd (args) - "Run `coffee-command' with the given arguments, and display the -output in a compilation buffer." - (interactive "sArguments: ") - (let ((compilation-buffer-name-function - (lambda (_this-mode) - (generate-new-buffer-name coffee-compiled-buffer-name)))) - (compile (concat coffee-command " " args)))) - -(defun coffee-toggle-fatness () - "Toggle fatness of a coffee function arrow." - (interactive) - (save-excursion - (when (re-search-backward "[-=]>" nil t) - (cond ((looking-at "=") (replace-match "-")) - ((looking-at "-") (replace-match "=")))))) - -;; -;; imenu support -;; - -(defconst coffee-imenu-index-regexp - (concat "^\\(\\s-*\\)" ; $1 - "\\(?:" - coffee-assign-regexp ; $2 - "\\s-*" - coffee-lambda-regexp - "\\|" - coffee-namespace-regexp ; $4 - "\\|" - "\\(@?[_[:word:]:.$]+\\)\\s-*=\\(?:[^>]\\|$\\)" ; $5 match prototype access too - "\\(?:" "\\s-*" "\\(" coffee-lambda-regexp "\\)" "\\)?" ; $6 - "\\)")) - -(defun coffee-imenu-create-index () - "Create an imenu index of all methods in the buffer." - (interactive) - - ;; This function is called within a `save-excursion' so we're safe. - (goto-char (point-min)) - - (let ((index-alist '()) - (ns-indent 0) - ns-name) - ;; Go through every assignment that includes -> or => on the same - ;; line or starts with `class'. - (while (re-search-forward coffee-imenu-index-regexp nil t) - (let ((current-indent (- (match-end 1) (match-beginning 1))) - (property-name (match-string-no-properties 2)) - (class-name (match-string-no-properties 4)) - (variable-name (match-string-no-properties 5)) - (func-assign (match-string-no-properties 6))) - - ;; If this is the start of a new namespace, save the namespace's - ;; indentation level and name. - (if class-name - (setq ns-name (concat class-name "::") - ns-indent current-indent) - (when (and variable-name (<= current-indent ns-indent)) - (setq ns-name (concat variable-name ".") - ns-indent current-indent))) - - (if func-assign - (push (cons variable-name (match-beginning 5)) index-alist) - (when (and ns-name property-name) - (let ((index-pos (match-beginning 2))) - (if (<= current-indent ns-indent) - ;; Clear the namespace if we're no longer indented deeper - (setq ns-name nil ns-indent nil) - ;; Register as index-name if we are within the context of a namespace - (push (cons (concat ns-name property-name) index-pos) index-alist))))))) - index-alist)) - -;; -;; Indentation -;; - -(defsubst coffee-insert-spaces (count) - (if coffee-indent-tabs-mode - (insert-char (string-to-char "\t") (floor count coffee-tab-width)) - (insert-char ? count))) - -;;; The theory is explained in the README. - -(defsubst coffee--in-string-or-comment-p () - (nth 8 (syntax-ppss))) - -(defun coffee--block-type () - (save-excursion - (back-to-indentation) - (unless (coffee--in-string-or-comment-p) - (cond ((looking-at-p "else\\(\\s-+if\\)?\\_>") 'if-else) - ((looking-at-p "\\(?:catch\\|finally\\)\\_>") 'try-catch))))) - -(defun coffee--closed-if-else-p (curindent if-indent) - (let (else-if-p else-p) - (when (looking-at "else\\(?:\\s-+\\(if\\)\\)?\\_>") - (if (string= (match-string 1) "if") - (setq else-if-p t) - (setq else-p t))) - (or (and (not (or else-p else-if-p)) (<= curindent if-indent)) - (and else-p (= curindent if-indent))))) - -(defun coffee--closed-try-catch-p (curindent if-indent) - (and (not (looking-at-p "\\(?:finally\\|catch\\)\\_>")) - (<= curindent if-indent))) - -(defun coffee--closed-block-p (type if-indent limit) - (let ((limit-line (line-number-at-pos limit)) - (closed-pred (cl-case type - (if-else 'coffee--closed-if-else-p) - (try-catch 'coffee--closed-try-catch-p))) - finish) - (save-excursion - (while (and (not finish) (< (point) limit)) - (forward-line 1) - (when (< (line-number-at-pos) limit-line) - (let ((curindent (current-indentation))) - (unless (coffee--in-string-or-comment-p) - (back-to-indentation) - (when (funcall closed-pred curindent if-indent) - (setq finish t)))))) - finish))) - -(defun coffee--find-if-else-indents (limit cmpfn) - (let (indents) - (while (re-search-forward "^\\s-*if\\_>" limit t) - (let ((indent (current-indentation))) - (unless (coffee--closed-block-p 'if-else indent limit) - (push indent indents)))) - (sort indents cmpfn))) - -(defun coffee--find-try-catch-indents (limit cmpfn) - (let (indents) - (while (re-search-forward "^\\s-*try\\_>" limit t) - (let ((indent (current-indentation))) - (unless (coffee--closed-block-p 'try-catch indent limit) - (push indent indents)))) - (sort indents cmpfn))) - -(defun coffee--find-indents (type limit cmpfn) - (save-excursion - (coffee-beginning-of-defun 1) - (cl-case type - (if-else (coffee--find-if-else-indents limit cmpfn)) - (try-catch (coffee--find-try-catch-indents limit cmpfn))))) - -(defsubst coffee--decide-indent (curindent if-indents cmpfn) - (cl-loop for if-indent in if-indents - when (funcall cmpfn if-indent curindent) - return if-indent - finally - return (car if-indents))) - -(defun coffee--indent-insert-spaces (indent-size) - (unless (= (current-indentation) indent-size) - (save-excursion - (goto-char (line-beginning-position)) - (delete-horizontal-space) - (coffee-insert-spaces indent-size))) - (when (< (current-column) (current-indentation)) - (back-to-indentation))) - -(defun coffee--indent-line-like-python-mode (prev-indent repeated) - (let ((next-indent (- (current-indentation) coffee-tab-width)) - (indent-p (coffee-line-wants-indent))) - (if repeated - (if (< next-indent 0) - (+ prev-indent (if indent-p coffee-tab-width 0)) - next-indent) - (+ prev-indent (if indent-p coffee-tab-width 0))))) - -(defun coffee-indent-line () - "Indent current line as CoffeeScript." - (interactive) - (let* ((curindent (current-indentation)) - (limit (+ (line-beginning-position) curindent)) - (type (coffee--block-type)) - indent-size - begin-indents) - (if (and type (setq begin-indents (coffee--find-indents type limit '<))) - (setq indent-size (coffee--decide-indent curindent begin-indents '>)) - (if coffee-indent-like-python-mode - (setq indent-size - (coffee--indent-line-like-python-mode - (coffee-previous-indent) (eq last-command this-command))) - (let ((prev-indent (coffee-previous-indent)) - (next-indent-size (+ curindent coffee-tab-width))) - (if (> (- next-indent-size prev-indent) coffee-tab-width) - (setq indent-size 0) - (setq indent-size (+ curindent coffee-tab-width)))))) - (coffee--indent-insert-spaces indent-size))) - -(defun coffee-previous-indent () - "Return the indentation level of the previous non-blank line." - (save-excursion - (forward-line -1) - (while (and (looking-at-p "^[ \t]*$") (not (bobp))) - (forward-line -1)) - (current-indentation))) - -(defun coffee-newline-and-indent () - "Insert a newline and indent it to the same level as the previous line." - (interactive) - - ;; Remember the current line indentation level, - ;; insert a newline, and indent the newline to the same - ;; level as the previous line. - (let ((prev-indent (current-indentation))) - (when (< (current-column) (current-indentation)) - (move-to-column (current-indentation))) - (delete-horizontal-space t) - (newline) - - (if (coffee-line-wants-indent) - ;; We need to insert an additional tab because the last line was special. - (coffee-insert-spaces (+ (coffee-previous-indent) coffee-tab-width)) - ;; otherwise keep at the same indentation level - (coffee-insert-spaces prev-indent)) - - ;; Last line was a comment so this one should probably be, - ;; too. Makes it easy to write multi-line comments (like the one I'm - ;; writing right now). - (unless (and auto-fill-function comment-auto-fill-only-comments) - (when (coffee-previous-line-is-single-line-comment) - (insert "# "))))) - -(defun coffee-dedent-line-backspace (arg) - "Unindent to increment of `coffee-tab-width' with ARG==1 when -called from first non-blank char of line. - -Delete ARG spaces if ARG!=1." - (interactive "*p") - (if (use-region-p) - (delete-region (region-beginning) (region-end)) - (if (and (= 1 arg) - (= (point) (save-excursion - (back-to-indentation) - (point))) - (not (bolp))) - (let* ((extra-space-count (% (current-column) coffee-tab-width)) - (deleted-chars (if (zerop extra-space-count) - coffee-tab-width - extra-space-count))) - (backward-delete-char-untabify deleted-chars)) - (backward-delete-char-untabify arg)))) - -;; Indenters help determine whether the current line should be -;; indented further based on the content of the previous line. If a -;; line starts with `class', for instance, you're probably going to -;; want to indent the next line. - -(defvar coffee-indenters-bol '("class" "for" "if" "else" "unless" "while" "until" - "try" "catch" "finally" "switch" "when") - "Keywords or syntax whose presence at the start of a line means the -next line should probably be indented.") - -(defun coffee-indenters-bol-regexp () - "Builds a regexp out of `coffee-indenters-bol' words." - (regexp-opt coffee-indenters-bol 'words)) - -(defvar coffee-indenters-eol '(?> ?{ ?\[ ?:) - "Single characters at the end of a line that mean the next line -should probably be indented.") - -(defun coffee-line-wants-indent () - "Return t if the current line should be indented relative to the -previous line." - (save-excursion - (back-to-indentation) - (skip-chars-backward "\r\n\t ") - (let ((char-of-eol (char-before (line-end-position)))) - (or (and char-of-eol (memq char-of-eol coffee-indenters-eol)) - (progn - (back-to-indentation) - (and (looking-at-p (coffee-indenters-bol-regexp)) - (not (re-search-forward "\\_" (line-end-position) t)))))))) - -(defun coffee-previous-line-is-single-line-comment () - "Return t if the previous line is a CoffeeScript single line comment." - (save-excursion - (forward-line -1) - (back-to-indentation) - (and (looking-at-p "#") - (not (looking-at-p "###\\(?:\\s-+.*\\)?$")) - (progn - (goto-char (line-end-position)) - (nth 4 (syntax-ppss)))))) - -(defun coffee-indent-shift-amount (start end dir) - "Compute distance to the closest increment of `coffee-tab-width'." - (let ((min most-positive-fixnum)) - (save-excursion - (goto-char start) - (while (< (point) end) - (let ((current (current-indentation))) - (when (< current min) - (setq min current))) - (forward-line)) - (let ((rem (% min coffee-tab-width))) - (if (zerop rem) - coffee-tab-width - (cond ((eq dir 'left) rem) - ((eq dir 'right) (- coffee-tab-width rem)) - (t 0))))))) - -(defun coffee-indent-shift-left (start end &optional count) - "Shift lines contained in region START END by COUNT columns to the left. -If COUNT is not given, indents to the closest increment of -`coffee-tab-width'. If region isn't active, the current line is -shifted. The shifted region includes the lines in which START and -END lie. An error is signaled if any lines in the region are -indented less than COUNT columns." - (interactive - (if (use-region-p) - (list (region-beginning) (region-end) current-prefix-arg) - (list (line-beginning-position) (line-end-position) current-prefix-arg))) - (let ((amount (if count (* coffee-tab-width (prefix-numeric-value count)) - (coffee-indent-shift-amount start end 'left)))) - (when (> amount 0) - (let (deactivate-mark) - (save-excursion - (goto-char start) - ;; Check that all lines can be shifted enough - (while (< (point) end) - (if (and (< (current-indentation) amount) - (not (looking-at-p "[ \t]*$"))) - (error "Can't shift all lines enough")) - (forward-line)) - (indent-rigidly start end (- amount))))))) - -(add-to-list 'debug-ignored-errors "^Can't shift all lines enough") - -(defun coffee-indent-shift-right (start end &optional count) - "Shift lines contained in region START END by COUNT columns to the right. -if COUNT is not given, indents to the closest increment of -`coffee-tab-width'. If region isn't active, the current line is -shifted. The shifted region includes the lines in which START and -END lie." - (interactive - (if (use-region-p) - (list (region-beginning) (region-end) current-prefix-arg) - (list (line-beginning-position) (line-end-position) current-prefix-arg))) - (let (deactivate-mark - (amount (if count (* coffee-tab-width (prefix-numeric-value count)) - (coffee-indent-shift-amount start end 'right)))) - (indent-rigidly start end amount))) - -(defun coffee-indent-region (start end) - (interactive "r") - (save-excursion - (goto-char start) - (forward-line 1) - (while (and (not (eobp)) (< (point) end)) - (let ((prev-indent (coffee-previous-indent)) - (curindent (current-indentation)) - indent-size) - (if (coffee-line-wants-indent) - (let ((expected (+ prev-indent coffee-tab-width))) - (when (/= curindent expected) - (setq indent-size expected))) - (when (> curindent prev-indent) - (setq indent-size prev-indent))) - (when indent-size - (save-excursion - (goto-char (line-beginning-position)) - (delete-horizontal-space) - (coffee-insert-spaces indent-size)))) - (forward-line 1)))) - -;; -;; Fill -;; - -(defun coffee-fill-forward-paragraph-function (&optional count) - "`fill-forward-paragraph-function' which correctly handles block -comments such as the following: - - class Klass - method: -> - ### - This is a method doc comment that spans multiple lines. - If `fill-paragraph' is applied to this paragraph, the comment - should preserve its format, with the delimiters on separate lines. - ### - ..." - (let ((ret (forward-paragraph count))) - (when (and (= count -1) - (looking-at-p "[[:space:]]*###[[:space:]]*$")) - (forward-line)) - ret)) - -;; -;; Define navigation functions -;; - -(defconst coffee-defun-regexp - (concat "^\\s-*\\(?:" - coffee-assign-regexp - "\\s-*" - coffee-lambda-regexp - "\\|" - coffee-namespace-regexp - "\\|" - "@?[_[:word:]:.$]+\\s-*=\\(?:[^>]\\|$\\)" - "\\s-*" - coffee-lambda-regexp - "\\)")) - -(defun coffee-in-comment-p () - (unless (eobp) - (save-excursion - (back-to-indentation) - (when (eq (char-after) ?#) - (forward-char 1)) - (nth 4 (syntax-ppss))))) - -(defsubst coffee-current-line-empty-p () - (let ((line (buffer-substring-no-properties - (line-beginning-position) (line-end-position)))) - (string-match-p "^\\s-*$" line))) - -(defun coffee-current-line-is-defun () - (save-excursion - (goto-char (line-end-position)) - (re-search-backward coffee-defun-regexp (line-beginning-position) t))) - -(defun coffee-current-line-is-assignment () - (save-excursion - (goto-char (line-end-position)) - (re-search-backward "^[_[:word:].$]+\\s-*=\\(?:[^>]\\|$\\)" - (line-beginning-position) t))) - -(defun coffee-curline-defun-type (parent-indent start-is-defun) - (save-excursion - (goto-char (line-end-position)) - (if (not (re-search-backward coffee-defun-regexp (line-beginning-position) t)) - (when (and (zerop parent-indent) (coffee-current-line-is-assignment)) - 'other) - (if (not start-is-defun) - 'other - (if (< parent-indent (current-indentation)) - 'child - 'other))))) - -(defun coffee-same-block-p (block-indent start-is-defun) - (let ((type (coffee-curline-defun-type block-indent start-is-defun))) - (cond ((eq type 'child) t) - ((eq type 'other) nil) - (t (>= (current-indentation) block-indent))))) - -(defsubst coffee-skip-line-p () - (or (coffee-in-comment-p) (coffee-current-line-empty-p))) - -(defun coffee-skip-forward-lines (arg) - (let ((pred (if (> arg 0) - (lambda () (not (eobp))) - (lambda () (not (bobp)))))) - (while (and (funcall pred) (coffee-skip-line-p)) - (forward-line arg)))) - -(defun coffee-beginning-of-defun (&optional count) - (interactive "p") - (unless count - (setq count 1)) - (let ((next-indent nil)) - (when (coffee-skip-line-p) - (save-excursion - (coffee-skip-forward-lines +1) - (setq next-indent (current-indentation)))) - (coffee-skip-forward-lines -1) - (let ((start-indent (or next-indent (current-indentation)))) - (when (and (not (eq this-command 'coffee-mark-defun)) (looking-back "^\\s-*" (line-beginning-position))) - (forward-line -1)) - (let ((finish nil)) - (goto-char (line-end-position)) - (while (and (not finish) (re-search-backward coffee-defun-regexp nil 'move)) - (let ((cur-indent (current-indentation))) - (when (<= cur-indent start-indent) - (setq start-indent cur-indent) - (cl-decf count))) - (when (<= count 0) - (back-to-indentation) - (setq finish t))))))) - -(defun coffee-end-of-block (&optional count) - "Move point to the end of the block." - (interactive "p") - (unless count - (setq count 1)) - (dotimes (_i count) - (let* ((curline-is-defun (coffee-current-line-is-defun)) - start-indent) - (coffee-skip-forward-lines 1) - (setq start-indent (current-indentation)) - (when (and (zerop start-indent) (not curline-is-defun)) - (when (re-search-forward coffee-defun-regexp nil 'move) - (back-to-indentation) - (setq curline-is-defun t))) - (let ((finish nil)) - (while (not finish) - (forward-line 1) - (coffee-skip-forward-lines 1) - (when (or (not (coffee-same-block-p start-indent curline-is-defun)) - (eobp)) - (setq finish t))) - (forward-line -1) - (coffee-skip-forward-lines -1) - (forward-line 1))))) - -(defun coffee-mark-defun () - (interactive) - (let ((be-actived transient-mark-mode)) - (push-mark (point)) - (let ((cur-indent (current-indentation))) - (coffee-beginning-of-defun) - (push-mark (point)) - (coffee-end-of-block) - (push-mark (point) nil be-actived) - (let ((next-indent nil)) - (when (coffee-skip-line-p) - (save-excursion - (coffee-skip-forward-lines +1) - (setq next-indent (current-indentation)))) - (when (and next-indent (< next-indent cur-indent)) - (coffee-skip-forward-lines -1)) - (coffee-beginning-of-defun))))) - -;; -;; hs-minor-mode -;; - -;; support for hs-minor-mode -(add-to-list 'hs-special-modes-alist - '(coffee-mode "\\s-*\\(?:class\\|.+[-=]>$\\)" nil "#" - coffee-end-of-block nil)) - -;; -;; Based on triple quote of python.el -;; -(eval-and-compile - (defconst coffee-block-strings-delimiter - (rx (and - ;; Match even number of backslashes. - (or (not (any ?\\ ?\' ?\" ?/)) - point - ;; Quotes might be preceded by a escaped quote. - (and (or (not (any ?\\)) point) - ?\\ - (* ?\\ ?\\) - (any ?\' ?\" ?/))) - (* ?\\ ?\\) - ;; Match single or triple quotes of any kind. - (group (or "'''" "\"\"\"" "///")))))) - -(defsubst coffee-syntax-count-quotes (quote-char start-point limit) - (let ((i 0)) - (while (and (< i 3) - (< (+ start-point i) limit) - (eq (char-after (+ start-point i)) quote-char)) - (cl-incf i)) - i)) - -(defun coffee-syntax-block-strings-stringify () - (let* ((ppss (prog2 - (backward-char 3) - (syntax-ppss) - (forward-char 3))) - (string-start (and (not (nth 4 ppss)) (nth 8 ppss))) - (quote-starting-pos (- (point) 3)) - (quote-ending-pos (point)) - (num-closing-quotes - (and string-start - (coffee-syntax-count-quotes - (char-before) string-start quote-starting-pos)))) - (cond ((and string-start (= num-closing-quotes 0)) - ;; This set of quotes doesn't match the string starting - ;; kind. Do nothing. - nil) - ((not string-start) - ;; This set of quotes delimit the start of a string. - (put-text-property quote-starting-pos (1+ quote-starting-pos) - 'syntax-table (string-to-syntax "|"))) - ((= num-closing-quotes 3) - ;; This set of quotes delimit the end of a string. - (put-text-property (1- quote-ending-pos) quote-ending-pos - 'syntax-table (string-to-syntax "|")))))) - -(defun coffee-syntax-propertize-block-comment () - (let ((curpoint (point)) - (inhibit-changing-match-data t)) - (let* ((valid-comment-start nil) - (valid-comment-end (looking-at-p "#\\{0,2\\}\\s-*$")) - (ppss (prog2 - (backward-char 3) - (syntax-ppss) - (setq valid-comment-start (looking-back "^\\s-*" (line-beginning-position))) - (forward-char 3))) - (in-comment (nth 4 ppss)) - (in-string (nth 3 ppss))) - (when (or (and (not in-comment) (not in-string) valid-comment-start) - (and in-comment valid-comment-end)) - (put-text-property (- curpoint 3) curpoint - 'syntax-table (string-to-syntax "!")))))) - -(defsubst coffee--in-string-p () - (nth 3 (syntax-ppss))) - -(defun coffee-syntax-string-interpolation () - (let ((start (match-beginning 0)) - (end (point))) - (if (not (coffee--in-string-p)) - (put-text-property start (1+ start) - 'syntax-table (string-to-syntax "< b")) - (goto-char start) - (let (finish res) - (while (and (not finish) (search-forward "}" nil t)) - (let ((end-pos (match-end 0))) - (save-excursion - (when (and (ignore-errors (backward-list 1)) - (= start (1- (point)))) - (setq res end-pos finish t))))) - (goto-char end) - (when res - (while (re-search-forward "[\"'#]" res t) - (put-text-property (match-beginning 0) (match-end 0) - 'syntax-table (string-to-syntax "_"))) - (goto-char (1- res))))))) - -(defun coffee-syntax-propertize-function (start end) - (goto-char start) - (funcall - (syntax-propertize-rules - (coffee-block-strings-delimiter - (0 (ignore (coffee-syntax-block-strings-stringify)))) - ("/" - (0 (ignore - (let ((curpoint (point)) - (start (match-beginning 0)) - (end (match-end 0))) - (goto-char start) - (let ((ppss (syntax-ppss))) - (cond ((nth 8 ppss) - (put-text-property start end - 'syntax-table (string-to-syntax "_")) - (goto-char curpoint)) - ((looking-at coffee-regexp-regexp) - (put-text-property (match-beginning 1) (match-end 1) - 'syntax-table (string-to-syntax "_")) - (goto-char (match-end 0))) - (t (goto-char curpoint)))))))) - ("#{" (0 (ignore (coffee-syntax-string-interpolation)))) - ("###" - (0 (ignore (coffee-syntax-propertize-block-comment))))) - (point) end)) - -(defun coffee-get-comment-info () - (let* ((syntax (syntax-ppss)) - (commentp (nth 4 syntax)) - (comment-start-kinda (nth 8 syntax))) - (when commentp - (save-excursion - (if (and - (> comment-start-kinda 2) (< comment-start-kinda (point-max)) - (string= - "###" (buffer-substring - (- comment-start-kinda 2) (1+ comment-start-kinda)))) - 'multiple-line - 'single-line))))) - -(defun coffee-comment-line-break-fn (&optional _) - (let ((comment-type (coffee-get-comment-info)) - (coffee-indent-like-python-mode t)) - (comment-indent-new-line) - (cond ((eq comment-type 'multiple-line) - (save-excursion - (beginning-of-line) - (when (looking-at "[[:space:]]*\\(#\\)") - (replace-match "" nil nil nil 1)))) - ((eq comment-type 'single-line) - (coffee-indent-line))))) - -(defun coffee-auto-fill-fn () - (let ((comment-type (coffee-get-comment-info)) - (fill-result (do-auto-fill)) - (coffee-indent-like-python-mode t)) - (when (and fill-result (eq comment-type 'single-line)) - (save-excursion - (beginning-of-line) - (when (looking-at "[[:space:]]*#") - (replace-match "#"))) - (coffee-indent-line)))) - -;; -;; Define Major Mode -;; - -(defvar coffee-mode-syntax-table - (let ((table (make-syntax-table))) - ;; perl style comment: "# ..." - (modify-syntax-entry ?# "< b" table) - (modify-syntax-entry ?\n "> b" table) - - ;; Treat slashes as paired delimiters; useful for finding regexps. - (modify-syntax-entry ?/ "/" table) - - ;; single quote strings - (modify-syntax-entry ?' "\"" table) - table)) - -;;;###autoload -(define-derived-mode coffee-mode prog-mode "Coffee" - "Major mode for editing CoffeeScript." - - ;; code for syntax highlighting - (setq font-lock-defaults '((coffee-font-lock-keywords))) - - ;; fix comment filling function - (set (make-local-variable 'comment-line-break-function) - #'coffee-comment-line-break-fn) - (set (make-local-variable 'normal-auto-fill-function) #'coffee-auto-fill-fn) - - (set (make-local-variable 'comment-start) "#") - - ;; indentation - (make-local-variable 'coffee-tab-width) - (make-local-variable 'coffee-indent-tabs-mode) - (set (make-local-variable 'indent-line-function) 'coffee-indent-line) - (set (make-local-variable 'indent-region-function) 'coffee-indent-region) - (set (make-local-variable 'tab-width) coffee-tab-width) - - (set (make-local-variable 'syntax-propertize-function) - 'coffee-syntax-propertize-function) - - ;; fill - (set (make-local-variable 'fill-forward-paragraph-function) - 'coffee-fill-forward-paragraph-function) - - (set (make-local-variable 'beginning-of-defun-function) - 'coffee-beginning-of-defun) - (set (make-local-variable 'end-of-defun-function) - 'coffee-end-of-block) - - ;; imenu - (set (make-local-variable 'imenu-create-index-function) - 'coffee-imenu-create-index) - - ;; Don't let electric-indent-mode break coffee-mode. - (set (make-local-variable 'electric-indent-functions) - (list (lambda (_arg) 'no-indent))) - - ;; no tabs - (setq indent-tabs-mode coffee-indent-tabs-mode)) - -;; -;; Compile-on-Save minor mode -;; - -(defcustom coffee-cos-mode-line " CoS" - "Lighter of `coffee-cos-mode'" - :type 'string) - -(define-minor-mode coffee-cos-mode - "Toggle compile-on-save for coffee-mode. - -Add `'(lambda () (coffee-cos-mode t))' to `coffee-mode-hook' to turn -it on by default." - :lighter coffee-cos-mode-line - (if coffee-cos-mode - (add-hook 'after-save-hook 'coffee-compile-file nil t) - (remove-hook 'after-save-hook 'coffee-compile-file t))) - -;; -;; Live compile minor mode -;; - -(defun coffee--live-compile (&rest _unused) - (when (or (not coffee--process) - (not (eq (process-status coffee--process) 'run))) - (coffee-compile-buffer))) - -(defcustom coffee-live-compile-mode-line " LiveCS" - "Lighter of `coffee-live-compile-mode'" - :type 'string) - -(define-minor-mode coffee-live-compile-mode - "Compile current buffer in real time" - :lighter coffee-live-comp-mode-line - (if coffee-live-compile-mode - (add-hook 'after-change-functions 'coffee--live-compile nil t) - (remove-hook 'after-change-functions 'coffee--live-compile t))) - -(provide 'coffee-mode) - -;; -;; On Load -;; - -;; Run coffee-mode for files ending in .coffee. -;;;###autoload -(add-to-list 'auto-mode-alist '("\\.coffee\\'" . coffee-mode)) -;;;###autoload -(add-to-list 'auto-mode-alist '("\\.iced\\'" . coffee-mode)) -;;;###autoload -(add-to-list 'auto-mode-alist '("Cakefile\\'" . coffee-mode)) -;;;###autoload -(add-to-list 'auto-mode-alist '("\\.cson\\'" . coffee-mode)) -;;;###autoload -(add-to-list 'interpreter-mode-alist '("coffee" . coffee-mode)) - -;;; coffee-mode.el ends here diff --git a/elpa/command-log-mode-20160412.2147/command-log-mode-autoloads.el b/elpa/command-log-mode-20160412.2147/command-log-mode-autoloads.el deleted file mode 100644 index 6925709..0000000 --- a/elpa/command-log-mode-20160412.2147/command-log-mode-autoloads.el +++ /dev/null @@ -1,27 +0,0 @@ -;;; command-log-mode-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) - -;;;### (autoloads nil "command-log-mode" "command-log-mode.el" (22506 -;;;;;; 36214 708146 298000)) -;;; Generated autoloads from command-log-mode.el - -(autoload 'command-log-mode "command-log-mode" "\ -Toggle keyboard command logging. - -\(fn &optional ARG)" t nil) - -(autoload 'clm/toggle-command-log-buffer "command-log-mode" "\ -Toggle the command log showing or not. - -\(fn &optional ARG)" t nil) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; command-log-mode-autoloads.el ends here diff --git a/elpa/command-log-mode-20160412.2147/command-log-mode-pkg.el b/elpa/command-log-mode-20160412.2147/command-log-mode-pkg.el deleted file mode 100644 index d72a9fd..0000000 --- a/elpa/command-log-mode-20160412.2147/command-log-mode-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "command-log-mode" "20160412.2147" "log keyboard commands to buffer" 'nil :url "https://github.com/lewang/command-log-mode" :keywords '("help")) diff --git a/elpa/command-log-mode-20160412.2147/command-log-mode.el b/elpa/command-log-mode-20160412.2147/command-log-mode.el deleted file mode 100644 index 37e6d65..0000000 --- a/elpa/command-log-mode-20160412.2147/command-log-mode.el +++ /dev/null @@ -1,323 +0,0 @@ -;;; command-log-mode.el --- log keyboard commands to buffer - -;; homepage: https://github.com/lewang/command-log-mode - -;; Copyright (C) 2013 Nic Ferrier -;; Copyright (C) 2012 Le Wang -;; Copyright (C) 2004 Free Software Foundation, Inc. - -;; Author: Michael Weber -;; Keywords: help -;; Package-Version: 20160412.2147 -;; Initial-version: <2004-10-07 11:41:28 michaelw> -;; Time-stamp: <2004-11-06 17:08:11 michaelw> - -;; This file 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, or (at your option) -;; any later version. - -;; This file 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 GNU Emacs; see the file COPYING. If not, write to -;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. - -;;; Commentary: - -;; This add-on can be used to demo Emacs to an audience. When -;; activated, keystrokes get logged into a designated buffer, along -;; with the command bound to them. - -;; To enable, use e.g.: -;; -;; (require 'command-log-mode) -;; (add-hook 'LaTeX-mode-hook 'command-log-mode) -;; -;; To see the log buffer, call M-x clm/open-command-log-buffer. - -;; The key strokes in the log are decorated with ISO9601 timestamps on -;; the property `:time' so if you want to convert the log for -;; screencasting purposes you could use the time stamp as a key into -;; the video beginning. - -;;; Code: - -(eval-when-compile (require 'cl)) - -(defvar clm/log-text t - "A non-nil setting means text will be saved to the command log.") - -(defvar clm/log-repeat nil - "A nil setting means repetitions of the same command are merged into the single log line.") - -(defvar clm/recent-history-string "" - "This string will hold recently typed text.") - -(defun clm/recent-history () - (setq clm/recent-history-string - (concat clm/recent-history-string - (buffer-substring-no-properties (- (point) 1) (point))))) - -(add-hook 'post-self-insert-hook 'clm/recent-history) - -(defun clm/zap-recent-history () - (unless (or (member this-original-command - clm/log-command-exceptions*) - (eq this-original-command #'self-insert-command)) - (setq clm/recent-history-string ""))) - -(add-hook 'post-command-hook 'clm/zap-recent-history) - -(defvar clm/time-string "%Y-%m-%dT%H:%M:%S" - "The string sent to `format-time-string' when command time is logged.") - -(defvar clm/logging-dir "~/log/" - "Directory in which to store files containing logged commands.") - -(defvar clm/log-command-exceptions* - '(nil self-insert-command backward-char forward-char - delete-char delete-backward-char backward-delete-char - backward-delete-char-untabify - universal-argument universal-argument-other-key - universal-argument-minus universal-argument-more - beginning-of-line end-of-line recenter - move-end-of-line move-beginning-of-line - handle-switch-frame - newline previous-line next-line) - "A list commands which should not be logged, despite logging being enabled. -Frequently used non-interesting commands (like cursor movements) should be put here.") - -(defvar clm/command-log-buffer nil - "Reference of the currenly used buffer to display logged commands.") -(defvar clm/command-repetitions 0 - "Count of how often the last keyboard commands has been repeated.") -(defvar clm/last-keyboard-command nil - "Last logged keyboard command.") - - -(defvar clm/log-command-indentation 11 - "*Indentation of commands in command log buffer.") - -(defgroup command-log nil - "Customization for the command log.") - -(defcustom command-log-mode-auto-show nil - "Show the command-log window or frame automatically." - :group 'command-log - :type 'boolean) - -(defcustom command-log-mode-window-size 40 - "The size of the command-log window." - :group 'command-log - :type 'integer) - -(defcustom command-log-mode-window-font-size 2 - "The font-size of the command-log window." - :group 'command-log - :type 'integer) - -(defcustom command-log-mode-key-binding-open-log "C-c o" - "The key binding used to toggle the log window." - :group 'command-log - :type '(radio - (const :tag "No key" nil) - (key-sequence "C-c o"))) ;; this is not right though it works for kbd - -(defcustom command-log-mode-open-log-turns-on-mode nil - "Does opening the command log turn on the mode?" - :group 'command-log - :type 'boolean) - -(defcustom command-log-mode-is-global nil - "Does turning on command-log-mode happen globally?" - :group 'command-log - :type 'boolean) - -;;;###autoload -(define-minor-mode command-log-mode - "Toggle keyboard command logging." - :init-value nil - :lighter " command-log" - :keymap nil - (if command-log-mode - (when (and - command-log-mode-auto-show - (not (get-buffer-window clm/command-log-buffer))) - (clm/open-command-log-buffer)) - ;; We can close the window though - (clm/close-command-log-buffer))) - -(define-global-minor-mode global-command-log-mode command-log-mode - command-log-mode) - -(defun clm/buffer-log-command-p (cmd &optional buffer) - "Determines whether keyboard command CMD should be logged. -If non-nil, BUFFER specifies the buffer used to determine whether CMD should be logged. -If BUFFER is nil, the current buffer is assumed." - (let ((val (if buffer - (buffer-local-value command-log-mode buffer) - command-log-mode))) - (and (not (null val)) - (null (member cmd clm/log-command-exceptions*))))) - -(defmacro clm/save-command-environment (&rest body) - (declare (indent 0)) - `(let ((deactivate-mark nil) ; do not deactivate mark in transient - ; mark mode - ;; do not let random commands scribble over - ;; {THIS,LAST}-COMMAND - (this-command this-command) - (last-command last-command)) - ,@body)) - -(defun clm/open-command-log-buffer (&optional arg) - "Opens (and creates, if non-existant) a buffer used for logging keyboard commands. -If ARG is Non-nil, the existing command log buffer is cleared." - (interactive "P") - (with-current-buffer - (setq clm/command-log-buffer - (get-buffer-create " *command-log*")) - (text-scale-set 1)) - (when arg - (with-current-buffer clm/command-log-buffer - (erase-buffer))) - (let ((new-win (split-window-horizontally - (- 0 command-log-mode-window-size)))) - (set-window-buffer new-win clm/command-log-buffer) - (set-window-dedicated-p new-win t))) - -(defun clm/close-command-log-buffer () - "Close the command log window." - (interactive) - (with-current-buffer - (setq clm/command-log-buffer - (get-buffer-create " *command-log*")) - (let ((win (get-buffer-window (current-buffer)))) - (when (windowp win) - (delete-window win))))) - -;;;###autoload -(defun clm/toggle-command-log-buffer (&optional arg) - "Toggle the command log showing or not." - (interactive "P") - (when (and command-log-mode-open-log-turns-on-mode - (not command-log-mode)) - (if command-log-mode-is-global - (global-command-log-mode) - (command-log-mode))) - (with-current-buffer - (setq clm/command-log-buffer - (get-buffer-create " *command-log*")) - (let ((win (get-buffer-window (current-buffer)))) - (if (windowp win) - (clm/close-command-log-buffer) - ;; Else open the window - (clm/open-command-log-buffer arg))))) - -(defun clm/scroll-buffer-window (buffer &optional move-fn) - "Updates `point' of windows containing BUFFER according to MOVE-FN. -If non-nil, MOVE-FN is called on every window which displays BUFFER. -If nil, MOVE-FN defaults to scrolling to the bottom, making the last line visible. - -Scrolling up can be accomplished with: -\(clm/scroll-buffer-window buf (lambda () (goto-char (point-min)))) -" - (let ((selected (selected-window)) - (point-mover (or move-fn - (function (lambda () (goto-char (point-max))))))) - (walk-windows (function (lambda (window) - (when (eq (window-buffer window) buffer) - (select-window window) - (funcall point-mover) - (select-window selected)))) - nil t))) - -(defmacro clm/with-command-log-buffer (&rest body) - (declare (indent 0)) - `(when (and (not (null clm/command-log-buffer)) - (buffer-name clm/command-log-buffer)) - (with-current-buffer clm/command-log-buffer - ,@body))) - -(defun clm/log-command (&optional cmd) - "Hook into `pre-command-hook' to intercept command activation." - (clm/save-command-environment - (setq cmd (or cmd this-command)) - (when (clm/buffer-log-command-p cmd) - (clm/with-command-log-buffer - (let ((current (current-buffer))) - (goto-char (point-max)) - (cond ((and (not clm/log-repeat) (eq cmd clm/last-keyboard-command)) - (incf clm/command-repetitions) - (save-match-data - (when (and (> clm/command-repetitions 1) - (search-backward "[" (line-beginning-position -1) t)) - (delete-region (point) (line-end-position)))) - (backward-char) ; skip over either ?\newline or ?\space before ?\[ - (insert " [") - (princ (1+ clm/command-repetitions) current) - (insert " times]")) - (t ;; (message "last cmd: %s cur: %s" last-command cmd) - ;; showing accumulated text with interleaved key presses isn't very useful - (when (and clm/log-text (not clm/log-repeat)) - (if (eq clm/last-keyboard-command 'self-insert-command) - (insert "[text: " clm/recent-history-string "]\n"))) - (setq clm/command-repetitions 0) - (insert - (propertize - (key-description (this-command-keys)) - :time (format-time-string clm/time-string (current-time)))) - (when (>= (current-column) clm/log-command-indentation) - (newline)) - (move-to-column clm/log-command-indentation t) - (princ (if (byte-code-function-p cmd) "" cmd) current) - (newline) - (setq clm/last-keyboard-command cmd))) - (clm/scroll-buffer-window current)))))) - -(defun clm/command-log-clear () - "Clear the command log buffer." - (interactive) - (with-current-buffer clm/command-log-buffer - (erase-buffer))) - -(defun clm/save-log-line (start end) - "Helper function for `clm/save-command-log' to export text properties." - (save-excursion - (goto-char start) - (let ((time (get-text-property (point) :time))) - (if time - (list (cons start (if time - (concat "[" (get-text-property (point) :time) "] ") - ""))))))) - -(defun clm/save-command-log () - "Save commands to today's log. -Clears the command log buffer after saving." - (interactive) - (save-window-excursion - (set-buffer (get-buffer " *command-log*")) - (goto-char (point-min)) - (let ((now (format-time-string "%Y-%m-%d")) - (write-region-annotate-functions '(clm/save-log-line))) - (while (and (re-search-forward "^.*" nil t) - (not (eobp))) - (append-to-file (line-beginning-position) (1+ (line-end-position)) (concat clm/logging-dir now)))) - (clm/command-log-clear))) - -(add-hook 'pre-command-hook 'clm/log-command) - -(eval-after-load 'command-log-mode - '(when command-log-mode-key-binding-open-log - (global-set-key - (kbd command-log-mode-key-binding-open-log) - 'clm/toggle-command-log-buffer))) - -(provide 'command-log-mode) - -;;; command-log-mode.el ends here diff --git a/elpa/company-20160829.1206/company-abbrev.el b/elpa/company-20160829.1206/company-abbrev.el deleted file mode 100644 index 24ec3b7..0000000 --- a/elpa/company-20160829.1206/company-abbrev.el +++ /dev/null @@ -1,50 +0,0 @@ -;;; company-abbrev.el --- company-mode completion backend for abbrev - -;; Copyright (C) 2009-2011, 2015 Free Software Foundation, Inc. - -;; Author: Nikolaj Schumacher - -;; This file is part of GNU Emacs. - -;; GNU Emacs 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 3 of the License, or -;; (at your option) any later version. - -;; GNU Emacs 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 GNU Emacs. If not, see . - - -;;; Commentary: -;; - -;;; Code: - -(require 'company) -(require 'cl-lib) -(require 'abbrev) - -(defun company-abbrev-insert (match) - "Replace MATCH with the expanded abbrev." - (expand-abbrev)) - -;;;###autoload -(defun company-abbrev (command &optional arg &rest ignored) - "`company-mode' completion backend for abbrev." - (interactive (list 'interactive)) - (cl-case command - (interactive (company-begin-backend 'company-abbrev - 'company-abbrev-insert)) - (prefix (company-grab-symbol)) - (candidates (nconc - (delete "" (all-completions arg global-abbrev-table)) - (delete "" (all-completions arg local-abbrev-table)))) - (meta (abbrev-expansion arg)))) - -(provide 'company-abbrev) -;;; company-abbrev.el ends here diff --git a/elpa/company-20160829.1206/company-autoloads.el b/elpa/company-20160829.1206/company-autoloads.el deleted file mode 100644 index 4d4f0ac..0000000 --- a/elpa/company-20160829.1206/company-autoloads.el +++ /dev/null @@ -1,298 +0,0 @@ -;;; company-autoloads.el --- automatically extracted autoloads -;; -;;; Code: -(add-to-list 'load-path (or (file-name-directory #$) (car load-path))) - -;;;### (autoloads nil "company" "company.el" (22490 24940 331394 -;;;;;; 500000)) -;;; Generated autoloads from company.el - -(autoload 'company-mode "company" "\ -\"complete anything\"; is an in-buffer completion framework. -Completion starts automatically, depending on the values -`company-idle-delay' and `company-minimum-prefix-length'. - -Completion can be controlled with the commands: -`company-complete-common', `company-complete-selection', `company-complete', -`company-select-next', `company-select-previous'. If these commands are -called before `company-idle-delay', completion will also start. - -Completions can be searched with `company-search-candidates' or -`company-filter-candidates'. These can be used while completion is -inactive, as well. - -The completion data is retrieved using `company-backends' and displayed -using `company-frontends'. If you want to start a specific backend, call -it interactively or use `company-begin-backend'. - -By default, the completions list is sorted alphabetically, unless the -backend chooses otherwise, or `company-transformers' changes it later. - -regular keymap (`company-mode-map'): - -\\{company-mode-map} -keymap during active completions (`company-active-map'): - -\\{company-active-map} - -\(fn &optional ARG)" t nil) - -(defvar global-company-mode nil "\ -Non-nil if Global-Company mode is enabled. -See the command `global-company-mode' for a description of this minor mode. -Setting this variable directly does not take effect; -either customize it (see the info node `Easy Customization') -or call the function `global-company-mode'.") - -(custom-autoload 'global-company-mode "company" nil) - -(autoload 'global-company-mode "company" "\ -Toggle Company mode in all buffers. -With prefix ARG, enable Global-Company mode if ARG is positive; -otherwise, disable it. If called from Lisp, enable the mode if -ARG is omitted or nil. - -Company mode is enabled in all buffers where -`company-mode-on' would do it. -See `company-mode' for more information on Company mode. - -\(fn &optional ARG)" t nil) - -(autoload 'company-manual-begin "company" "\ - - -\(fn)" t nil) - -(autoload 'company-complete "company" "\ -Insert the common part of all candidates or the current selection. -The first time this is called, the common part is inserted, the second -time, or when the selection has been changed, the selected candidate is -inserted. - -\(fn)" t nil) - -;;;*** - -;;;### (autoloads nil "company-abbrev" "company-abbrev.el" (22490 -;;;;;; 24940 399394 311000)) -;;; Generated autoloads from company-abbrev.el - -(autoload 'company-abbrev "company-abbrev" "\ -`company-mode' completion backend for abbrev. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-bbdb" "company-bbdb.el" (22490 24940 -;;;;;; 379394 367000)) -;;; Generated autoloads from company-bbdb.el - -(autoload 'company-bbdb "company-bbdb" "\ -`company-mode' completion backend for BBDB. - -\(fn COMMAND &optional ARG &rest IGNORE)" t nil) - -;;;*** - -;;;### (autoloads nil "company-css" "company-css.el" (22490 24940 -;;;;;; 327394 512000)) -;;; Generated autoloads from company-css.el - -(autoload 'company-css "company-css" "\ -`company-mode' completion backend for `css-mode'. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-dabbrev" "company-dabbrev.el" (22490 -;;;;;; 24940 355394 433000)) -;;; Generated autoloads from company-dabbrev.el - -(autoload 'company-dabbrev "company-dabbrev" "\ -dabbrev-like `company-mode' completion backend. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-dabbrev-code" "company-dabbrev-code.el" -;;;;;; (22490 24940 347394 456000)) -;;; Generated autoloads from company-dabbrev-code.el - -(autoload 'company-dabbrev-code "company-dabbrev-code" "\ -dabbrev-like `company-mode' backend for code. -The backend looks for all symbols in the current buffer that aren't in -comments or strings. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-elisp" "company-elisp.el" (22490 24940 -;;;;;; 407394 288000)) -;;; Generated autoloads from company-elisp.el - -(autoload 'company-elisp "company-elisp" "\ -`company-mode' completion backend for Emacs Lisp. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-etags" "company-etags.el" (22490 24940 -;;;;;; 339394 478000)) -;;; Generated autoloads from company-etags.el - -(autoload 'company-etags "company-etags" "\ -`company-mode' completion backend for etags. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-files" "company-files.el" (22490 24940 -;;;;;; 363394 410000)) -;;; Generated autoloads from company-files.el - -(autoload 'company-files "company-files" "\ -`company-mode' completion backend existing file names. -Completions works for proper absolute and relative files paths. -File paths with spaces are only supported inside strings. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-gtags" "company-gtags.el" (22490 24940 -;;;;;; 299394 590000)) -;;; Generated autoloads from company-gtags.el - -(autoload 'company-gtags "company-gtags" "\ -`company-mode' completion backend for GNU Global. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-ispell" "company-ispell.el" (22490 -;;;;;; 24940 403394 299000)) -;;; Generated autoloads from company-ispell.el - -(autoload 'company-ispell "company-ispell" "\ -`company-mode' completion backend using Ispell. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-keywords" "company-keywords.el" (22490 -;;;;;; 24940 371394 389000)) -;;; Generated autoloads from company-keywords.el - -(autoload 'company-keywords "company-keywords" "\ -`company-mode' backend for programming language keywords. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-nxml" "company-nxml.el" (22490 24940 -;;;;;; 383394 355000)) -;;; Generated autoloads from company-nxml.el - -(autoload 'company-nxml "company-nxml" "\ -`company-mode' completion backend for `nxml-mode'. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-oddmuse" "company-oddmuse.el" (22490 -;;;;;; 24940 319394 534000)) -;;; Generated autoloads from company-oddmuse.el - -(autoload 'company-oddmuse "company-oddmuse" "\ -`company-mode' completion backend for `oddmuse-mode'. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-semantic" "company-semantic.el" (22490 -;;;;;; 24940 303394 579000)) -;;; Generated autoloads from company-semantic.el - -(autoload 'company-semantic "company-semantic" "\ -`company-mode' completion backend using CEDET Semantic. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-tempo" "company-tempo.el" (22490 24940 -;;;;;; 351394 444000)) -;;; Generated autoloads from company-tempo.el - -(autoload 'company-tempo "company-tempo" "\ -`company-mode' completion backend for tempo. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-xcode" "company-xcode.el" (22490 24940 -;;;;;; 395394 322000)) -;;; Generated autoloads from company-xcode.el - -(autoload 'company-xcode "company-xcode" "\ -`company-mode' completion backend for Xcode projects. - -\(fn COMMAND &optional ARG &rest IGNORED)" t nil) - -;;;*** - -;;;### (autoloads nil "company-yasnippet" "company-yasnippet.el" -;;;;;; (22490 24940 391394 333000)) -;;; Generated autoloads from company-yasnippet.el - -(autoload 'company-yasnippet "company-yasnippet" "\ -`company-mode' backend for `yasnippet'. - -This backend should be used with care, because as long as there are -snippets defined for the current major mode, this backend will always -shadow backends that come after it. Recommended usages: - -* In a buffer-local value of `company-backends', grouped with a backend or - several that provide actual text completions. - - (add-hook 'js-mode-hook - (lambda () - (set (make-local-variable 'company-backends) - '((company-dabbrev-code company-yasnippet))))) - -* After keyword `:with', grouped with other backends. - - (push '(company-semantic :with company-yasnippet) company-backends) - -* Not in `company-backends', just bound to a key. - - (global-set-key (kbd \"C-c y\") 'company-yasnippet) - -\(fn COMMAND &optional ARG &rest IGNORE)" t nil) - -;;;*** - -;;;### (autoloads nil nil ("company-capf.el" "company-clang.el" "company-cmake.el" -;;;;;; "company-eclim.el" "company-pkg.el" "company-template.el") -;;;;;; (22490 24940 420783 348000)) - -;;;*** - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; End: -;;; company-autoloads.el ends here diff --git a/elpa/company-20160829.1206/company-bbdb.el b/elpa/company-20160829.1206/company-bbdb.el deleted file mode 100644 index 872e1fc..0000000 --- a/elpa/company-20160829.1206/company-bbdb.el +++ /dev/null @@ -1,61 +0,0 @@ -;;; company-bbdb.el --- company-mode completion backend for BBDB in message-mode - -;; Copyright (C) 2013-2014, 2016 Free Software Foundation, Inc. - -;; Author: Jan Tatarik - -;; This file is part of GNU Emacs. - -;; GNU Emacs 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 3 of the License, or -;; (at your option) any later version. - -;; GNU Emacs 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 GNU Emacs. If not, see . - -(require 'company) -(require 'cl-lib) - -(declare-function bbdb-record-get-field "bbdb") -(declare-function bbdb-records "bbdb") -(declare-function bbdb-dwim-mail "bbdb-com") -(declare-function bbdb-search "bbdb-com") - -(defgroup company-bbdb nil - "Completion backend for BBDB." - :group 'company) - -(defcustom company-bbdb-modes '(message-mode) - "Major modes in which `company-bbdb' may complete." - :type '(repeat (symbol :tag "Major mode")) - :package-version '(company . "0.8.8")) - -(defun company-bbdb--candidates (arg) - (cl-mapcan (lambda (record) - (mapcar (lambda (mail) (bbdb-dwim-mail record mail)) - (bbdb-record-get-field record 'mail))) - (eval '(bbdb-search (bbdb-records) arg nil arg)))) - -;;;###autoload -(defun company-bbdb (command &optional arg &rest ignore) - "`company-mode' completion backend for BBDB." - (interactive (list 'interactive)) - (cl-case command - (interactive (company-begin-backend 'company-bbdb)) - (prefix (and (memq major-mode company-bbdb-modes) - (featurep 'bbdb-com) - (looking-back "^\\(To\\|Cc\\|Bcc\\): *.*? *\\([^,;]*\\)" - (line-beginning-position)) - (match-string-no-properties 2))) - (candidates (company-bbdb--candidates arg)) - (sorted t) - (no-cache t))) - -(provide 'company-bbdb) -;;; company-bbdb.el ends here diff --git a/elpa/company-20160829.1206/company-capf.el b/elpa/company-20160829.1206/company-capf.el deleted file mode 100644 index 866fd62..0000000 --- a/elpa/company-20160829.1206/company-capf.el +++ /dev/null @@ -1,167 +0,0 @@ -;;; company-capf.el --- company-mode completion-at-point-functions backend -*- lexical-binding: t -*- - -;; Copyright (C) 2013-2016 Free Software Foundation, Inc. - -;; Author: Stefan Monnier - -;; This file is part of GNU Emacs. - -;; GNU Emacs 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 3 of the License, or -;; (at your option) any later version. - -;; GNU Emacs 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 GNU Emacs. If not, see . - - -;;; Commentary: -;; - -;;; Code: - -(require 'company) -(require 'cl-lib) - -(defvar company--capf-cache nil) - -(defun company--capf-data () - (let ((cache company--capf-cache)) - (if (and (equal (current-buffer) (car cache)) - (equal (point) (car (setq cache (cdr cache)))) - (equal (buffer-chars-modified-tick) (car (setq cache (cdr cache))))) - (cadr cache) - (let ((data (company--capf-data-real))) - (setq company--capf-cache - (list (current-buffer) (point) (buffer-chars-modified-tick) data)) - data)))) - -(defun company--capf-data-real () - (cl-letf* (((default-value 'completion-at-point-functions) - ;; Ignore tags-completion-at-point-function because it subverts - ;; company-etags in the default value of company-backends, where - ;; the latter comes later. - (remove 'tags-completion-at-point-function - (default-value 'completion-at-point-functions))) - (completion-at-point-functions (company--capf-workaround)) - (data (run-hook-wrapped 'completion-at-point-functions - ;; Ignore misbehaving functions. - #'completion--capf-wrapper 'optimist))) - (when (and (consp (cdr data)) (integer-or-marker-p (nth 1 data))) data))) - -(declare-function python-shell-get-process "python") - -(defun company--capf-workaround () - ;; For http://debbugs.gnu.org/cgi/bugreport.cgi?bug=18067 - (if (or (not (listp completion-at-point-functions)) - (not (memq 'python-completion-complete-at-point completion-at-point-functions)) - (python-shell-get-process)) - completion-at-point-functions - (remq 'python-completion-complete-at-point completion-at-point-functions))) - -(defun company-capf (command &optional arg &rest _args) - "`company-mode' backend using `completion-at-point-functions'." - (interactive (list 'interactive)) - (pcase command - (`interactive (company-begin-backend 'company-capf)) - (`prefix - (let ((res (company--capf-data))) - (when res - (let ((length (plist-get (nthcdr 4 res) :company-prefix-length)) - (prefix (buffer-substring-no-properties (nth 1 res) (point)))) - (cond - ((> (nth 2 res) (point)) 'stop) - (length (cons prefix length)) - (t prefix)))))) - (`candidates - (let ((res (company--capf-data))) - (when res - (let* ((table (nth 3 res)) - (pred (plist-get (nthcdr 4 res) :predicate)) - (meta (completion-metadata - (buffer-substring (nth 1 res) (nth 2 res)) - table pred)) - (sortfun (cdr (assq 'display-sort-function meta))) - (candidates (completion-all-completions arg table pred (length arg))) - (last (last candidates)) - (base-size (and (numberp (cdr last)) (cdr last)))) - (when base-size - (setcdr last nil)) - (when sortfun - (setq candidates (funcall sortfun candidates))) - (if (not (zerop (or base-size 0))) - (let ((before (substring arg 0 base-size))) - (mapcar (lambda (candidate) - (concat before candidate)) - candidates)) - candidates))))) - (`sorted - (let ((res (company--capf-data))) - (when res - (let ((meta (completion-metadata - (buffer-substring (nth 1 res) (nth 2 res)) - (nth 3 res) (plist-get (nthcdr 4 res) :predicate)))) - (cdr (assq 'display-sort-function meta)))))) - (`match - ;; Can't just use 0 when base-size (see above) is non-zero. - (let ((start (if (get-text-property 0 'face arg) - 0 - (next-single-property-change 0 'face arg)))) - (when start - ;; completions-common-part comes first, but we can't just look for this - ;; value because it can be in a list. - (or - (let ((value (get-text-property start 'face arg))) - (text-property-not-all start (length arg) - 'face value arg)) - (length arg))))) - (`duplicates t) - (`no-cache t) ;Not much can be done here, as long as we handle - ;non-prefix matches. - (`meta - (let ((f (plist-get (nthcdr 4 (company--capf-data)) :company-docsig))) - (when f (funcall f arg)))) - (`doc-buffer - (let ((f (plist-get (nthcdr 4 (company--capf-data)) :company-doc-buffer))) - (when f (funcall f arg)))) - (`location - (let ((f (plist-get (nthcdr 4 (company--capf-data)) :company-location))) - (when f (funcall f arg)))) - (`annotation - (save-excursion - ;; FIXME: `company-begin' sets `company-point' after calling - ;; `company--begin-new'. We shouldn't rely on `company-point' here, - ;; better to cache the capf-data value instead. However: we can't just - ;; save the last capf-data value in `prefix', because that command can - ;; get called more often than `candidates', and at any point in the - ;; buffer (https://github.com/company-mode/company-mode/issues/153). - ;; We could try propertizing the returned prefix string, but it's not - ;; passed to `annotation', and `company-prefix' is set only after - ;; `company--strip-duplicates' is called. - (when company-point - (goto-char company-point)) - (let ((f (plist-get (nthcdr 4 (company--capf-data)) :annotation-function))) - (when f (funcall f arg))))) - (`require-match - (plist-get (nthcdr 4 (company--capf-data)) :company-require-match)) - (`init nil) ;Don't bother: plenty of other ways to initialize the code. - (`post-completion - (let* ((res (company--capf-data)) - (exit-function (plist-get (nthcdr 4 res) :exit-function)) - (table (nth 3 res)) - (pred (plist-get (nthcdr 4 res) :predicate))) - (if exit-function - ;; Follow the example of `completion--done'. - (funcall exit-function arg - (if (eq (try-completion arg table pred) t) - 'finished 'sole))))) - )) - -(provide 'company-capf) - -;;; company-capf.el ends here diff --git a/elpa/company-20160829.1206/company-clang.el b/elpa/company-20160829.1206/company-clang.el deleted file mode 100644 index 54d4b9b..0000000 --- a/elpa/company-20160829.1206/company-clang.el +++ /dev/null @@ -1,331 +0,0 @@ -;;; company-clang.el --- company-mode completion backend for Clang -*- lexical-binding: t -*- - -;; Copyright (C) 2009, 2011, 2013-2016 Free Software Foundation, Inc. - -;; Author: Nikolaj Schumacher - -;; This file is part of GNU Emacs. - -;; GNU Emacs 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 3 of the License, or -;; (at your option) any later version. - -;; GNU Emacs 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 GNU Emacs. If not, see . - - -;;; Commentary: -;; - -;;; Code: - -(require 'company) -(require 'company-template) -(require 'cl-lib) - -(defgroup company-clang nil - "Completion backend for Clang." - :group 'company) - -(defcustom company-clang-executable - (executable-find "clang") - "Location of clang executable." - :type 'file) - -(defcustom company-clang-begin-after-member-access t - "When non-nil, automatic completion will start whenever the current -symbol is preceded by \".\", \"->\" or \"::\", ignoring -`company-minimum-prefix-length'. - -If `company-begin-commands' is a list, it should include `c-electric-lt-gt' -and `c-electric-colon', for automatic completion right after \">\" and -\":\".") - -(defcustom company-clang-arguments nil - "Additional arguments to pass to clang when completing. -Prefix files (-include ...) can be selected with `company-clang-set-prefix' -or automatically through a custom `company-clang-prefix-guesser'." - :type '(repeat (string :tag "Argument"))) - -(defcustom company-clang-prefix-guesser 'company-clang-guess-prefix - "A function to determine the prefix file for the current buffer." - :type '(function :tag "Guesser function" nil)) - -(defvar company-clang-modes '(c-mode c++-mode objc-mode) - "Major modes which clang may complete.") - -(defcustom company-clang-insert-arguments t - "When non-nil, insert function arguments as a template after completion." - :type 'boolean - :package-version '(company . "0.8.0")) - -;; prefix ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -(defvar company-clang--prefix nil) - -(defsubst company-clang--guess-pch-file (file) - (let ((dir (directory-file-name (file-name-directory file)))) - (when (equal (file-name-nondirectory dir) "Classes") - (setq dir (file-name-directory dir))) - (car (directory-files dir t "\\([^.]h\\|[^h]\\).pch\\'" t)))) - -(defsubst company-clang--file-substring (file beg end) - (with-temp-buffer - (insert-file-contents-literally file nil beg end) - (buffer-string))) - -(defun company-clang-guess-prefix () - "Try to guess the prefix file for the current buffer." - ;; Prefixes seem to be called .pch. Pre-compiled headers do, too. - ;; So we look at the magic number to rule them out. - (let* ((file (company-clang--guess-pch-file buffer-file-name)) - (magic-number (and file (company-clang--file-substring file 0 4)))) - (unless (member magic-number '("CPCH" "gpch")) - file))) - -(defun company-clang-set-prefix (&optional prefix) - "Use PREFIX as a prefix (-include ...) file for clang completion." - (interactive (let ((def (funcall company-clang-prefix-guesser))) - (unless (stringp def) - (setq def default-directory)) - (list (read-file-name "Prefix file: " - (when def (file-name-directory def)) - def t (when def (file-name-nondirectory def)))))) - ;; TODO: pre-compile? - (setq company-clang--prefix (and (stringp prefix) - (file-regular-p prefix) - prefix))) - -;; Clean-up on exit. -(add-hook 'kill-emacs-hook 'company-clang-set-prefix) - -;; parsing ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -;; TODO: Handle Pattern (syntactic hints would be neat). -;; Do we ever see OVERLOAD (or OVERRIDE)? -(defconst company-clang--completion-pattern - "^COMPLETION: \\_<\\(%s[a-zA-Z0-9_:]*\\)\\(?: : \\(.*\\)$\\)?$") - -(defconst company-clang--error-buffer-name "*clang-error*") - -(defun company-clang--lang-option () - (if (eq major-mode 'objc-mode) - (if (string= "m" (file-name-extension buffer-file-name)) - "objective-c" "objective-c++") - (substring (symbol-name major-mode) 0 -5))) - -(defun company-clang--parse-output (prefix _objc) - (goto-char (point-min)) - (let ((pattern (format company-clang--completion-pattern - (regexp-quote prefix))) - (case-fold-search nil) - lines match) - (while (re-search-forward pattern nil t) - (setq match (match-string-no-properties 1)) - (unless (equal match "Pattern") - (save-match-data - (when (string-match ":" match) - (setq match (substring match 0 (match-beginning 0))))) - (let ((meta (match-string-no-properties 2))) - (when (and meta (not (string= match meta))) - (put-text-property 0 1 'meta - (company-clang--strip-formatting meta) - match))) - (push match lines))) - lines)) - -(defun company-clang--meta (candidate) - (get-text-property 0 'meta candidate)) - -(defun company-clang--annotation (candidate) - (let ((ann (company-clang--annotation-1 candidate))) - (if (not (and ann (string-prefix-p "(*)" ann))) - ann - (with-temp-buffer - (insert ann) - (search-backward ")") - (let ((pt (1+ (point)))) - (re-search-forward ".\\_>" nil t) - (delete-region pt (point))) - (buffer-string))))) - -(defun company-clang--annotation-1 (candidate) - (let ((meta (company-clang--meta candidate))) - (cond - ((null meta) nil) - ((string-match "[^:]:[^:]" meta) - (substring meta (1+ (match-beginning 0)))) - ((string-match "\\((.*)[ a-z]*\\'\\)" meta) - (let ((paren (match-beginning 1))) - (if (not (eq (aref meta (1- paren)) ?>)) - (match-string 1 meta) - (with-temp-buffer - (insert meta) - (goto-char paren) - (substring meta (1- (search-backward "<")))))))))) - -(defun company-clang--strip-formatting (text) - (replace-regexp-in-string - "#]" " " - (replace-regexp-in-string "[<{[]#\\|#[>}]" "" text t) - t)) - -(defun company-clang--handle-error (res args) - (goto-char (point-min)) - (let* ((buf (get-buffer-create company-clang--error-buffer-name)) - (cmd (concat company-clang-executable " " (mapconcat 'identity args " "))) - (pattern (format company-clang--completion-pattern "")) - (err (if (re-search-forward pattern nil t) - (buffer-substring-no-properties (point-min) - (1- (match-beginning 0))) - ;; Warn the user more aggressively if no match was found. - (message "clang failed with error %d:\n%s" res cmd) - (buffer-string)))) - - (with-current-buffer buf - (let ((inhibit-read-only t)) - (erase-buffer) - (insert (current-time-string) - (format "\nclang failed with error %d:\n" res) - cmd "\n\n") - (insert err) - (setq buffer-read-only t) - (goto-char (point-min)))))) - -(defun company-clang--start-process (prefix callback &rest args) - (let ((objc (derived-mode-p 'objc-mode)) - (buf (get-buffer-create "*clang-output*")) - ;; Looks unnecessary in Emacs 25.1 and later. - (process-adaptive-read-buffering nil)) - (if (get-buffer-process buf) - (funcall callback nil) - (with-current-buffer buf - (erase-buffer) - (setq buffer-undo-list t)) - (let ((process (apply #'start-process "company-clang" buf - company-clang-executable args))) - (set-process-sentinel - process - (lambda (proc status) - (unless (string-match-p "hangup" status) - (funcall - callback - (let ((res (process-exit-status proc))) - (with-current-buffer buf - (unless (eq 0 res) - (company-clang--handle-error res args)) - ;; Still try to get any useful input. - (company-clang--parse-output prefix objc))))))) - (unless (company-clang--auto-save-p) - (send-region process (point-min) (point-max)) - (send-string process "\n") - (process-send-eof process)))))) - -(defsubst company-clang--build-location (pos) - (save-excursion - (goto-char pos) - (format "%s:%d:%d" - (if (company-clang--auto-save-p) buffer-file-name "-") - (line-number-at-pos) - (1+ (length - (encode-coding-region - (line-beginning-position) - (point) - 'utf-8 - t)))))) - -(defsubst company-clang--build-complete-args (pos) - (append '("-fsyntax-only" "-Xclang" "-code-completion-macros") - (unless (company-clang--auto-save-p) - (list "-x" (company-clang--lang-option))) - company-clang-arguments - (when (stringp company-clang--prefix) - (list "-include" (expand-file-name company-clang--prefix))) - (list "-Xclang" (format "-code-completion-at=%s" - (company-clang--build-location pos))) - (list (if (company-clang--auto-save-p) buffer-file-name "-")))) - -(defun company-clang--candidates (prefix callback) - (and (company-clang--auto-save-p) - (buffer-modified-p) - (basic-save-buffer)) - (when (null company-clang--prefix) - (company-clang-set-prefix (or (funcall company-clang-prefix-guesser) - 'none))) - (apply 'company-clang--start-process - prefix - callback - (company-clang--build-complete-args (- (point) (length prefix))))) - -(defun company-clang--prefix () - (if company-clang-begin-after-member-access - (company-grab-symbol-cons "\\.\\|->\\|::" 2) - (company-grab-symbol))) - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -(defconst company-clang-required-version 1.1) - -(defvar company-clang--version nil) - -(defun company-clang--auto-save-p () - (< company-clang--version 2.9)) - -(defsubst company-clang-version () - "Return the version of `company-clang-executable'." - (with-temp-buffer - (call-process company-clang-executable nil t nil "--version") - (goto-char (point-min)) - (if (re-search-forward "clang\\(?: version \\|-\\)\\([0-9.]+\\)" nil t) - (let ((ver (string-to-number (match-string-no-properties 1)))) - (if (> ver 100) - (/ ver 100) - ver)) - 0))) - -(defun company-clang (command &optional arg &rest ignored) - "`company-mode' completion backend for Clang. -Clang is a parser for C and ObjC. Clang version 1.1 or newer is required. - -Additional command line arguments can be specified in -`company-clang-arguments'. Prefix files (-include ...) can be selected -with `company-clang-set-prefix' or automatically through a custom -`company-clang-prefix-guesser'. - -With Clang versions before 2.9, we have to save the buffer before -performing completion. With Clang 2.9 and later, buffer contents are -passed via standard input." - (interactive (list 'interactive)) - (cl-case command - (interactive (company-begin-backend 'company-clang)) - (init (when (memq major-mode company-clang-modes) - (unless company-clang-executable - (error "Company found no clang executable")) - (setq company-clang--version (company-clang-version)) - (when (< company-clang--version company-clang-required-version) - (error "Company requires clang version 1.1")))) - (prefix (and (memq major-mode company-clang-modes) - buffer-file-name - company-clang-executable - (not (company-in-string-or-comment)) - (or (company-clang--prefix) 'stop))) - (candidates (cons :async - (lambda (cb) (company-clang--candidates arg cb)))) - (meta (company-clang--meta arg)) - (annotation (company-clang--annotation arg)) - (post-completion (let ((anno (company-clang--annotation arg))) - (when (and company-clang-insert-arguments anno) - (insert anno) - (if (string-match "\\`:[^:]" anno) - (company-template-objc-templatify anno) - (company-template-c-like-templatify - (concat arg anno)))))))) - -(provide 'company-clang) -;;; company-clang.el ends here diff --git a/elpa/company-20160829.1206/company-cmake.el b/elpa/company-20160829.1206/company-cmake.el deleted file mode 100644 index 010df32..0000000 --- a/elpa/company-20160829.1206/company-cmake.el +++ /dev/null @@ -1,198 +0,0 @@ -;;; company-cmake.el --- company-mode completion backend for CMake - -;; Copyright (C) 2013-2014 Free Software Foundation, Inc. - -;; Author: Chen Bin -;; Version: 0.2 - -;; 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 3 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 . - -;;; Commentary: -;; -;; company-cmake offers completions for module names, variable names and -;; commands used by CMake. And their descriptions. - -;;; Code: - -(require 'company) -(require 'cl-lib) - -(defgroup company-cmake nil - "Completion backend for CMake." - :group 'company) - -(defcustom company-cmake-executable - (executable-find "cmake") - "Location of cmake executable." - :type 'file) - -(defvar company-cmake-executable-arguments - '("--help-command-list" - "--help-module-list" - "--help-variable-list") - "The arguments we pass to cmake, separately. -They affect which types of symbols we get completion candidates for.") - -(defvar company-cmake--completion-pattern - "^\\(%s[a-zA-Z0-9_<>]%s\\)$" - "Regexp to match the candidates.") - -(defvar company-cmake-modes '(cmake-mode) - "Major modes in which cmake may complete.") - -(defvar company-cmake--candidates-cache nil - "Cache for the raw candidates.") - -(defvar company-cmake--meta-command-cache nil - "Cache for command arguments to retrieve descriptions for the candidates.") - -(defun company-cmake--replace-tags (rlt) - (setq rlt (replace-regexp-in-string - "\\(.*?\\(IS_GNU\\)?\\)\\(.*\\)" - (lambda (_match) - (mapconcat 'identity - (if (match-beginning 2) - '("\\1CXX\\3" "\\1C\\3" "\\1G77\\3") - '("\\1CXX\\3" "\\1C\\3" "\\1Fortran\\3")) - "\n")) - rlt t)) - (setq rlt (replace-regexp-in-string - "\\(.*\\)\\(.*\\)" - (mapconcat 'identity '("\\1DEBUG\\2" "\\1RELEASE\\2" - "\\1RELWITHDEBINFO\\2" "\\1MINSIZEREL\\2") - "\n") - rlt)) - rlt) - -(defun company-cmake--fill-candidates-cache (arg) - "Fill candidates cache if needed." - (let (rlt) - (unless company-cmake--candidates-cache - (setq company-cmake--candidates-cache (make-hash-table :test 'equal))) - - ;; If hash is empty, fill it. - (unless (gethash arg company-cmake--candidates-cache) - (with-temp-buffer - (let ((res (call-process company-cmake-executable nil t nil arg))) - (unless (zerop res) - (message "cmake executable exited with error=%d" res))) - (setq rlt (buffer-string))) - (setq rlt (company-cmake--replace-tags rlt)) - (puthash arg rlt company-cmake--candidates-cache)) - )) - -(defun company-cmake--parse (prefix content cmd) - (let ((start 0) - (pattern (format company-cmake--completion-pattern - (regexp-quote prefix) - (if (zerop (length prefix)) "+" "*"))) - (lines (split-string content "\n")) - match - rlt) - (dolist (line lines) - (when (string-match pattern line) - (let ((match (match-string 1 line))) - (when match - (puthash match cmd company-cmake--meta-command-cache) - (push match rlt))))) - rlt)) - -(defun company-cmake--candidates (prefix) - (let (results - cmd-opts - str) - - (unless company-cmake--meta-command-cache - (setq company-cmake--meta-command-cache (make-hash-table :test 'equal))) - - (dolist (arg company-cmake-executable-arguments) - (company-cmake--fill-candidates-cache arg) - (setq cmd-opts (replace-regexp-in-string "-list$" "" arg) ) - - (setq str (gethash arg company-cmake--candidates-cache)) - (when str - (setq results (nconc results - (company-cmake--parse prefix str cmd-opts))))) - results)) - -(defun company-cmake--unexpand-candidate (candidate) - (cond - ((string-match "^CMAKE_\\(C\\|CXX\\|Fortran\\)\\(_.*\\)$" candidate) - (setq candidate (concat "CMAKE_" (match-string 2 candidate)))) - - ;; C flags - ((string-match "^\\(.*_\\)IS_GNU\\(C\\|CXX\\|G77\\)$" candidate) - (setq candidate (concat (match-string 1 candidate) "IS_GNU"))) - - ;; C flags - ((string-match "^\\(.*_\\)OVERRIDE_\\(C\\|CXX\\|Fortran\\)$" candidate) - (setq candidate (concat (match-string 1 candidate) "OVERRIDE_"))) - - ((string-match "^\\(.*\\)\\(_DEBUG\\|_RELEASE\\|_RELWITHDEBINFO\\|_MINSIZEREL\\)\\(.*\\)$" candidate) - (setq candidate (concat (match-string 1 candidate) - "_" - (match-string 3 candidate))))) - candidate) - -(defun company-cmake--meta (candidate) - (let ((cmd-opts (gethash candidate company-cmake--meta-command-cache)) - result) - (setq candidate (company-cmake--unexpand-candidate candidate)) - - ;; Don't cache the documentation of every candidate (command) - ;; Cache in this case will cost too much memory. - (with-temp-buffer - (call-process company-cmake-executable nil t nil cmd-opts candidate) - ;; Go to the third line, trim it and return the result. - ;; Tested with cmake 2.8.9. - (goto-char (point-min)) - (forward-line 2) - (setq result (buffer-substring-no-properties (line-beginning-position) - (line-end-position))) - (setq result (replace-regexp-in-string "^[ \t\n\r]+" "" result)) - result))) - -(defun company-cmake--doc-buffer (candidate) - (let ((cmd-opts (gethash candidate company-cmake--meta-command-cache))) - - (setq candidate (company-cmake--unexpand-candidate candidate)) - (with-temp-buffer - (call-process company-cmake-executable nil t nil cmd-opts candidate) - ;; Go to the third line, trim it and return the doc buffer. - ;; Tested with cmake 2.8.9. - (goto-char (point-min)) - (forward-line 2) - (company-doc-buffer - (buffer-substring-no-properties (line-beginning-position) - (point-max)))))) - -(defun company-cmake (command &optional arg &rest ignored) - "`company-mode' completion backend for CMake. -CMake is a cross-platform, open-source make system." - (interactive (list 'interactive)) - (cl-case command - (interactive (company-begin-backend 'company-cmake)) - (init (when (memq major-mode company-cmake-modes) - (unless company-cmake-executable - (error "Company found no cmake executable")))) - (prefix (and (memq major-mode company-cmake-modes) - (not (company-in-string-or-comment)) - (company-grab-symbol))) - (candidates (company-cmake--candidates arg)) - (meta (company-cmake--meta arg)) - (doc-buffer (company-cmake--doc-buffer arg)) - )) - -(provide 'company-cmake) -;;; company-cmake.el ends here diff --git a/elpa/company-20160829.1206/company-css.el b/elpa/company-20160829.1206/company-css.el deleted file mode 100644 index cf8c683..0000000 --- a/elpa/company-20160829.1206/company-css.el +++ /dev/null @@ -1,442 +0,0 @@ -;;; company-css.el --- company-mode completion backend for css-mode -*- lexical-binding: t -*- - -;; Copyright (C) 2009, 2011, 2014 Free Software Foundation, Inc. - -;; Author: Nikolaj Schumacher - -;; This file is part of GNU Emacs. - -;; GNU Emacs 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 3 of the License, or -;; (at your option) any later version. - -;; GNU Emacs 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 GNU Emacs. If not, see . - -;;; Commentary: - -;;; Code: - -(require 'company) -(require 'cl-lib) - -(declare-function web-mode-language-at-pos "web-mode" (&optional pos)) - -(defconst company-css-property-alist - ;; see http://www.w3.org/TR/CSS21/propidx.html - '(("azimuth" angle "left-side" "far-left" "left" "center-left" "center" - "center-right" "right" "far-right" "right-side" "behind" "leftwards" - "rightwards") - ("background" background-color background-image background-repeat - background-attachment background-position - background-clip background-origin background-size) - ("background-attachment" "scroll" "fixed") - ("background-color" color "transparent") - ("background-image" uri "none") - ("background-position" percentage length "left" "center" "right" percentage - length "top" "center" "bottom" "left" "center" "right" "top" "center" - "bottom") - ("background-repeat" "repeat" "repeat-x" "repeat-y" "no-repeat") - ("border" border-width border-style border-color) - ("border-bottom" border) - ("border-bottom-color" border-color) - ("border-bottom-style" border-style) - ("border-bottom-width" border-width) - ("border-collapse" "collapse" "separate") - ("border-color" color "transparent") - ("border-left" border) - ("border-left-color" border-color) - ("border-left-style" border-style) - ("border-left-width" border-width) - ("border-right" border) - ("border-right-color" border-color) - ("border-right-style" border-style) - ("border-right-width" border-width) - ("border-spacing" length length) - ("border-style" border-style) - ("border-top" border) - ("border-top-color" border-color) - ("border-top-style" border-style) - ("border-top-width" border-width) - ("border-width" border-width) - ("bottom" length percentage "auto") - ("caption-side" "top" "bottom") - ("clear" "none" "left" "right" "both") - ("clip" shape "auto") - ("color" color) - ("content" "normal" "none" string uri counter "attr()" "open-quote" - "close-quote" "no-open-quote" "no-close-quote") - ("counter-increment" identifier integer "none") - ("counter-reset" identifier integer "none") - ("cue" cue-before cue-after) - ("cue-after" uri "none") - ("cue-before" uri "none") - ("cursor" uri "*" "auto" "crosshair" "default" "pointer" "move" "e-resize" - "ne-resize" "nw-resize" "n-resize" "se-resize" "sw-resize" "s-resize" - "w-resize" "text" "wait" "help" "progress") - ("direction" "ltr" "rtl") - ("display" "inline" "block" "list-item" "run-in" "inline-block" "table" - "inline-table" "table-row-group" "table-header-group" "table-footer-group" - "table-row" "table-column-group" "table-column" "table-cell" - "table-caption" "none") - ("elevation" angle "below" "level" "above" "higher" "lower") - ("empty-cells" "show" "hide") - ("float" "left" "right" "none") - ("font" font-style font-weight font-size "/" line-height - font-family "caption" "icon" "menu" "message-box" "small-caption" - "status-bar" "normal" "small-caps" - ;; CSS3 - font-stretch) - ("font-family" family-name generic-family) - ("font-size" absolute-size relative-size length percentage) - ("font-style" "normal" "italic" "oblique") - ("font-weight" "normal" "bold" "bolder" "lighter" "100" "200" "300" "400" - "500" "600" "700" "800" "900") - ("height" length percentage "auto") - ("left" length percentage "auto") - ("letter-spacing" "normal" length) - ("line-height" "normal" number length percentage) - ("list-style" list-style-type list-style-position list-style-image) - ("list-style-image" uri "none") - ("list-style-position" "inside" "outside") - ("list-style-type" "disc" "circle" "square" "decimal" "decimal-leading-zero" - "lower-roman" "upper-roman" "lower-greek" "lower-latin" "upper-latin" - "armenian" "georgian" "lower-alpha" "upper-alpha" "none") - ("margin" margin-width) - ("margin-bottom" margin-width) - ("margin-left" margin-width) - ("margin-right" margin-width) - ("margin-top" margin-width) - ("max-height" length percentage "none") - ("max-width" length percentage "none") - ("min-height" length percentage) - ("min-width" length percentage) - ("orphans" integer) - ("outline" outline-color outline-style outline-width) - ("outline-color" color "invert") - ("outline-style" border-style) - ("outline-width" border-width) - ("overflow" "visible" "hidden" "scroll" "auto" - ;; CSS3: - "no-display" "no-content") - ("padding" padding-width) - ("padding-bottom" padding-width) - ("padding-left" padding-width) - ("padding-right" padding-width) - ("padding-top" padding-width) - ("page-break-after" "auto" "always" "avoid" "left" "right") - ("page-break-before" "auto" "always" "avoid" "left" "right") - ("page-break-inside" "avoid" "auto") - ("pause" time percentage) - ("pause-after" time percentage) - ("pause-before" time percentage) - ("pitch" frequency "x-low" "low" "medium" "high" "x-high") - ("pitch-range" number) - ("play-during" uri "mix" "repeat" "auto" "none") - ("position" "static" "relative" "absolute" "fixed") - ("quotes" string string "none") - ("richness" number) - ("right" length percentage "auto") - ("speak" "normal" "none" "spell-out") - ("speak-header" "once" "always") - ("speak-numeral" "digits" "continuous") - ("speak-punctuation" "code" "none") - ("speech-rate" number "x-slow" "slow" "medium" "fast" "x-fast" "faster" - "slower") - ("stress" number) - ("table-layout" "auto" "fixed") - ("text-align" "left" "right" "center" "justify") - ("text-indent" length percentage) - ("text-transform" "capitalize" "uppercase" "lowercase" "none") - ("top" length percentage "auto") - ("unicode-bidi" "normal" "embed" "bidi-override") - ("vertical-align" "baseline" "sub" "super" "top" "text-top" "middle" - "bottom" "text-bottom" percentage length) - ("visibility" "visible" "hidden" "collapse") - ("voice-family" specific-voice generic-voice "*" specific-voice - generic-voice) - ("volume" number percentage "silent" "x-soft" "soft" "medium" "loud" - "x-loud") - ("white-space" "normal" "pre" "nowrap" "pre-wrap" "pre-line") - ("widows" integer) - ("width" length percentage "auto") - ("word-spacing" "normal" length) - ("z-index" "auto" integer) - ;; CSS3 - ("align-content" align-stretch "space-between" "space-around") - ("align-items" align-stretch "baseline") - ("align-self" align-items "auto") - ("animation" animation-name animation-duration animation-timing-function - animation-delay animation-iteration-count animation-direction - animation-fill-mode) - ("animation-delay" time) - ("animation-direction" "normal" "reverse" "alternate" "alternate-reverse") - ("animation-duration" time) - ("animation-fill-mode" "none" "forwards" "backwards" "both") - ("animation-iteration-count" integer "infinite") - ("animation-name" "none") - ("animation-play-state" "paused" "running") - ("animation-timing-function" transition-timing-function - "step-start" "step-end" "steps(,)") - ("backface-visibility" "visible" "hidden") - ("background-clip" background-origin) - ("background-origin" "border-box" "padding-box" "content-box") - ("background-size" length percentage "auto" "cover" "contain") - ("border-image" border-image-outset border-image-repeat border-image-source - border-image-slice border-image-width) - ("border-image-outset" length) - ("border-image-repeat" "stretch" "repeat" "round" "space") - ("border-image-source" uri "none") - ("border-image-slice" length) - ("border-image-width" length percentage) - ("border-radius" length) - ("border-top-left-radius" length) - ("border-top-right-radius" length) - ("border-bottom-left-radius" length) - ("border-bottom-right-radius" length) - ("box-decoration-break" "slice" "clone") - ("box-shadow" length color) - ("box-sizing" "content-box" "border-box") - ("break-after" "auto" "always" "avoid" "left" "right" "page" "column" - "avoid-page" "avoid-column") - ("break-before" break-after) - ("break-inside" "avoid" "auto") - ("columns" column-width column-count) - ("column-count" integer) - ("column-fill" "auto" "balance") - ("column-gap" length "normal") - ("column-rule" column-rule-width column-rule-style column-rule-color) - ("column-rule-color" color) - ("column-rule-style" border-style) - ("column-rule-width" border-width) - ("column-span" "all" "none") - ("column-width" length "auto") - ("filter" url "blur()" "brightness()" "contrast()" "drop-shadow()" - "grayscale()" "hue-rotate()" "invert()" "opacity()" "saturate()" "sepia()") - ("flex" flex-grow flex-shrink flex-basis) - ("flex-basis" percentage length "auto") - ("flex-direction" "row" "row-reverse" "column" "column-reverse") - ("flex-flow" flex-direction flex-wrap) - ("flex-grow" number) - ("flex-shrink" number) - ("flex-wrap" "nowrap" "wrap" "wrap-reverse") - ("font-feature-setting" normal string number) - ("font-kerning" "auto" "normal" "none") - ("font-language-override" "normal" string) - ("font-size-adjust" "none" number) - ("font-stretch" "normal" "ultra-condensed" "extra-condensed" "condensed" - "semi-condensed" "semi-expanded" "expanded" "extra-expanded" "ultra-expanded") - ("font-synthesis" "none" "weight" "style") - ("font-variant" font-variant-alternates font-variant-caps - font-variant-east-asian font-variant-ligatures font-variant-numeric - font-variant-position) - ("font-variant-alternates" "normal" "historical-forms" "stylistic()" - "styleset()" "character-variant()" "swash()" "ornaments()" "annotation()") - ("font-variant-caps" "normal" "small-caps" "all-small-caps" "petite-caps" - "all-petite-caps" "unicase" "titling-caps") - ("font-variant-east-asian" "jis78" "jis83" "jis90" "jis04" "simplified" - "traditional" "full-width" "proportional-width" "ruby") - ("font-variant-ligatures" "normal" "none" "common-ligatures" - "no-common-ligatures" "discretionary-ligatures" "no-discretionary-ligatures" - "historical-ligatures" "no-historical-ligatures" "contextual" "no-contextual") - ("font-variant-numeric" "normal" "ordinal" "slashed-zero" - "lining-nums" "oldstyle-nums" "proportional-nums" "tabular-nums" - "diagonal-fractions" "stacked-fractions") - ("font-variant-position" "normal" "sub" "super") - ("hyphens" "none" "manual" "auto") - ("justify-content" align-common "space-between" "space-around") - ("line-break" "auto" "loose" "normal" "strict") - ("marquee-direction" "forward" "reverse") - ("marquee-play-count" integer "infinite") - ("marquee-speed" "slow" "normal" "fast") - ("marquee-style" "scroll" "slide" "alternate") - ("opacity" number) - ("order" number) - ("outline-offset" length) - ("overflow-x" overflow) - ("overflow-y" overflow) - ("overflow-style" "auto" "marquee-line" "marquee-block") - ("overflow-wrap" "normal" "break-word") - ("perspective" "none" length) - ("perspective-origin" percentage length "left" "center" "right" "top" "bottom") - ("resize" "none" "both" "horizontal" "vertical") - ("tab-size" integer length) - ("text-align-last" "auto" "start" "end" "left" "right" "center" "justify") - ("text-decoration" text-decoration-color text-decoration-line text-decoration-style) - ("text-decoration-color" color) - ("text-decoration-line" "none" "underline" "overline" "line-through" "blink") - ("text-decoration-style" "solid" "double" "dotted" "dashed" "wavy") - ("text-overflow" "clip" "ellipsis") - ("text-shadow" color length) - ("text-underline-position" "auto" "under" "left" "right") - ("transform" "matrix(,,,,,)" "translate(,)" "translateX()" "translateY()" - "scale()" "scaleX()" "scaleY()" "rotate()" "skewX()" "skewY()" "none") - ("transform-origin" perspective-origin) - ("transform-style" "flat" "preserve-3d") - ("transition" transition-property transition-duration - transition-timing-function transition-delay) - ("transition-delay" time) - ("transition-duration" time) - ("transition-timing-function" - "ease" "linear" "ease-in" "ease-out" "ease-in-out" "cubic-bezier(,,,)") - ("transition-property" "none" "all" identifier) - ("word-wrap" overflow-wrap) - ("word-break" "normal" "break-all" "keep-all")) - "A list of CSS properties and their possible values.") - -(defconst company-css-value-classes - '((absolute-size "xx-small" "x-small" "small" "medium" "large" "x-large" - "xx-large") - (align-common "flex-start" "flex-end" "center") - (align-stretch align-common "stretch") - (border-style "none" "hidden" "dotted" "dashed" "solid" "double" "groove" - "ridge" "inset" "outset") - (border-width "thick" "medium" "thin") - (color "aqua" "black" "blue" "fuchsia" "gray" "green" "lime" "maroon" "navy" - "olive" "orange" "purple" "red" "silver" "teal" "white" "yellow") - (counter "counter(,)") - (family-name "Courier" "Helvetica" "Times") - (generic-family "serif" "sans-serif" "cursive" "fantasy" "monospace") - (generic-voice "male" "female" "child") - (margin-width "auto") ;; length percentage - (relative-size "larger" "smaller") - (shape "rect(,,,)") - (uri "url()")) - "A list of CSS property value classes and their contents.") -;; missing, because not completable -;; -;;