Update packages

This commit is contained in:
Gergely Polonkai 2016-10-05 13:56:57 +02:00
parent 5e3e01390e
commit 5598dd3102
66 changed files with 265 additions and 166 deletions

View File

@ -1 +0,0 @@
(define-package "clojure-mode" "20160803.140" "Major mode for Clojure code" '((emacs "24.3")) :url "http://github.com/clojure-emacs/clojure-mode" :keywords '("languages" "clojure" "clojurescript" "lisp"))

View File

@ -1,10 +1,10 @@
;;; clojure-mode-autoloads.el --- automatically extracted autoloads
;;
;;; Code:
(add-to-list 'load-path (or (file-name-directory #$) (car load-path)))
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "clojure-mode" "clojure-mode.el" (22500 1824
;;;;;; 812229 917000))
;;;### (autoloads nil "clojure-mode" "clojure-mode.el" (22516 57909
;;;;;; 485546 83000))
;;; Generated autoloads from clojure-mode.el
(autoload 'clojure-mode "clojure-mode" "\
@ -111,11 +111,6 @@ Major mode for editing ClojureX code.
(add-to-list 'auto-mode-alist '("\\(?:build\\|profile\\)\\.boot\\'" . clojure-mode))
;;;***
;;;### (autoloads nil nil ("clojure-mode-pkg.el") (22500 1824 819441
;;;;;; 379000))
;;;***
;; Local Variables:

View File

@ -0,0 +1,2 @@
;;; -*- no-byte-compile: t -*-
(define-package "clojure-mode" "20161004.2314" "Major mode for Clojure code" '((emacs "24.3")) :url "http://github.com/clojure-emacs/clojure-mode" :keywords '("languages" "clojure" "clojurescript" "lisp"))

View File

@ -9,9 +9,9 @@
;; Bozhidar Batsov <bozhidar@batsov.com>
;; Artur Malabarba <bruce.connor.am@gmail.com>
;; URL: http://github.com/clojure-emacs/clojure-mode
;; Package-Version: 20160803.140
;; Package-Version: 20161004.2314
;; Keywords: languages clojure clojurescript lisp
;; Version: 5.5.2
;; Version: 5.6.0-cvs
;; Package-Requires: ((emacs "24.3"))
;; This file is not part of GNU Emacs.
@ -192,38 +192,50 @@ Out-of-the box clojure-mode understands lein, boot and gradle."
(and (listp value)
(cl-every 'stringp value))))
(defcustom clojure-refactor-map-prefix (kbd "C-c C-r")
"Clojure refactor keymap prefix."
:group 'clojure
:type 'string
:package-version '(clojure-mode . "5.6.0"))
(defvar clojure-refactor-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "C-t") #'clojure-thread)
(define-key map (kbd "t") #'clojure-thread)
(define-key map (kbd "C-u") #'clojure-unwind)
(define-key map (kbd "u") #'clojure-unwind)
(define-key map (kbd "C-f") #'clojure-thread-first-all)
(define-key map (kbd "f") #'clojure-thread-first-all)
(define-key map (kbd "C-l") #'clojure-thread-last-all)
(define-key map (kbd "l") #'clojure-thread-last-all)
(define-key map (kbd "C-a") #'clojure-unwind-all)
(define-key map (kbd "a") #'clojure-unwind-all)
(define-key map (kbd "C-p") #'clojure-cycle-privacy)
(define-key map (kbd "p") #'clojure-cycle-privacy)
(define-key map (kbd "C-(") #'clojure-convert-collection-to-list)
(define-key map (kbd "(") #'clojure-convert-collection-to-list)
(define-key map (kbd "C-'") #'clojure-convert-collection-to-quoted-list)
(define-key map (kbd "'") #'clojure-convert-collection-to-quoted-list)
(define-key map (kbd "C-{") #'clojure-convert-collection-to-map)
(define-key map (kbd "{") #'clojure-convert-collection-to-map)
(define-key map (kbd "C-[") #'clojure-convert-collection-to-vector)
(define-key map (kbd "[") #'clojure-convert-collection-to-vector)
(define-key map (kbd "C-#") #'clojure-convert-collection-to-set)
(define-key map (kbd "#") #'clojure-convert-collection-to-set)
(define-key map (kbd "C-i") #'clojure-cycle-if)
(define-key map (kbd "i") #'clojure-cycle-if)
(define-key map (kbd "n i") #'clojure-insert-ns-form)
(define-key map (kbd "n h") #'clojure-insert-ns-form-at-point)
(define-key map (kbd "n u") #'clojure-update-ns)
(define-key map (kbd "n s") #'clojure-sort-ns))
"Keymap for Clojure refactoring commands.")
(fset 'clojure-refactor-map clojure-refactor-map)
(defvar clojure-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "C-:") #'clojure-toggle-keyword-string)
(define-key map (kbd "C-c SPC") #'clojure-align)
(define-key map (kbd "C-c C-r C-t") #'clojure-thread)
(define-key map (kbd "C-c C-r t") #'clojure-thread)
(define-key map (kbd "C-c C-r C-u") #'clojure-unwind)
(define-key map (kbd "C-c C-r u") #'clojure-unwind)
(define-key map (kbd "C-c C-r C-f") #'clojure-thread-first-all)
(define-key map (kbd "C-c C-r f") #'clojure-thread-first-all)
(define-key map (kbd "C-c C-r C-l") #'clojure-thread-last-all)
(define-key map (kbd "C-c C-r l") #'clojure-thread-last-all)
(define-key map (kbd "C-c C-r C-a") #'clojure-unwind-all)
(define-key map (kbd "C-c C-r a") #'clojure-unwind-all)
(define-key map (kbd "C-c C-r C-p") #'clojure-cycle-privacy)
(define-key map (kbd "C-c C-r p") #'clojure-cycle-privacy)
(define-key map (kbd "C-c C-r C-(") #'clojure-convert-collection-to-list)
(define-key map (kbd "C-c C-r (") #'clojure-convert-collection-to-list)
(define-key map (kbd "C-c C-r C-'") #'clojure-convert-collection-to-quoted-list)
(define-key map (kbd "C-c C-r '") #'clojure-convert-collection-to-quoted-list)
(define-key map (kbd "C-c C-r C-{") #'clojure-convert-collection-to-map)
(define-key map (kbd "C-c C-r {") #'clojure-convert-collection-to-map)
(define-key map (kbd "C-c C-r C-[") #'clojure-convert-collection-to-vector)
(define-key map (kbd "C-c C-r [") #'clojure-convert-collection-to-vector)
(define-key map (kbd "C-c C-r C-#") #'clojure-convert-collection-to-set)
(define-key map (kbd "C-c C-r #") #'clojure-convert-collection-to-set)
(define-key map (kbd "C-c C-r C-i") #'clojure-cycle-if)
(define-key map (kbd "C-c C-r i") #'clojure-cycle-if)
(define-key map (kbd "C-c C-r n i") #'clojure-insert-ns-form)
(define-key map (kbd "C-c C-r n h") #'clojure-insert-ns-form-at-point)
(define-key map (kbd "C-c C-r n u") #'clojure-update-ns)
(define-key map (kbd "C-c C-r n s") #'clojure-sort-ns)
(define-key map clojure-refactor-map-prefix 'clojure-refactor-map)
(easy-menu-define clojure-mode-menu map "Clojure Mode Menu"
'("Clojure"
["Toggle between string & keyword" clojure-toggle-keyword-string]
@ -248,7 +260,14 @@ Out-of-the box clojure-mode understands lein, boot and gradle."
"--"
["Unwind once" clojure-unwind]
["Fully unwind a threading macro" clojure-unwind-all])
("Documentation"
["View a Clojure guide" clojure-view-guide]
["View a Clojure reference section" clojure-view-reference-section]
["View the Clojure cheatsheet" clojure-view-cheatsheet]
["View the Clojure Grimoire" clojure-view-grimoire]
["View the Clojure style guide" clojure-view-style-guide])
"--"
["Report a clojure-mode bug" clojure-mode-report-bug]
["Clojure-mode version" clojure-mode-display-version]))
map)
"Keymap for Clojure mode.")
@ -282,6 +301,99 @@ CIDER provides a more complex version which does classpath analysis.")
(interactive)
(message "clojure-mode (version %s)" clojure-mode-version))
(defconst clojure-mode-report-bug-url "https://github.com/clojure-emacs/clojure-mode/issues/new"
"The URL to report a clojure-mode issue.")
(defun clojure-mode-report-bug ()
"Report a bug in your default browser."
(interactive)
(browse-url clojure-mode-report-bug-url))
(defconst clojure-guides-base-url "https://clojure.org/guides/"
"The base URL for official Clojure guides.")
(defconst clojure-guides '(("Getting Started" . "getting_started")
("FAQ" . "faq")
("spec" . "spec")
("Destructuring" . "destructuring")
("Threading Macros" . "threading_macros")
("Comparators" . "comparators")
("Reader Conditionals" . "reader_conditionals"))
"A list of all official Clojure guides.")
(defun clojure-view-guide ()
"Open a Clojure guide in your default browser.
The command will prompt you to select one of the available guides."
(interactive)
(let ((guide (completing-read "Select a guide: " (mapcar #'car clojure-guides))))
(when guide
(let ((guide-url (concat clojure-guides-base-url (cdr (assoc guide clojure-guides)))))
(browse-url guide-url)))))
(defconst clojure-reference-base-url "https://clojure.org/reference/"
"The base URL for the official Clojure reference.")
(defconst clojure-reference-sections '(("The Reader" . "reader")
("The REPL and main" . "repl_and_main")
("Evaluation" . "evaluation")
("Special Forms" . "special_forms")
("Macros" . "macros")
("Other Functions" . "other_functions")
("Data Structures" . "data_structures")
("Datatypes" . "datatypes")
("Sequences" . "sequences")
("Transients" . "transients")
("Transducers" . "transducers")
("Multimethods and Hierarchies" . "multimethods")
("Protocols" . "protocols")
("Metadata" . "metadata")
("Namespaces" . "namespaces")
("Libs" . "libs")
("Vars and Environments" . "vars")
("Refs and Transactions" . "refs")
("Agents" . "agents")
("Atoms" . "atoms")
("Reducers" . "reducers")
("Java Interop" . "java_interop")
("Compilation and Class Generation" . "compilation")
("Other Libraries" . "other_libraries")
("Differences with Lisps" . "lisps")))
(defun clojure-view-reference-section ()
"Open a Clojure reference section in your default browser.
The command will prompt you to select one of the available sections."
(interactive)
(let ((section (completing-read "Select a reference section: " (mapcar #'car clojure-reference-sections))))
(when section
(let ((section-url (concat clojure-reference-base-url (cdr (assoc section clojure-reference-sections)))))
(browse-url section-url)))))
(defconst clojure-cheatsheet-url "http://clojure.org/api/cheatsheet"
"The URL of the official Clojure cheatsheet.")
(defun clojure-view-cheatsheet ()
"Open the Clojure cheatsheet in your default browser."
(interactive)
(browse-url clojure-cheatsheet-url))
(defconst clojure-grimoire-url "https://www.conj.io/"
"The URL of the Grimoire community documentation site.")
(defun clojure-view-grimoire ()
"Open the Clojure Grimoire in your default browser."
(interactive)
(browse-url clojure-grimoire-url))
(defconst clojure-style-guide-url "https://github.com/bbatsov/clojure-style-guide"
"The URL of the Clojure style guide.")
(defun clojure-view-style-guide ()
"Open the Clojure style guide in your default browser."
(interactive)
(browse-url clojure-style-guide-url))
(defun clojure-space-for-delimiter-p (endp delim)
"Prevent paredit from inserting useless spaces.
See `paredit-space-for-delimiter-predicates' for the meaning of

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "flycheck" "flycheck.el" (22514 17685 56751
;;;;;; 684000))
;;;### (autoloads nil "flycheck" "flycheck.el" (22516 57907 641537
;;;;;; 759000))
;;; Generated autoloads from flycheck.el
(autoload 'flycheck-manual "flycheck" "\
@ -228,7 +228,7 @@ Use this together with the `option', `option-list' and
;;;***
;;;### (autoloads nil nil ("flycheck-buttercup.el" "flycheck-ert.el"
;;;;;; "flycheck-pkg.el") (22514 17685 48751 666000))
;;;;;; "flycheck-pkg.el") (22516 57907 637537 741000))
;;;***

View File

@ -1,4 +1,4 @@
(define-package "flycheck" "20160930.944" "On-the-fly syntax checking"
(define-package "flycheck" "20161004.1257" "On-the-fly syntax checking"
'((dash "2.12.1")
(pkg-info "0.4")
(let-alist "1.0.4")

View File

@ -64,7 +64,7 @@
(eval-when-compile
(require 'let-alist) ; `let-alist'
(require 'compile) ; Compile Mode integration
(require 'jka-compr) ; For JKA workarounds in `flycheck-temp-file-system'
(require 'jka-compr) ; To inhibit compression of temp files
(require 'pcase) ; `pcase-dolist' (`pcase' itself is autoloaded)
)
@ -8747,6 +8747,15 @@ See URL `http://call-cc.org/'."
"Warning: " (zero-or-more not-newline) ":\n"
(one-or-more (any space)) "(" (file-name) ":" line ") " (message)
line-end)
(error line-start "Error: (line " line ") " (message) line-end)
(error line-start "Syntax error: (" (file-name) ":" line ")"
(zero-or-more not-newline) " - "
(message (one-or-more not-newline)
(zero-or-more "\n"
(zero-or-more space)
(zero-or-more not-newline))
(one-or-more space) "<--")
line-end)
(error line-start
"Error: " (zero-or-more not-newline) ":\n"
(one-or-more (any space)) "(" (file-name) ":" line ") " (message)

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "helm-adaptive" "helm-adaptive.el" (22514 17679
;;;;;; 860739 765000))
;;;### (autoloads nil "helm-adaptive" "helm-adaptive.el" (22516 57904
;;;;;; 857525 192000))
;;; Generated autoloads from helm-adaptive.el
(defvar helm-adaptive-mode nil "\
@ -30,8 +30,8 @@ Useful when you have a old or corrupted `helm-adaptive-history-file'.
;;;***
;;;### (autoloads nil "helm-apt" "helm-apt.el" (22514 17679 824739
;;;;;; 683000))
;;;### (autoloads nil "helm-apt" "helm-apt.el" (22516 57904 817525
;;;;;; 11000))
;;; Generated autoloads from helm-apt.el
(autoload 'helm-apt "helm-apt" "\
@ -42,8 +42,8 @@ With a prefix arg reload cache.
;;;***
;;;### (autoloads nil "helm-bookmark" "helm-bookmark.el" (22514 17679
;;;;;; 924739 912000))
;;;### (autoloads nil "helm-bookmark" "helm-bookmark.el" (22516 57904
;;;;;; 909525 426000))
;;; Generated autoloads from helm-bookmark.el
(autoload 'helm-bookmarks "helm-bookmark" "\
@ -60,8 +60,8 @@ only if external library addressbook-bookmark.el is available.
;;;***
;;;### (autoloads nil "helm-buffers" "helm-buffers.el" (22514 17679
;;;;;; 816739 664000))
;;;### (autoloads nil "helm-buffers" "helm-buffers.el" (22516 57904
;;;;;; 809524 975000))
;;; Generated autoloads from helm-buffers.el
(autoload 'helm-buffers-list "helm-buffers" "\
@ -76,8 +76,8 @@ Preconfigured `helm' lightweight version (buffer -> recentf).
;;;***
;;;### (autoloads nil "helm-color" "helm-color.el" (22514 17679 908739
;;;;;; 875000))
;;;### (autoloads nil "helm-color" "helm-color.el" (22516 57904 889525
;;;;;; 336000))
;;; Generated autoloads from helm-color.el
(autoload 'helm-colors "helm-color" "\
@ -87,8 +87,8 @@ Preconfigured `helm' for color.
;;;***
;;;### (autoloads nil "helm-command" "helm-command.el" (22514 17679
;;;;;; 768739 554000))
;;;### (autoloads nil "helm-command" "helm-command.el" (22516 57904
;;;;;; 761524 758000))
;;; Generated autoloads from helm-command.el
(autoload 'helm-M-x "helm-command" "\
@ -106,8 +106,8 @@ You can get help on each command by persistent action.
;;;***
;;;### (autoloads nil "helm-config" "helm-config.el" (22514 17679
;;;;;; 916739 894000))
;;;### (autoloads nil "helm-config" "helm-config.el" (22516 57904
;;;;;; 901525 390000))
;;; Generated autoloads from helm-config.el
(autoload 'helm-configuration "helm-config" "\
@ -117,8 +117,8 @@ Customize `helm'.
;;;***
;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22514 17679
;;;;;; 832739 701000))
;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22516 57904
;;;;;; 829525 65000))
;;; Generated autoloads from helm-dabbrev.el
(autoload 'helm-dabbrev "helm-dabbrev" "\
@ -128,8 +128,8 @@ Preconfigured helm for dynamic abbreviations.
;;;***
;;;### (autoloads nil "helm-elisp" "helm-elisp.el" (22514 17679 912739
;;;;;; 884000))
;;;### (autoloads nil "helm-elisp" "helm-elisp.el" (22516 57904 893525
;;;;;; 354000))
;;; Generated autoloads from helm-elisp.el
(autoload 'helm-lisp-completion-at-point "helm-elisp" "\
@ -183,7 +183,7 @@ Preconfigured helm for complex command history.
;;;***
;;;### (autoloads nil "helm-elisp-package" "helm-elisp-package.el"
;;;;;; (22514 17679 776739 573000))
;;;;;; (22516 57904 765524 776000))
;;; Generated autoloads from helm-elisp-package.el
(autoload 'helm-list-elisp-packages "helm-elisp-package" "\
@ -199,8 +199,8 @@ Same as `helm-list-elisp-packages' but don't fetch packages on remote.
;;;***
;;;### (autoloads nil "helm-elscreen" "helm-elscreen.el" (22514 17679
;;;;;; 760739 536000))
;;;### (autoloads nil "helm-elscreen" "helm-elscreen.el" (22516 57904
;;;;;; 753524 722000))
;;; Generated autoloads from helm-elscreen.el
(autoload 'helm-elscreen "helm-elscreen" "\
@ -215,8 +215,8 @@ Preconfigured helm to list elscreen in history order.
;;;***
;;;### (autoloads nil "helm-eshell" "helm-eshell.el" (22514 17679
;;;;;; 792739 610000))
;;;### (autoloads nil "helm-eshell" "helm-eshell.el" (22516 57904
;;;;;; 789524 885000))
;;; Generated autoloads from helm-eshell.el
(autoload 'helm-esh-pcomplete "helm-eshell" "\
@ -231,8 +231,8 @@ Preconfigured helm for eshell history.
;;;***
;;;### (autoloads nil "helm-eval" "helm-eval.el" (22514 17679 864739
;;;;;; 775000))
;;;### (autoloads nil "helm-eval" "helm-eval.el" (22516 57904 861525
;;;;;; 209000))
;;; Generated autoloads from helm-eval.el
(autoload 'helm-eval-expression "helm-eval" "\
@ -252,8 +252,8 @@ Preconfigured helm for `helm-source-calculation-result'.
;;;***
;;;### (autoloads nil "helm-external" "helm-external.el" (22514 17679
;;;;;; 748739 508000))
;;;### (autoloads nil "helm-external" "helm-external.el" (22516 57904
;;;;;; 741524 668000))
;;; Generated autoloads from helm-external.el
(autoload 'helm-run-external-command "helm-external" "\
@ -266,8 +266,8 @@ You can set your own list of commands with
;;;***
;;;### (autoloads nil "helm-files" "helm-files.el" (22514 17679 836739
;;;;;; 710000))
;;;### (autoloads nil "helm-files" "helm-files.el" (22516 57904 837525
;;;;;; 102000))
;;; Generated autoloads from helm-files.el
(autoload 'helm-projects-history "helm-files" "\
@ -355,8 +355,8 @@ It allows additionally to delete more than one connection at once.
;;;***
;;;### (autoloads nil "helm-font" "helm-font.el" (22514 17679 796739
;;;;;; 619000))
;;;### (autoloads nil "helm-font" "helm-font.el" (22516 57904 793524
;;;;;; 903000))
;;; Generated autoloads from helm-font.el
(autoload 'helm-select-xfont "helm-font" "\
@ -371,8 +371,8 @@ Preconfigured helm for `ucs-names' math symbols.
;;;***
;;;### (autoloads nil "helm-grep" "helm-grep.el" (22514 17679 928739
;;;;;; 921000))
;;;### (autoloads nil "helm-grep" "helm-grep.el" (22516 57904 917525
;;;;;; 462000))
;;; Generated autoloads from helm-grep.el
(autoload 'helm-goto-precedent-file "helm-grep" "\
@ -399,8 +399,8 @@ With a prefix arg ARG git-grep the whole repository.
;;;***
;;;### (autoloads nil "helm-help" "helm-help.el" (22514 17679 744739
;;;;;; 499000))
;;;### (autoloads nil "helm-help" "helm-help.el" (22516 57904 733524
;;;;;; 632000))
;;; Generated autoloads from helm-help.el
(autoload 'helm-documentation "helm-help" "\
@ -420,8 +420,8 @@ String displayed in mode-line in `helm-source-find-files'.")
;;;***
;;;### (autoloads nil "helm-id-utils" "helm-id-utils.el" (22514 17679
;;;;;; 820739 673000))
;;;### (autoloads nil "helm-id-utils" "helm-id-utils.el" (22516 57904
;;;;;; 813524 993000))
;;; Generated autoloads from helm-id-utils.el
(autoload 'helm-gid "helm-id-utils" "\
@ -435,8 +435,8 @@ See <https://www.gnu.org/software/idutils/>.
;;;***
;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22514 17679 808739
;;;;;; 646000))
;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22516 57904 801524
;;;;;; 939000))
;;; Generated autoloads from helm-imenu.el
(autoload 'helm-imenu "helm-imenu" "\
@ -453,8 +453,8 @@ or it have an association in `helm-imenu-all-buffer-assoc'.
;;;***
;;;### (autoloads nil "helm-info" "helm-info.el" (22514 17679 800739
;;;;;; 627000))
;;;### (autoloads nil "helm-info" "helm-info.el" (22516 57904 797524
;;;;;; 921000))
;;; Generated autoloads from helm-info.el
(autoload 'helm-info "helm-info" "\
@ -470,8 +470,8 @@ With a prefix-arg insert symbol at point.
;;;***
;;;### (autoloads nil "helm-locate" "helm-locate.el" (22514 17679
;;;;;; 752739 518000))
;;;### (autoloads nil "helm-locate" "helm-locate.el" (22516 57904
;;;;;; 745524 686000))
;;; Generated autoloads from helm-locate.el
(autoload 'helm-projects-find-files "helm-locate" "\
@ -498,8 +498,8 @@ Where db_path is a filename matched by
;;;***
;;;### (autoloads nil "helm-man" "helm-man.el" (22514 17679 876739
;;;;;; 802000))
;;;### (autoloads nil "helm-man" "helm-man.el" (22516 57904 869525
;;;;;; 246000))
;;; Generated autoloads from helm-man.el
(autoload 'helm-man-woman "helm-man" "\
@ -510,8 +510,8 @@ With a prefix arg reinitialize the cache.
;;;***
;;;### (autoloads nil "helm-misc" "helm-misc.el" (22514 17679 856739
;;;;;; 756000))
;;;### (autoloads nil "helm-misc" "helm-misc.el" (22516 57904 853525
;;;;;; 174000))
;;; Generated autoloads from helm-misc.el
(autoload 'helm-browse-menubar "helm-misc" "\
@ -552,8 +552,8 @@ Preconfigured `helm' that provide completion of `comint' history.
;;;***
;;;### (autoloads nil "helm-mode" "helm-mode.el" (22514 17679 720739
;;;;;; 444000))
;;;### (autoloads nil "helm-mode" "helm-mode.el" (22516 57904 717524
;;;;;; 560000))
;;; Generated autoloads from helm-mode.el
(autoload 'helm-comp-read "helm-mode" "\
@ -724,8 +724,8 @@ Note: This mode is incompatible with Emacs23.
;;;***
;;;### (autoloads nil "helm-net" "helm-net.el" (22514 17679 900739
;;;;;; 857000))
;;;### (autoloads nil "helm-net" "helm-net.el" (22516 57904 885525
;;;;;; 318000))
;;; Generated autoloads from helm-net.el
(autoload 'helm-surfraw "helm-net" "\
@ -745,8 +745,8 @@ Preconfigured `helm' for Wikipedia lookup with Wikipedia suggest.
;;;***
;;;### (autoloads nil "helm-org" "helm-org.el" (22514 17679 932739
;;;;;; 930000))
;;;### (autoloads nil "helm-org" "helm-org.el" (22516 57904 921525
;;;;;; 481000))
;;; Generated autoloads from helm-org.el
(autoload 'helm-org-agenda-files-headings "helm-org" "\
@ -777,8 +777,8 @@ Preconfigured helm for org templates.
;;;***
;;;### (autoloads nil "helm-regexp" "helm-regexp.el" (22514 17679
;;;;;; 888739 830000))
;;;### (autoloads nil "helm-regexp" "helm-regexp.el" (22516 57904
;;;;;; 881525 300000))
;;; Generated autoloads from helm-regexp.el
(autoload 'helm-moccur-mode "helm-regexp" "\
@ -817,8 +817,8 @@ The prefix arg can be set before calling
;;;***
;;;### (autoloads nil "helm-ring" "helm-ring.el" (22514 17679 732739
;;;;;; 472000))
;;;### (autoloads nil "helm-ring" "helm-ring.el" (22516 57904 729524
;;;;;; 614000))
;;; Generated autoloads from helm-ring.el
(defvar helm-push-mark-mode nil "\
@ -876,8 +876,8 @@ This command is useful when used with persistent action.
;;;***
;;;### (autoloads nil "helm-semantic" "helm-semantic.el" (22514 17679
;;;;;; 812739 655000))
;;;### (autoloads nil "helm-semantic" "helm-semantic.el" (22516 57904
;;;;;; 805524 957000))
;;; Generated autoloads from helm-semantic.el
(autoload 'helm-semantic "helm-semantic" "\
@ -899,8 +899,8 @@ Fill in the symbol at point by default.
;;;***
;;;### (autoloads nil "helm-sys" "helm-sys.el" (22514 17679 828739
;;;;;; 692000))
;;;### (autoloads nil "helm-sys" "helm-sys.el" (22516 57904 825525
;;;;;; 47000))
;;; Generated autoloads from helm-sys.el
(defvar helm-top-poll-mode nil "\
@ -935,8 +935,8 @@ Preconfigured helm for xrandr.
;;;***
;;;### (autoloads nil "helm-tags" "helm-tags.el" (22514 17679 788739
;;;;;; 600000))
;;;### (autoloads nil "helm-tags" "helm-tags.el" (22516 57904 781524
;;;;;; 849000))
;;; Generated autoloads from helm-tags.el
(autoload 'helm-etags-select "helm-tags" "\
@ -955,8 +955,8 @@ This function aggregates three sources of tag files:
;;;***
;;;### (autoloads nil "helm-utils" "helm-utils.el" (22514 17679 764739
;;;;;; 545000))
;;;### (autoloads nil "helm-utils" "helm-utils.el" (22516 57904 757524
;;;;;; 740000))
;;; Generated autoloads from helm-utils.el
(defvar helm-popup-tip-mode nil "\
@ -977,7 +977,7 @@ Show help-echo informations in a popup tip at end of line.
;;;***
;;;### (autoloads nil nil ("helm-easymenu.el" "helm-pkg.el" "helm-types.el")
;;;;;; (22514 17679 936739 940000))
;;;;;; (22516 57904 925525 499000))
;;;***

View File

@ -1,8 +1,8 @@
(define-package "helm" "20160929.1313" "Helm is an Emacs incremental and narrowing framework"
(define-package "helm" "20161004.2242" "Helm is an Emacs incremental and narrowing framework"
'((emacs "24.4")
(async "1.9")
(popup "0.5.3")
(helm-core "2.2.0"))
(helm-core "2.2.1"))
:url "https://emacs-helm.github.io/helm/")
;; Local Variables:
;; no-byte-compile: t

View File

@ -3,7 +3,7 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "helm" "helm.el" (22514 17675 208729 97000))
;;;### (autoloads nil "helm" "helm.el" (22516 57898 381495 962000))
;;; Generated autoloads from helm.el
(autoload 'helm-define-multi-key "helm" "\
@ -188,7 +188,7 @@ Enable/disable helm debugging from outside of helm session.
;;;***
;;;### (autoloads nil nil ("helm-core-pkg.el" "helm-lib.el" "helm-multi-match.el"
;;;;;; "helm-source.el") (22514 17675 228729 143000))
;;;;;; "helm-source.el") (22516 57898 397496 35000))
;;;***

View File

@ -1,4 +1,4 @@
(define-package "helm-core" "20160929.1313" "Development files for Helm"
(define-package "helm-core" "20161004.2301" "Development files for Helm"
'((emacs "24.4")
(async "1.9"))
:url "https://emacs-helm.github.io/helm/")

View File

@ -3576,7 +3576,7 @@ If action buffer is selected, back to the helm buffer."
(setq helm-pattern 'dummy)
(helm-check-minibuffer-input))))
(t (message "No Actions available")))
(helm-display-mode-line src)
(helm-display-mode-line (helm-get-current-source))
(run-hooks 'helm-window-configuration-hook))))))
(put 'helm-select-action 'helm-only t)
@ -3592,7 +3592,7 @@ If action buffer is selected, back to the helm buffer."
:nomark t
:keymap 'helm-map
:candidates actions
:mode-line '("Action(s)" "TAB:BackToCands RET/f1/f2/fn:NthAct")
:mode-line '("Action(s)" "\\<helm-map>\\[helm-select-action]:BackToCands RET/f1/f2/fn:NthAct")
:candidate-transformer
(lambda (candidates)
(cl-loop for (i . j) in candidates
@ -5354,7 +5354,9 @@ or `helm-follow-input-idle-delay' or `helm-input-idle-delay' secs."
(helm-window)
(helm-get-selection nil nil src))
(helm-follow-mode-set-source 1 src)
(run-with-idle-timer at nil #'helm-execute-persistent-action))))
(run-with-idle-timer at nil (lambda ()
(when helm-alive-p
(helm-execute-persistent-action)))))))
(defun helm-follow-mode-p (&optional source)
(with-helm-buffer

View File

@ -4,8 +4,8 @@
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil nil ("magithub-cache.el" "magithub-ci.el" "magithub-core.el"
;;;;;; "magithub-issue.el" "magithub-pkg.el" "magithub.el") (22514
;;;;;; 17666 568709 294000))
;;;;;; "magithub-issue.el" "magithub-pkg.el" "magithub.el") (22516
;;;;;; 57895 765484 157000))
;;;***

View File

@ -29,8 +29,9 @@
(defun magithub-github-repository-p ()
"Non-nil if \"origin\" points to GitHub or a whitelisted domain."
(let ((url (magit-get "remote" "origin" "url")))
(when url
(cl-some (lambda (domain) (s-contains? domain url))
(cons "github.com" (magit-get-all "hub" "host")))))
(cons "github.com" (magit-get-all "hub" "host"))))))
(defun magithub-repo-id ()
"Returns an identifying value for this repository."

View File

@ -1,4 +1,4 @@
(define-package "magithub" "20160930.1523" "Magit interfaces for GitHub"
(define-package "magithub" "20161004.523" "Magit interfaces for GitHub"
'((emacs "24.3")
(magit "2.8.0")
(git-commit "20160821.1338")

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "projectile" "projectile.el" (22508 49895 417958
;;;;;; 873000))
;;;### (autoloads nil "projectile" "projectile.el" (22516 57894 833479
;;;;;; 951000))
;;; Generated autoloads from projectile.el
(autoload 'projectile-version "projectile" "\

View File

@ -1,2 +1,2 @@
;;; -*- no-byte-compile: t -*-
(define-package "projectile" "20160926.1133" "Manage and navigate projects in Emacs easily" '((pkg-info "0.4")) :url "https://github.com/bbatsov/projectile" :keywords '("project" "convenience"))
(define-package "projectile" "20161004.1340" "Manage and navigate projects in Emacs easily" '((pkg-info "0.4")) :url "https://github.com/bbatsov/projectile" :keywords '("project" "convenience"))

View File

@ -4,7 +4,7 @@
;; Author: Bozhidar Batsov <bozhidar@batsov.com>
;; URL: https://github.com/bbatsov/projectile
;; Package-Version: 20160926.1133
;; Package-Version: 20161004.1340
;; Keywords: project, convenience
;; Version: 0.15.0-cvs
;; Package-Requires: ((pkg-info "0.4"))
@ -38,12 +38,11 @@
;;; Code:
(require 'cl-lib)
(require 'compile)
(require 'eshell)
(require 'grep)
(require 'ibuf-ext)
(require 'ibuffer)
(require 'thingatpt)
(require 'ibuffer)
(require 'ibuf-ext)
(require 'compile)
(require 'grep)
(eval-when-compile
(defvar ag-ignore-list)
@ -227,7 +226,7 @@ Otherwise consider the current directory the project root."
If set to 'auto', `projectile-find-tag' will automatically choose
which backend to use. Preference order is ggtags -> etags-select
-> find-tag. Variable can also be set to specify which backend to
-> `find-tag'. Variable can also be set to specify which backend to
use. If selected backend is unavailable, fall back to `find-tag'.
If this variable is set to 'auto' and ggtags is available, or if
@ -1077,29 +1076,9 @@ they are excluded from the results of this function."
(when cmd
(projectile-files-via-ext-command cmd))))
(defun projectile-call-process-to-string (program &rest args)
"Invoke the executable PROGRAM with ARGS and return the output as a string."
(with-temp-buffer
(apply 'call-process program nil (current-buffer) nil args)
(buffer-string)))
(defun projectile-shell-command-to-string (command)
"Try to run COMMAND without actually using a shell and return the output.
The function `eshell-search-path' will be used to search the PATH
environment variable for an appropriate executable using the text
occuring before the first space. If no executable is found,
fallback to `shell-command-to-string'."
(cl-destructuring-bind
(the-command . args) (split-string command " ")
(let ((binary-path (eshell-search-path the-command)))
(if binary-path
(apply 'projectile-call-process-to-string binary-path args)
(shell-command-to-string command)))))
(defun projectile-files-via-ext-command (command)
"Get a list of relative file names in the project root by executing COMMAND."
(split-string (projectile-shell-command-to-string command) "\0" t))
(split-string (shell-command-to-string command) "\0" t))
(defun projectile-index-directory (directory patterns progress-reporter)
"Index DIRECTORY taking into account PATTERNS.

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "wakatime-mode" "wakatime-mode.el" (22510 25032
;;;;;; 328539 79000))
;;;### (autoloads nil "wakatime-mode" "wakatime-mode.el" (22516 57893
;;;;;; 981476 105000))
;;; Generated autoloads from wakatime-mode.el
(autoload 'wakatime-mode "wakatime-mode" "\

View File

@ -1,2 +1,2 @@
;;; -*- no-byte-compile: t -*-
(define-package "wakatime-mode" "20160929.624" "Automatic time tracking extension for WakaTime" 'nil :keywords '("calendar" "comm"))
(define-package "wakatime-mode" "20161003.729" "Automatic time tracking extension for WakaTime" 'nil :keywords '("calendar" "comm"))

View File

@ -6,7 +6,7 @@
;; Maintainer: Alan Hamlett <alan@wakatime.com>
;; Website: https://wakatime.com
;; Keywords: calendar, comm
;; Package-Version: 20160929.624
;; Package-Version: 20161003.729
;; Version: 1.0.2
;; This program is free software; you can redistribute it and/or modify
@ -145,8 +145,8 @@
Set DONT-USE-KEY to t if you want to omit --key from the command
line."
(let ((key (if dont-use-key
(format "--key %s" wakatime-api-key)
"")))
""
(format "--key %s" wakatime-api-key))))
(format "%s %s --file \"%s\" %s --plugin %s/%s %s --time %.2f"
wakatime-python-bin
wakatime-cli-path