diff --git a/elpa/cider-20160925.2057/cider-apropos.el b/elpa/cider-20160927.2135/cider-apropos.el similarity index 100% rename from elpa/cider-20160925.2057/cider-apropos.el rename to elpa/cider-20160927.2135/cider-apropos.el diff --git a/elpa/cider-20160925.2057/cider-autoloads.el b/elpa/cider-20160927.2135/cider-autoloads.el similarity index 92% rename from elpa/cider-20160925.2057/cider-autoloads.el rename to elpa/cider-20160927.2135/cider-autoloads.el index ec46997..e85d9f9 100644 --- a/elpa/cider-20160925.2057/cider-autoloads.el +++ b/elpa/cider-20160927.2135/cider-autoloads.el @@ -3,7 +3,7 @@ ;;; Code: (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) -;;;### (autoloads nil "cider" "cider.el" (22505 21427 529825 550000)) +;;;### (autoloads nil "cider" "cider.el" (22508 49905 421980 342000)) ;;; Generated autoloads from cider.el (autoload 'cider-version "cider" "\ @@ -40,8 +40,8 @@ gets associated with it. ;;;*** -;;;### (autoloads nil "cider-apropos" "cider-apropos.el" (22505 21427 -;;;;;; 429825 562000)) +;;;### (autoloads nil "cider-apropos" "cider-apropos.el" (22508 49905 +;;;;;; 341980 175000)) ;;; Generated autoloads from cider-apropos.el (autoload 'cider-apropos "cider-apropos" "\ @@ -78,8 +78,8 @@ Shortcut for (cider-apropos-select nil t). ;;;*** -;;;### (autoloads nil "cider-browse-ns" "cider-browse-ns.el" (22505 -;;;;;; 21427 417825 564000)) +;;;### (autoloads nil "cider-browse-ns" "cider-browse-ns.el" (22508 +;;;;;; 49905 313980 117000)) ;;; Generated autoloads from cider-browse-ns.el (autoload 'cider-browse-ns "cider-browse-ns" "\ @@ -94,8 +94,8 @@ List all loaded namespaces in BUFFER. ;;;*** -;;;### (autoloads nil "cider-classpath" "cider-classpath.el" (22505 -;;;;;; 21427 545825 548000)) +;;;### (autoloads nil "cider-classpath" "cider-classpath.el" (22508 +;;;;;; 49905 433980 367000)) ;;; Generated autoloads from cider-classpath.el (autoload 'cider-classpath "cider-classpath" "\ @@ -110,8 +110,8 @@ Open a classpath entry. ;;;*** -;;;### (autoloads nil "cider-debug" "cider-debug.el" (22505 21427 -;;;;;; 421825 563000)) +;;;### (autoloads nil "cider-debug" "cider-debug.el" (22508 49905 +;;;;;; 325980 141000)) ;;; Generated autoloads from cider-debug.el (autoload 'cider-debug-defun-at-point "cider-debug" "\ @@ -127,8 +127,8 @@ a number of keys will be prompted to the user. ;;;*** -;;;### (autoloads nil "cider-grimoire" "cider-grimoire.el" (22505 -;;;;;; 21427 481825 556000)) +;;;### (autoloads nil "cider-grimoire" "cider-grimoire.el" (22508 +;;;;;; 49905 377980 250000)) ;;; Generated autoloads from cider-grimoire.el (autoload 'cider-grimoire-web "cider-grimoire" "\ @@ -151,8 +151,8 @@ opposite of what that option dictates. ;;;*** -;;;### (autoloads nil "cider-inspector" "cider-inspector.el" (22505 -;;;;;; 21427 465825 558000)) +;;;### (autoloads nil "cider-inspector" "cider-inspector.el" (22508 +;;;;;; 49905 369980 234000)) ;;; Generated autoloads from cider-inspector.el (autoload 'cider-inspect-last-sexp "cider-inspector" "\ @@ -190,7 +190,7 @@ current buffer's namespace. ;;;*** ;;;### (autoloads nil "cider-macroexpansion" "cider-macroexpansion.el" -;;;;;; (22505 21427 513825 552000)) +;;;;;; (22508 49905 413980 326000)) ;;; Generated autoloads from cider-macroexpansion.el (autoload 'cider-macroexpand-1 "cider-macroexpansion" "\ @@ -207,8 +207,8 @@ Invoke \\=`clojure.walk/macroexpand-all\\=` on the expression preceding point. ;;;*** -;;;### (autoloads nil "cider-mode" "cider-mode.el" (22505 21427 441825 -;;;;;; 561000)) +;;;### (autoloads nil "cider-mode" "cider-mode.el" (22508 49905 349980 +;;;;;; 192000)) ;;; Generated autoloads from cider-mode.el (defvar cider-mode-line '(:eval (format " cider[%s]" (cider--modeline-info))) "\ @@ -236,8 +236,8 @@ Minor mode for REPL interaction from a Clojure buffer. ;;;*** -;;;### (autoloads nil "cider-scratch" "cider-scratch.el" (22505 21427 -;;;;;; 449825 560000)) +;;;### (autoloads nil "cider-scratch" "cider-scratch.el" (22508 49905 +;;;;;; 357980 209000)) ;;; Generated autoloads from cider-scratch.el (autoload 'cider-scratch "cider-scratch" "\ @@ -247,8 +247,8 @@ Go to the scratch buffer named `cider-scratch-buffer-name'. ;;;*** -;;;### (autoloads nil "cider-selector" "cider-selector.el" (22505 -;;;;;; 21427 537825 549000)) +;;;### (autoloads nil "cider-selector" "cider-selector.el" (22508 +;;;;;; 49905 425980 351000)) ;;; Generated autoloads from cider-selector.el (autoload 'cider-selector "cider-selector" "\ @@ -263,8 +263,8 @@ See `def-cider-selector-method' for defining new methods. ;;;*** -;;;### (autoloads nil "cider-test" "cider-test.el" (22505 21427 505825 -;;;;;; 553000)) +;;;### (autoloads nil "cider-test" "cider-test.el" (22508 49905 405980 +;;;;;; 309000)) ;;; Generated autoloads from cider-test.el (defvar cider-auto-test-mode nil "\ @@ -288,8 +288,8 @@ nothing if no tests are defined or if the file failed to load. ;;;*** -;;;### (autoloads nil "cider-util" "cider-util.el" (22505 21427 521825 -;;;;;; 551000)) +;;;### (autoloads nil "cider-util" "cider-util.el" (22508 49905 417980 +;;;;;; 334000)) ;;; Generated autoloads from cider-util.el (autoload 'cider-view-manual "cider-util" "\ @@ -303,7 +303,7 @@ View the manual in your default browser. ;;;;;; "cider-doc.el" "cider-eldoc.el" "cider-interaction.el" "cider-overlays.el" ;;;;;; "cider-pkg.el" "cider-popup.el" "cider-repl.el" "cider-resolve.el" ;;;;;; "cider-stacktrace.el" "nrepl-client.el" "nrepl-dict.el") -;;;;;; (22505 21427 553825 547000)) +;;;;;; (22508 49905 437980 375000)) ;;;*** diff --git a/elpa/cider-20160925.2057/cider-browse-ns.el b/elpa/cider-20160927.2135/cider-browse-ns.el similarity index 100% rename from elpa/cider-20160925.2057/cider-browse-ns.el rename to elpa/cider-20160927.2135/cider-browse-ns.el diff --git a/elpa/cider-20160925.2057/cider-classpath.el b/elpa/cider-20160927.2135/cider-classpath.el similarity index 100% rename from elpa/cider-20160925.2057/cider-classpath.el rename to elpa/cider-20160927.2135/cider-classpath.el diff --git a/elpa/cider-20160925.2057/cider-client.el b/elpa/cider-20160927.2135/cider-client.el similarity index 99% rename from elpa/cider-20160925.2057/cider-client.el rename to elpa/cider-20160927.2135/cider-client.el index c0da631..c6b5959 100644 --- a/elpa/cider-20160925.2057/cider-client.el +++ b/elpa/cider-20160927.2135/cider-client.el @@ -219,6 +219,16 @@ such a link cannot be established automatically." (cider-repl-type) (t "clj"))) +(defun cider-toggle-request-dispatch () + "Toggles the value of `cider-request-dispatch' between static and dynamic. + +Handy when you're using dynamic dispatch, but you want to quickly force all +evaluation commands to use a particular connection." + (interactive) + (let ((new-value (if (eq cider-request-dispatch 'static) 'dynamic 'static))) + (setq cider-request-dispatch new-value) + (message "Toggled CIDER request dispatch to %s." new-value))) + (defun cider-current-connection (&optional type) "Return the REPL buffer relevant for the current Clojure source buffer. A REPL is relevant if its `nrepl-project-dir' is compatible with the diff --git a/elpa/cider-20160925.2057/cider-common.el b/elpa/cider-20160927.2135/cider-common.el similarity index 100% rename from elpa/cider-20160925.2057/cider-common.el rename to elpa/cider-20160927.2135/cider-common.el diff --git a/elpa/cider-20160925.2057/cider-compat.el b/elpa/cider-20160927.2135/cider-compat.el similarity index 100% rename from elpa/cider-20160925.2057/cider-compat.el rename to elpa/cider-20160927.2135/cider-compat.el diff --git a/elpa/cider-20160925.2057/cider-debug.el b/elpa/cider-20160927.2135/cider-debug.el similarity index 100% rename from elpa/cider-20160925.2057/cider-debug.el rename to elpa/cider-20160927.2135/cider-debug.el diff --git a/elpa/cider-20160925.2057/cider-doc.el b/elpa/cider-20160927.2135/cider-doc.el similarity index 100% rename from elpa/cider-20160925.2057/cider-doc.el rename to elpa/cider-20160927.2135/cider-doc.el diff --git a/elpa/cider-20160925.2057/cider-eldoc.el b/elpa/cider-20160927.2135/cider-eldoc.el similarity index 100% rename from elpa/cider-20160925.2057/cider-eldoc.el rename to elpa/cider-20160927.2135/cider-eldoc.el diff --git a/elpa/cider-20160925.2057/cider-grimoire.el b/elpa/cider-20160927.2135/cider-grimoire.el similarity index 100% rename from elpa/cider-20160925.2057/cider-grimoire.el rename to elpa/cider-20160927.2135/cider-grimoire.el diff --git a/elpa/cider-20160925.2057/cider-inspector.el b/elpa/cider-20160927.2135/cider-inspector.el similarity index 100% rename from elpa/cider-20160925.2057/cider-inspector.el rename to elpa/cider-20160927.2135/cider-inspector.el diff --git a/elpa/cider-20160925.2057/cider-interaction.el b/elpa/cider-20160927.2135/cider-interaction.el similarity index 100% rename from elpa/cider-20160925.2057/cider-interaction.el rename to elpa/cider-20160927.2135/cider-interaction.el diff --git a/elpa/cider-20160925.2057/cider-macroexpansion.el b/elpa/cider-20160927.2135/cider-macroexpansion.el similarity index 100% rename from elpa/cider-20160925.2057/cider-macroexpansion.el rename to elpa/cider-20160927.2135/cider-macroexpansion.el diff --git a/elpa/cider-20160925.2057/cider-mode.el b/elpa/cider-20160927.2135/cider-mode.el similarity index 100% rename from elpa/cider-20160925.2057/cider-mode.el rename to elpa/cider-20160927.2135/cider-mode.el diff --git a/elpa/cider-20160925.2057/cider-overlays.el b/elpa/cider-20160927.2135/cider-overlays.el similarity index 100% rename from elpa/cider-20160925.2057/cider-overlays.el rename to elpa/cider-20160927.2135/cider-overlays.el diff --git a/elpa/cider-20160925.2057/cider-pkg.el b/elpa/cider-20160927.2135/cider-pkg.el similarity index 82% rename from elpa/cider-20160925.2057/cider-pkg.el rename to elpa/cider-20160927.2135/cider-pkg.el index 4ba0d66..80948ef 100644 --- a/elpa/cider-20160925.2057/cider-pkg.el +++ b/elpa/cider-20160927.2135/cider-pkg.el @@ -1,4 +1,4 @@ -(define-package "cider" "20160925.2057" "Clojure Interactive Development Environment that Rocks" +(define-package "cider" "20160927.2135" "Clojure Interactive Development Environment that Rocks" '((emacs "24.3") (clojure-mode "5.5.2") (pkg-info "0.4") diff --git a/elpa/cider-20160925.2057/cider-popup.el b/elpa/cider-20160927.2135/cider-popup.el similarity index 100% rename from elpa/cider-20160925.2057/cider-popup.el rename to elpa/cider-20160927.2135/cider-popup.el diff --git a/elpa/cider-20160925.2057/cider-repl.el b/elpa/cider-20160927.2135/cider-repl.el similarity index 100% rename from elpa/cider-20160925.2057/cider-repl.el rename to elpa/cider-20160927.2135/cider-repl.el diff --git a/elpa/cider-20160925.2057/cider-resolve.el b/elpa/cider-20160927.2135/cider-resolve.el similarity index 100% rename from elpa/cider-20160925.2057/cider-resolve.el rename to elpa/cider-20160927.2135/cider-resolve.el diff --git a/elpa/cider-20160925.2057/cider-scratch.el b/elpa/cider-20160927.2135/cider-scratch.el similarity index 100% rename from elpa/cider-20160925.2057/cider-scratch.el rename to elpa/cider-20160927.2135/cider-scratch.el diff --git a/elpa/cider-20160925.2057/cider-selector.el b/elpa/cider-20160927.2135/cider-selector.el similarity index 100% rename from elpa/cider-20160925.2057/cider-selector.el rename to elpa/cider-20160927.2135/cider-selector.el diff --git a/elpa/cider-20160925.2057/cider-stacktrace.el b/elpa/cider-20160927.2135/cider-stacktrace.el similarity index 100% rename from elpa/cider-20160925.2057/cider-stacktrace.el rename to elpa/cider-20160927.2135/cider-stacktrace.el diff --git a/elpa/cider-20160925.2057/cider-test.el b/elpa/cider-20160927.2135/cider-test.el similarity index 100% rename from elpa/cider-20160925.2057/cider-test.el rename to elpa/cider-20160927.2135/cider-test.el diff --git a/elpa/cider-20160925.2057/cider-util.el b/elpa/cider-20160927.2135/cider-util.el similarity index 100% rename from elpa/cider-20160925.2057/cider-util.el rename to elpa/cider-20160927.2135/cider-util.el diff --git a/elpa/cider-20160925.2057/cider.el b/elpa/cider-20160927.2135/cider.el similarity index 100% rename from elpa/cider-20160925.2057/cider.el rename to elpa/cider-20160927.2135/cider.el diff --git a/elpa/cider-20160925.2057/nrepl-client.el b/elpa/cider-20160927.2135/nrepl-client.el similarity index 100% rename from elpa/cider-20160925.2057/nrepl-client.el rename to elpa/cider-20160927.2135/nrepl-client.el diff --git a/elpa/cider-20160925.2057/nrepl-dict.el b/elpa/cider-20160927.2135/nrepl-dict.el similarity index 100% rename from elpa/cider-20160925.2057/nrepl-dict.el rename to elpa/cider-20160927.2135/nrepl-dict.el diff --git a/elpa/flycheck-20160926.141/flycheck-autoloads.el b/elpa/flycheck-20160928.649/flycheck-autoloads.el similarity index 98% rename from elpa/flycheck-20160926.141/flycheck-autoloads.el rename to elpa/flycheck-20160928.649/flycheck-autoloads.el index 0df9308..26bb68a 100644 --- a/elpa/flycheck-20160926.141/flycheck-autoloads.el +++ b/elpa/flycheck-20160928.649/flycheck-autoloads.el @@ -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" (22505 21423 841826 -;;;;;; 8000)) +;;;### (autoloads nil "flycheck" "flycheck.el" (22508 49902 949975 +;;;;;; 140000)) ;;; 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") (22505 21423 837826 9000)) +;;;;;; "flycheck-pkg.el") (22508 49902 945975 131000)) ;;;*** diff --git a/elpa/flycheck-20160926.141/flycheck-buttercup.el b/elpa/flycheck-20160928.649/flycheck-buttercup.el similarity index 100% rename from elpa/flycheck-20160926.141/flycheck-buttercup.el rename to elpa/flycheck-20160928.649/flycheck-buttercup.el diff --git a/elpa/flycheck-20160926.141/flycheck-ert.el b/elpa/flycheck-20160928.649/flycheck-ert.el similarity index 100% rename from elpa/flycheck-20160926.141/flycheck-ert.el rename to elpa/flycheck-20160928.649/flycheck-ert.el diff --git a/elpa/flycheck-20160926.141/flycheck-pkg.el b/elpa/flycheck-20160928.649/flycheck-pkg.el similarity index 79% rename from elpa/flycheck-20160926.141/flycheck-pkg.el rename to elpa/flycheck-20160928.649/flycheck-pkg.el index 0de9e1f..ee55e93 100644 --- a/elpa/flycheck-20160926.141/flycheck-pkg.el +++ b/elpa/flycheck-20160928.649/flycheck-pkg.el @@ -1,4 +1,4 @@ -(define-package "flycheck" "20160926.141" "On-the-fly syntax checking" +(define-package "flycheck" "20160928.649" "On-the-fly syntax checking" '((dash "2.12.1") (pkg-info "0.4") (let-alist "1.0.4") diff --git a/elpa/flycheck-20160926.141/flycheck.el b/elpa/flycheck-20160928.649/flycheck.el similarity index 99% rename from elpa/flycheck-20160926.141/flycheck.el rename to elpa/flycheck-20160928.649/flycheck.el index 6ccf97b..3e35141 100644 --- a/elpa/flycheck-20160926.141/flycheck.el +++ b/elpa/flycheck-20160928.649/flycheck.el @@ -1614,6 +1614,10 @@ are mandatory. non-nil if this syntax checker shall be used to check the current buffer. Otherwise it shall return nil. + If this checker has a `:working-directory' FUNCTION is + called with `default-directory' bound to the checker's + working directory. + FUNCTION is only called in matching major modes. This property is optional. @@ -1622,18 +1626,23 @@ are mandatory. A function to determine whether to use the syntax checker in the current buffer. - This function behaves as `:predicate', except that it's only + This property behaves as `:predicate', except that it's only called the first time a syntax checker is to be used in a buffer. - If the function returns a non-nil value the checker is put in a - whitelist in `flycheck-enabled-checkers' to prevent further - invocations of `:enabled'. Otherwise it is disabled via - `flycheck-disabled-checkers' to prevent any further use of it. - - FUNCTION is called with CHECKER argument and shall return + FUNCTION is called without arguments and shall return non-nil if this syntax checker shall be used to check the current buffer. Otherwise it shall return nil. + If FUNCTION returns a non-nil value the checker is put in a + whitelist in `flycheck-enabled-checkers' to prevent further + invocations of `:enabled'. Otherwise it is disabled via + `flycheck-disabled-checkers' to prevent any further use of + it. + + If this checker has a `:working-directory' FUNCTION is + called with `default-directory' bound to the checker's + working directory. + FUNCTION is only called in matching major modes. This property is optional. @@ -1742,12 +1751,20 @@ Signal an error, if any property has an invalid value." (lambda () (if (flycheck-valid-checker-p symbol) (or (null predicate) + ;; Run predicate in the checker's default directory (let ((default-directory (flycheck-compute-working-directory symbol))) (funcall predicate))) (lwarn 'flycheck :warning "%S is no valid Flycheck syntax checker. Try to reinstall the package defining this syntax checker." symbol) - nil)))) + nil))) + (real-enabled + (lambda () + (or (null enabled) + ;; Run enabled in the checker's default directory + (let ((default-directory + (flycheck-compute-working-directory symbol))) + (funcall enabled)))))) (pcase-dolist (`(,prop . ,value) `((start . ,start) (interrupt . ,interrupt) @@ -1755,7 +1772,7 @@ Try to reinstall the package defining this syntax checker." symbol) (modes . ,modes) (predicate . ,real-predicate) (verify . ,verify) - (enabled . ,enabled) + (enabled . ,real-enabled) (error-filter . ,filter) (next-checkers . ,next-checkers) (documentation . ,docstring) @@ -1801,7 +1818,7 @@ nil otherwise." (shall-enable (and (not (flycheck-disabled-checker-p checker)) (or (memq checker flycheck-enabled-checkers) (null enabled) - (funcall enabled checker))))) + (funcall enabled))))) (if shall-enable (cl-pushnew checker flycheck-enabled-checkers) (cl-pushnew checker flycheck-disabled-checkers)) @@ -3836,6 +3853,8 @@ message to stretch arbitrarily far." ;; `revert-buffer' updates the mode line for us, so all we need to do is ;; set the corresponding mode line construct. mode-line-buffer-identification flycheck-error-list-mode-line) + ;; See https://github.com/flycheck/flycheck/issues/1101 + (setq-local truncate-string-ellipsis "…") (tabulated-list-init-header)) (defvar-local flycheck-error-list-source-buffer nil @@ -4472,7 +4491,7 @@ default `:verify' function of command checkers." (patterns (plist-get properties :error-patterns)) (parser (or (plist-get properties :error-parser) #'flycheck-parse-with-patterns)) - (predicate (plist-get properties :predicate)) + (enabled (plist-get properties :enabled)) (standard-input (plist-get properties :standard-input))) (unless command (error "Missing :command in syntax checker %s" symbol)) @@ -4487,12 +4506,12 @@ default `:verify' function of command checkers." (error "Missing :error-patterns in syntax checker %s" symbol)) (setq properties - ;; Construct a predicate that checks whether the executable exists, to - ;; guard against syntax checker tools which are not installed - (plist-put properties :predicate + ;; Automatically disable command checkers if the executable does not + ;; exist. + (plist-put properties :enabled (lambda () (and (flycheck-find-checker-executable symbol) - (or (not predicate) (funcall predicate)))))) + (or (not enabled) (funcall enabled)))))) (apply #'flycheck-define-generic-checker symbol docstring :start #'flycheck-start-command-checker @@ -4955,8 +4974,11 @@ Resolve all errors in OUTPUT using CWD as working directory." ;; might report errors from other files (e.g. includes) even if there ;; are no errors in the file being checked. (funcall callback 'suspicious - (format "Checker %S returned non-zero exit code %s, but no errors from \ -output: %s\nChecker definition probably flawed." checker exit-status output))) + (format "Flycheck checker %S returned non-zero \ +exit code %s, but its output contained no errors: %s\nTry \ +installing a more recent version of %S, and please open a bug \ +report if the issue persists in the latest release. Thanks!" + checker exit-status output checker))) (funcall callback 'finished ;; Fix error file names, by substituting them backwards from the ;; temporaries. @@ -5332,16 +5354,12 @@ function `buffer-file-name'." (when (seq-some (apply-partially #'flycheck-same-files-p (expand-file-name filename cwd)) buffer-files) - (let ((new-filename (buffer-file-name))) - (setf (flycheck-error-filename err) new-filename) - (when new-filename - (setf (flycheck-error-message err) - (replace-regexp-in-string - (regexp-quote filename) - new-filename - (flycheck-error-message err) - 'fixed-case - 'literal))))))) + (setf (flycheck-error-filename err) buffer-file-name) + (when (and buffer-file-name (flycheck-error-message err)) + (setf (flycheck-error-message err) + (replace-regexp-in-string + (regexp-quote filename) buffer-file-name + (flycheck-error-message err) 'fixed-case 'literal)))))) err) @@ -7489,35 +7507,37 @@ for more information about the custom directories." :safe #'flycheck-string-list-p :package-version '(flycheck . "29")) -(flycheck-def-config-file-var flycheck-eslintrc javascript-eslint nil - :safe #'stringp - :package-version '(flycheck . "0.20")) - (flycheck-define-checker javascript-eslint "A Javascript syntax and style checker using eslint. See URL `https://github.com/eslint/eslint'." :command ("eslint" "--format=checkstyle" - (config-file "--config" flycheck-eslintrc) (option-list "--rulesdir" flycheck-eslint-rules-directories) "--stdin" "--stdin-filename" source-original) :standard-input t :error-parser flycheck-parse-checkstyle - :error-filter (lambda (errors) - (seq-do (lambda (err) - ;; Parse error ID from the error message - (setf (flycheck-error-message err) - (replace-regexp-in-string - (rx " (" - (group (one-or-more (not (any ")")))) - ")" string-end) - (lambda (s) - (setf (flycheck-error-id err) - (match-string 1 s)) - "") - (flycheck-error-message err)))) - (flycheck-sanitize-errors errors)) - errors) + :error-filter + (lambda (errors) + (seq-do (lambda (err) + ;; Parse error ID from the error message + (setf (flycheck-error-message err) + (replace-regexp-in-string + (rx " (" + (group (one-or-more (not (any ")")))) + ")" string-end) + (lambda (s) + (setf (flycheck-error-id err) + (match-string 1 s)) + "") + (flycheck-error-message err)))) + (flycheck-sanitize-errors errors)) + errors) + :enabled + (lambda () + (let* ((executable (flycheck-find-checker-executable 'javascript-eslint)) + (exitcode (call-process executable nil nil nil + "--print-config" "."))) + (eq exitcode 0))) :modes (js-mode js-jsx-mode js2-mode js2-jsx-mode js3-mode) :next-checkers ((warning . javascript-jscs))) diff --git a/elpa/helm-20160925.2152/emacs-helm.sh b/elpa/helm-20160928.2212/emacs-helm.sh similarity index 100% rename from elpa/helm-20160925.2152/emacs-helm.sh rename to elpa/helm-20160928.2212/emacs-helm.sh diff --git a/elpa/helm-20160925.2152/helm-adaptive.el b/elpa/helm-20160928.2212/helm-adaptive.el similarity index 100% rename from elpa/helm-20160925.2152/helm-adaptive.el rename to elpa/helm-20160928.2212/helm-adaptive.el diff --git a/elpa/helm-20160925.2152/helm-apt.el b/elpa/helm-20160928.2212/helm-apt.el similarity index 100% rename from elpa/helm-20160925.2152/helm-apt.el rename to elpa/helm-20160928.2212/helm-apt.el diff --git a/elpa/helm-20160925.2152/helm-autoloads.el b/elpa/helm-20160928.2212/helm-autoloads.el similarity index 90% rename from elpa/helm-20160925.2152/helm-autoloads.el rename to elpa/helm-20160928.2212/helm-autoloads.el index d58fb0c..5a32730 100644 --- a/elpa/helm-20160925.2152/helm-autoloads.el +++ b/elpa/helm-20160928.2212/helm-autoloads.el @@ -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" (22505 21420 -;;;;;; 949826 366000)) +;;;### (autoloads nil "helm-adaptive" "helm-adaptive.el" (22508 49901 +;;;;;; 817972 734000)) ;;; 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" (22505 21420 917826 -;;;;;; 372000)) +;;;### (autoloads nil "helm-apt" "helm-apt.el" (22508 49901 785972 +;;;;;; 666000)) ;;; 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" (22505 21420 -;;;;;; 989826 364000)) +;;;### (autoloads nil "helm-bookmark" "helm-bookmark.el" (22508 49901 +;;;;;; 881972 872000)) ;;; 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" (22505 21420 -;;;;;; 905826 374000)) +;;;### (autoloads nil "helm-buffers" "helm-buffers.el" (22508 49901 +;;;;;; 769972 632000)) ;;; 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" (22505 21420 977826 -;;;;;; 363000)) +;;;### (autoloads nil "helm-color" "helm-color.el" (22508 49901 853972 +;;;;;; 812000)) ;;; 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" (22505 21420 -;;;;;; 865826 377000)) +;;;### (autoloads nil "helm-command" "helm-command.el" (22508 49901 +;;;;;; 725972 538000)) ;;; 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" (22505 21420 -;;;;;; 985826 363000)) +;;;### (autoloads nil "helm-config" "helm-config.el" (22508 49901 +;;;;;; 869972 846000)) ;;; Generated autoloads from helm-config.el (autoload 'helm-configuration "helm-config" "\ @@ -117,8 +117,8 @@ Customize `helm'. ;;;*** -;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22505 21420 -;;;;;; 925826 369000)) +;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22508 49901 +;;;;;; 793972 683000)) ;;; 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" (22505 21420 981826 -;;;;;; 362000)) +;;;### (autoloads nil "helm-elisp" "helm-elisp.el" (22508 49901 861972 +;;;;;; 828000)) ;;; 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" -;;;;;; (22505 21420 869826 376000)) +;;;;;; (22508 49901 729972 547000)) ;;; 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" (22505 21420 -;;;;;; 857826 381000)) +;;;### (autoloads nil "helm-elscreen" "helm-elscreen.el" (22508 49901 +;;;;;; 713972 512000)) ;;; 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" (22505 21420 -;;;;;; 885826 377000)) +;;;### (autoloads nil "helm-eshell" "helm-eshell.el" (22508 49901 +;;;;;; 745972 581000)) ;;; 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" (22505 21420 957826 -;;;;;; 367000)) +;;;### (autoloads nil "helm-eval" "helm-eval.el" (22508 49901 825972 +;;;;;; 752000)) ;;; 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" (22505 21420 -;;;;;; 841826 378000)) +;;;### (autoloads nil "helm-external" "helm-external.el" (22508 49901 +;;;;;; 701972 487000)) ;;; 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" (22505 21420 929826 -;;;;;; 370000)) +;;;### (autoloads nil "helm-files" "helm-files.el" (22508 49901 801972 +;;;;;; 701000)) ;;; 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" (22505 21420 889826 -;;;;;; 375000)) +;;;### (autoloads nil "helm-font" "helm-font.el" (22508 49901 749972 +;;;;;; 589000)) ;;; 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" (22505 21420 997826 -;;;;;; 363000)) +;;;### (autoloads nil "helm-grep" "helm-grep.el" (22508 49901 889972 +;;;;;; 888000)) ;;; 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" (22505 21420 837826 -;;;;;; 380000)) +;;;### (autoloads nil "helm-help" "helm-help.el" (22508 49901 697972 +;;;;;; 478000)) ;;; 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" (22505 21420 -;;;;;; 909826 374000)) +;;;### (autoloads nil "helm-id-utils" "helm-id-utils.el" (22508 49901 +;;;;;; 781972 658000)) ;;; Generated autoloads from helm-id-utils.el (autoload 'helm-gid "helm-id-utils" "\ @@ -435,8 +435,8 @@ See . ;;;*** -;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22505 21420 897826 -;;;;;; 373000)) +;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22508 49901 761972 +;;;;;; 615000)) ;;; 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" (22505 21420 893826 -;;;;;; 373000)) +;;;### (autoloads nil "helm-info" "helm-info.el" (22508 49901 753972 +;;;;;; 597000)) ;;; 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" (22505 21420 -;;;;;; 845826 379000)) +;;;### (autoloads nil "helm-locate" "helm-locate.el" (22508 49901 +;;;;;; 705972 496000)) ;;; 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" (22505 21420 961826 -;;;;;; 368000)) +;;;### (autoloads nil "helm-man" "helm-man.el" (22508 49901 829972 +;;;;;; 760000)) ;;; 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" (22505 21420 945826 -;;;;;; 368000)) +;;;### (autoloads nil "helm-misc" "helm-misc.el" (22508 49901 813972 +;;;;;; 726000)) ;;; 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" (22505 21420 829826 -;;;;;; 385000)) +;;;### (autoloads nil "helm-mode" "helm-mode.el" (22508 49901 681972 +;;;;;; 445000)) ;;; 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" (22505 21420 973826 -;;;;;; 365000)) +;;;### (autoloads nil "helm-net" "helm-net.el" (22508 49901 849972 +;;;;;; 803000)) ;;; 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" (22505 21421 1826 -;;;;;; 361000)) +;;;### (autoloads nil "helm-org" "helm-org.el" (22508 49901 893972 +;;;;;; 897000)) ;;; 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" (22505 21420 -;;;;;; 969826 367000)) +;;;### (autoloads nil "helm-regexp" "helm-regexp.el" (22508 49901 +;;;;;; 837972 778000)) ;;; 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" (22505 21420 833826 -;;;;;; 383000)) +;;;### (autoloads nil "helm-ring" "helm-ring.el" (22508 49901 693972 +;;;;;; 470000)) ;;; 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" (22505 21420 -;;;;;; 901826 374000)) +;;;### (autoloads nil "helm-semantic" "helm-semantic.el" (22508 49901 +;;;;;; 765972 624000)) ;;; 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" (22505 21420 921826 -;;;;;; 370000)) +;;;### (autoloads nil "helm-sys" "helm-sys.el" (22508 49901 789972 +;;;;;; 674000)) ;;; 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" (22505 21420 881826 -;;;;;; 378000)) +;;;### (autoloads nil "helm-tags" "helm-tags.el" (22508 49901 741972 +;;;;;; 572000)) ;;; 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" (22505 21420 861826 -;;;;;; 380000)) +;;;### (autoloads nil "helm-utils" "helm-utils.el" (22508 49901 717972 +;;;;;; 521000)) ;;; 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") -;;;;;; (22505 21421 5826 359000)) +;;;;;; (22508 49901 897972 906000)) ;;;*** diff --git a/elpa/helm-20160925.2152/helm-bookmark.el b/elpa/helm-20160928.2212/helm-bookmark.el similarity index 100% rename from elpa/helm-20160925.2152/helm-bookmark.el rename to elpa/helm-20160928.2212/helm-bookmark.el diff --git a/elpa/helm-20160925.2152/helm-buffers.el b/elpa/helm-20160928.2212/helm-buffers.el similarity index 100% rename from elpa/helm-20160925.2152/helm-buffers.el rename to elpa/helm-20160928.2212/helm-buffers.el diff --git a/elpa/helm-20160925.2152/helm-color.el b/elpa/helm-20160928.2212/helm-color.el similarity index 99% rename from elpa/helm-20160925.2152/helm-color.el rename to elpa/helm-20160928.2212/helm-color.el index c9e90a8..73f6e3d 100644 --- a/elpa/helm-20160925.2152/helm-color.el +++ b/elpa/helm-20160928.2212/helm-color.el @@ -19,6 +19,7 @@ (require 'cl-lib) (require 'helm) (require 'helm-help) +(require 'helm-elisp) ;;; Customize Face ;; diff --git a/elpa/helm-20160925.2152/helm-command.el b/elpa/helm-20160928.2212/helm-command.el similarity index 100% rename from elpa/helm-20160925.2152/helm-command.el rename to elpa/helm-20160928.2212/helm-command.el diff --git a/elpa/helm-20160925.2152/helm-config.el b/elpa/helm-20160928.2212/helm-config.el similarity index 100% rename from elpa/helm-20160925.2152/helm-config.el rename to elpa/helm-20160928.2212/helm-config.el diff --git a/elpa/helm-20160925.2152/helm-dabbrev.el b/elpa/helm-20160928.2212/helm-dabbrev.el similarity index 100% rename from elpa/helm-20160925.2152/helm-dabbrev.el rename to elpa/helm-20160928.2212/helm-dabbrev.el diff --git a/elpa/helm-20160925.2152/helm-easymenu.el b/elpa/helm-20160928.2212/helm-easymenu.el similarity index 100% rename from elpa/helm-20160925.2152/helm-easymenu.el rename to elpa/helm-20160928.2212/helm-easymenu.el diff --git a/elpa/helm-20160925.2152/helm-elisp-package.el b/elpa/helm-20160928.2212/helm-elisp-package.el similarity index 100% rename from elpa/helm-20160925.2152/helm-elisp-package.el rename to elpa/helm-20160928.2212/helm-elisp-package.el diff --git a/elpa/helm-20160925.2152/helm-elisp.el b/elpa/helm-20160928.2212/helm-elisp.el similarity index 99% rename from elpa/helm-20160925.2152/helm-elisp.el rename to elpa/helm-20160928.2212/helm-elisp.el index f181bfe..ddefa63 100644 --- a/elpa/helm-20160925.2152/helm-elisp.el +++ b/elpa/helm-20160928.2212/helm-elisp.el @@ -556,7 +556,6 @@ Filename completion happen if string start after or between a double quote." (helm-elisp--persistent-help candidate 'helm-describe-face)) :persistent-help "Describe face" - :nomark t :action '(("Describe face" . helm-describe-face) ("Find face" . helm-find-face-definition) ("Customize face" . (lambda (candidate) diff --git a/elpa/helm-20160925.2152/helm-elscreen.el b/elpa/helm-20160928.2212/helm-elscreen.el similarity index 100% rename from elpa/helm-20160925.2152/helm-elscreen.el rename to elpa/helm-20160928.2212/helm-elscreen.el diff --git a/elpa/helm-20160925.2152/helm-eshell.el b/elpa/helm-20160928.2212/helm-eshell.el similarity index 100% rename from elpa/helm-20160925.2152/helm-eshell.el rename to elpa/helm-20160928.2212/helm-eshell.el diff --git a/elpa/helm-20160925.2152/helm-eval.el b/elpa/helm-20160928.2212/helm-eval.el similarity index 100% rename from elpa/helm-20160925.2152/helm-eval.el rename to elpa/helm-20160928.2212/helm-eval.el diff --git a/elpa/helm-20160925.2152/helm-external.el b/elpa/helm-20160928.2212/helm-external.el similarity index 100% rename from elpa/helm-20160925.2152/helm-external.el rename to elpa/helm-20160928.2212/helm-external.el diff --git a/elpa/helm-20160925.2152/helm-files.el b/elpa/helm-20160928.2212/helm-files.el similarity index 100% rename from elpa/helm-20160925.2152/helm-files.el rename to elpa/helm-20160928.2212/helm-files.el diff --git a/elpa/helm-20160925.2152/helm-font.el b/elpa/helm-20160928.2212/helm-font.el similarity index 100% rename from elpa/helm-20160925.2152/helm-font.el rename to elpa/helm-20160928.2212/helm-font.el diff --git a/elpa/helm-20160925.2152/helm-grep.el b/elpa/helm-20160928.2212/helm-grep.el similarity index 100% rename from elpa/helm-20160925.2152/helm-grep.el rename to elpa/helm-20160928.2212/helm-grep.el diff --git a/elpa/helm-20160925.2152/helm-help.el b/elpa/helm-20160928.2212/helm-help.el similarity index 100% rename from elpa/helm-20160925.2152/helm-help.el rename to elpa/helm-20160928.2212/helm-help.el diff --git a/elpa/helm-20160925.2152/helm-id-utils.el b/elpa/helm-20160928.2212/helm-id-utils.el similarity index 100% rename from elpa/helm-20160925.2152/helm-id-utils.el rename to elpa/helm-20160928.2212/helm-id-utils.el diff --git a/elpa/helm-20160925.2152/helm-imenu.el b/elpa/helm-20160928.2212/helm-imenu.el similarity index 99% rename from elpa/helm-20160925.2152/helm-imenu.el rename to elpa/helm-20160928.2212/helm-imenu.el index 8cb8b8f..d12cf70 100644 --- a/elpa/helm-20160925.2152/helm-imenu.el +++ b/elpa/helm-20160928.2212/helm-imenu.el @@ -150,7 +150,7 @@ only '((foo . bar)) is needed." ;; no need to highlight again. (unless (eq imenu-default-goto-function 'semantic-imenu-goto-function) - (helm-highlight-current-line nil nil nil nil 'pulse))) + (helm-highlight-current-line))) (defun helm-imenu-persistent-action (candidate) "Default persistent action for `helm-source-imenu'." diff --git a/elpa/helm-20160925.2152/helm-info.el b/elpa/helm-20160928.2212/helm-info.el similarity index 100% rename from elpa/helm-20160925.2152/helm-info.el rename to elpa/helm-20160928.2212/helm-info.el diff --git a/elpa/helm-20160925.2152/helm-locate.el b/elpa/helm-20160928.2212/helm-locate.el similarity index 100% rename from elpa/helm-20160925.2152/helm-locate.el rename to elpa/helm-20160928.2212/helm-locate.el diff --git a/elpa/helm-20160925.2152/helm-man.el b/elpa/helm-20160928.2212/helm-man.el similarity index 100% rename from elpa/helm-20160925.2152/helm-man.el rename to elpa/helm-20160928.2212/helm-man.el diff --git a/elpa/helm-20160925.2152/helm-misc.el b/elpa/helm-20160928.2212/helm-misc.el similarity index 100% rename from elpa/helm-20160925.2152/helm-misc.el rename to elpa/helm-20160928.2212/helm-misc.el diff --git a/elpa/helm-20160925.2152/helm-mode.el b/elpa/helm-20160928.2212/helm-mode.el similarity index 100% rename from elpa/helm-20160925.2152/helm-mode.el rename to elpa/helm-20160928.2212/helm-mode.el diff --git a/elpa/helm-20160925.2152/helm-net.el b/elpa/helm-20160928.2212/helm-net.el similarity index 100% rename from elpa/helm-20160925.2152/helm-net.el rename to elpa/helm-20160928.2212/helm-net.el diff --git a/elpa/helm-20160925.2152/helm-org.el b/elpa/helm-20160928.2212/helm-org.el similarity index 100% rename from elpa/helm-20160925.2152/helm-org.el rename to elpa/helm-20160928.2212/helm-org.el diff --git a/elpa/helm-20160925.2152/helm-pkg.el b/elpa/helm-20160928.2212/helm-pkg.el similarity index 76% rename from elpa/helm-20160925.2152/helm-pkg.el rename to elpa/helm-20160928.2212/helm-pkg.el index 255ed19..775a85c 100644 --- a/elpa/helm-20160925.2152/helm-pkg.el +++ b/elpa/helm-20160928.2212/helm-pkg.el @@ -1,4 +1,4 @@ -(define-package "helm" "20160925.2152" "Helm is an Emacs incremental and narrowing framework" +(define-package "helm" "20160928.2212" "Helm is an Emacs incremental and narrowing framework" '((emacs "24.4") (async "1.9") (popup "0.5.3") diff --git a/elpa/helm-20160925.2152/helm-regexp.el b/elpa/helm-20160928.2212/helm-regexp.el similarity index 100% rename from elpa/helm-20160925.2152/helm-regexp.el rename to elpa/helm-20160928.2212/helm-regexp.el diff --git a/elpa/helm-20160925.2152/helm-ring.el b/elpa/helm-20160928.2212/helm-ring.el similarity index 100% rename from elpa/helm-20160925.2152/helm-ring.el rename to elpa/helm-20160928.2212/helm-ring.el diff --git a/elpa/helm-20160925.2152/helm-semantic.el b/elpa/helm-20160928.2212/helm-semantic.el similarity index 100% rename from elpa/helm-20160925.2152/helm-semantic.el rename to elpa/helm-20160928.2212/helm-semantic.el diff --git a/elpa/helm-20160925.2152/helm-sys.el b/elpa/helm-20160928.2212/helm-sys.el similarity index 100% rename from elpa/helm-20160925.2152/helm-sys.el rename to elpa/helm-20160928.2212/helm-sys.el diff --git a/elpa/helm-20160925.2152/helm-tags.el b/elpa/helm-20160928.2212/helm-tags.el similarity index 100% rename from elpa/helm-20160925.2152/helm-tags.el rename to elpa/helm-20160928.2212/helm-tags.el diff --git a/elpa/helm-20160925.2152/helm-types.el b/elpa/helm-20160928.2212/helm-types.el similarity index 100% rename from elpa/helm-20160925.2152/helm-types.el rename to elpa/helm-20160928.2212/helm-types.el diff --git a/elpa/helm-20160925.2152/helm-utils.el b/elpa/helm-20160928.2212/helm-utils.el similarity index 99% rename from elpa/helm-20160925.2152/helm-utils.el rename to elpa/helm-20160928.2212/helm-utils.el index 5c8c533..63bcdb8 100644 --- a/elpa/helm-20160925.2152/helm-utils.el +++ b/elpa/helm-20160928.2212/helm-utils.el @@ -266,10 +266,11 @@ Default is `helm-current-buffer'." "Goto LINENO opening only outline headline if needed. Animation is used unless NOANIM is non--nil." (helm-log-run-hook 'helm-goto-line-before-hook) + (helm-match-line-cleanup) (goto-char (point-min)) (helm-goto-char (point-at-bol lineno)) (unless noanim - (helm-highlight-current-line nil nil nil nil 'pulse))) + (helm-highlight-current-line))) (defun helm-save-pos-to-register-before-jump () "Save current buffer position to `helm-save-pos-before-jump-register'. @@ -583,7 +584,7 @@ If STRING is non--nil return instead a space separated string." (defvar helm-match-line-overlay nil) (defvar helm--match-item-overlays nil) -(defun helm-highlight-current-line (&optional start end buf face pulse) +(defun helm-highlight-current-line (&optional start end buf face) "Highlight and underline current position" (let* ((start (or start (line-beginning-position))) (end (or end (1+ (line-end-position)))) @@ -626,10 +627,7 @@ If STRING is non--nil return instead a space separated string." helm--match-item-overlays) (overlay-put ov 'face 'helm-match-item) (overlay-put ov 'priority 1))))))) - (recenter) - (when pulse - (sit-for 0.3) - (helm-match-line-cleanup)))) + (recenter))) (defun helm-match-line-cleanup () (when helm-match-line-overlay @@ -649,8 +647,12 @@ If STRING is non--nil return instead a space separated string." (eq helm-split-window-state 'vertical)) (set-window-text-height (helm-window) helm-resize-on-pa-text-height))) +(defun helm-match-line-cleanup-pulse () + (run-with-idle-timer 0.3 nil #'helm-match-line-cleanup)) + (add-hook 'helm-after-persistent-action-hook 'helm-persistent-autoresize-hook) (add-hook 'helm-cleanup-hook 'helm-match-line-cleanup) +(add-hook 'helm-after-action-hook 'helm-match-line-cleanup-pulse) (add-hook 'helm-after-persistent-action-hook 'helm-match-line-update) ;;; Popup buffer-name or filename in grep/moccur/imenu-all. diff --git a/elpa/helm-core-20160922.2327/helm-core-autoloads.el b/elpa/helm-core-20160928.324/helm-core-autoloads.el similarity index 94% rename from elpa/helm-core-20160922.2327/helm-core-autoloads.el rename to elpa/helm-core-20160928.324/helm-core-autoloads.el index aa1a4ea..314d618 100644 --- a/elpa/helm-core-20160922.2327/helm-core-autoloads.el +++ b/elpa/helm-core-20160928.324/helm-core-autoloads.el @@ -1,9 +1,9 @@ ;;; helm-core-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 "helm" "helm.el" (22501 3218 180164 860000)) +;;;### (autoloads nil "helm" "helm.el" (22508 49900 897970 770000)) ;;; Generated autoloads from helm.el (autoload 'helm-define-multi-key "helm" "\ @@ -35,7 +35,7 @@ See `helm-define-multi-key'. \(fn NAME DOCSTRING FUNS &optional DELAY)" nil t) -(put 'helm-multi-key-defun 'lisp-indent-function '2) +(function-put 'helm-multi-key-defun 'lisp-indent-function '2) (autoload 'helm-define-key-with-subkeys "helm" "\ Defines in MAP a KEY and SUBKEY to COMMAND. @@ -69,7 +69,7 @@ NOTE: SUBKEY and OTHER-SUBKEYS bindings support char syntax only \(fn MAP KEY SUBKEY COMMAND &optional OTHER-SUBKEYS MENU EXIT-FN)" nil nil) -(put 'helm-define-key-with-subkeys 'lisp-indent-function '1) +(function-put 'helm-define-key-with-subkeys 'lisp-indent-function '1) (autoload 'helm-debug-open-last-log "helm" "\ Open helm log file or buffer of last helm session. @@ -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") (22501 3218 218183 514000)) +;;;;;; "helm-source.el") (22508 49900 909970 796000)) ;;;*** diff --git a/elpa/helm-core-20160922.2327/helm-core-pkg.el b/elpa/helm-core-20160928.324/helm-core-pkg.el similarity index 64% rename from elpa/helm-core-20160922.2327/helm-core-pkg.el rename to elpa/helm-core-20160928.324/helm-core-pkg.el index af21da2..736a335 100644 --- a/elpa/helm-core-20160922.2327/helm-core-pkg.el +++ b/elpa/helm-core-20160928.324/helm-core-pkg.el @@ -1,4 +1,4 @@ -(define-package "helm-core" "20160922.2327" "Development files for Helm" +(define-package "helm-core" "20160928.324" "Development files for Helm" '((emacs "24.4") (async "1.9")) :url "https://emacs-helm.github.io/helm/") diff --git a/elpa/helm-core-20160922.2327/helm-lib.el b/elpa/helm-core-20160928.324/helm-lib.el similarity index 99% rename from elpa/helm-core-20160922.2327/helm-lib.el rename to elpa/helm-core-20160928.324/helm-lib.el index d7d3fd6..fb89b82 100644 --- a/elpa/helm-core-20160922.2327/helm-lib.el +++ b/elpa/helm-core-20160928.324/helm-lib.el @@ -549,8 +549,11 @@ Add spaces at end if needed to reach WIDTH when STR is shorter than WIDTH." (defun helm-describe-face (face) "FACE is symbol or string." - (cl-letf (((symbol-function 'message) #'ignore)) - (describe-face (helm-symbolify face)))) + (let ((faces (helm-marked-candidates))) + (cl-letf (((symbol-function 'message) #'ignore)) + (describe-face (if (cdr faces) + (mapcar 'helm-symbolify faces) + (helm-symbolify face)))))) (defun helm-find-function (func) "FUNC is symbol or string." diff --git a/elpa/helm-core-20160922.2327/helm-multi-match.el b/elpa/helm-core-20160928.324/helm-multi-match.el similarity index 100% rename from elpa/helm-core-20160922.2327/helm-multi-match.el rename to elpa/helm-core-20160928.324/helm-multi-match.el diff --git a/elpa/helm-core-20160922.2327/helm-source.el b/elpa/helm-core-20160928.324/helm-source.el similarity index 100% rename from elpa/helm-core-20160922.2327/helm-source.el rename to elpa/helm-core-20160928.324/helm-source.el diff --git a/elpa/helm-core-20160922.2327/helm.el b/elpa/helm-core-20160928.324/helm.el similarity index 99% rename from elpa/helm-core-20160922.2327/helm.el rename to elpa/helm-core-20160928.324/helm.el index f5968cb..8668b3a 100644 --- a/elpa/helm-core-20160922.2327/helm.el +++ b/elpa/helm-core-20160928.324/helm.el @@ -1836,7 +1836,6 @@ ANY-KEYMAP ANY-DEFAULT ANY-HISTORY See `helm'." ;; Prevent mouse jumping to the upper-right ;; hand corner of the frame (#1538). mouse-autoselect-window - mode-line-in-non-selected-windows focus-follows-mouse (input-method-verbose-flag helm-input-method-verbose-flag) (old--cua cua-mode) diff --git a/elpa/helm-flyspell-20160612.1640/helm-flyspell-pkg.el b/elpa/helm-flyspell-20160612.1640/helm-flyspell-pkg.el deleted file mode 100644 index 4954e68..0000000 --- a/elpa/helm-flyspell-20160612.1640/helm-flyspell-pkg.el +++ /dev/null @@ -1 +0,0 @@ -(define-package "helm-flyspell" "20160612.1640" "No description available." 'nil) diff --git a/elpa/helm-flyspell-20160612.1640/helm-flyspell-autoloads.el b/elpa/helm-flyspell-20160927.1648/helm-flyspell-autoloads.el similarity index 69% rename from elpa/helm-flyspell-20160612.1640/helm-flyspell-autoloads.el rename to elpa/helm-flyspell-20160927.1648/helm-flyspell-autoloads.el index 6301494..d27be29 100644 --- a/elpa/helm-flyspell-20160612.1640/helm-flyspell-autoloads.el +++ b/elpa/helm-flyspell-20160927.1648/helm-flyspell-autoloads.el @@ -1,10 +1,10 @@ ;;; helm-flyspell-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 "helm-flyspell" "helm-flyspell.el" (22387 29364 -;;;;;; 594723 244000)) +;;;### (autoloads nil "helm-flyspell" "helm-flyspell.el" (22508 49900 +;;;;;; 277969 440000)) ;;; Generated autoloads from helm-flyspell.el (autoload 'helm-flyspell-correct "helm-flyspell" "\ diff --git a/elpa/helm-flyspell-20160927.1648/helm-flyspell-pkg.el b/elpa/helm-flyspell-20160927.1648/helm-flyspell-pkg.el new file mode 100644 index 0000000..23194bb --- /dev/null +++ b/elpa/helm-flyspell-20160927.1648/helm-flyspell-pkg.el @@ -0,0 +1,2 @@ +;;; -*- no-byte-compile: t -*- +(define-package "helm-flyspell" "20160927.1648" "Helm extension for correcting words with flyspell" '((helm "1.6.5")) :url "https://github.com/pronobis/helm-flyspell" :keywords '("convenience")) diff --git a/elpa/helm-flyspell-20160612.1640/helm-flyspell.el b/elpa/helm-flyspell-20160927.1648/helm-flyspell.el similarity index 97% rename from elpa/helm-flyspell-20160612.1640/helm-flyspell.el rename to elpa/helm-flyspell-20160927.1648/helm-flyspell.el index 763cba8..4bdcbbf 100644 --- a/elpa/helm-flyspell-20160612.1640/helm-flyspell.el +++ b/elpa/helm-flyspell-20160927.1648/helm-flyspell.el @@ -1,10 +1,10 @@ -;;; helm-flyspell.el -- Helm extension for correcting words with flyspell -*- lexical-binding: t; -*- +;;; helm-flyspell.el --- Helm extension for correcting words with flyspell -*- lexical-binding: t; -*- ;; Copyright (C) 2014 Andrzej Pronobis ;; Author: Andrzej Pronobis ;; URL: https://github.com/pronobis/helm-flyspell -;; Package-Version: 20160612.1640 +;; Package-Version: 20160927.1648 ;; Keywords: convenience ;; Package-Requires: ((helm "1.6.5")) diff --git a/elpa/js2-mode-20160926.723/js2-imenu-extras.el b/elpa/js2-mode-20160926.1243/js2-imenu-extras.el similarity index 100% rename from elpa/js2-mode-20160926.723/js2-imenu-extras.el rename to elpa/js2-mode-20160926.1243/js2-imenu-extras.el diff --git a/elpa/js2-mode-20160926.723/js2-mode-autoloads.el b/elpa/js2-mode-20160926.1243/js2-mode-autoloads.el similarity index 91% rename from elpa/js2-mode-20160926.723/js2-mode-autoloads.el rename to elpa/js2-mode-20160926.1243/js2-mode-autoloads.el index de63385..c2b356a 100644 --- a/elpa/js2-mode-20160926.723/js2-mode-autoloads.el +++ b/elpa/js2-mode-20160926.1243/js2-mode-autoloads.el @@ -3,8 +3,8 @@ ;;; Code: (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) -;;;### (autoloads nil "js2-imenu-extras" "js2-imenu-extras.el" (22505 -;;;;;; 21387 313830 549000)) +;;;### (autoloads nil "js2-imenu-extras" "js2-imenu-extras.el" (22508 +;;;;;; 49890 901948 818000)) ;;; Generated autoloads from js2-imenu-extras.el (autoload 'js2-imenu-extras-setup "js2-imenu-extras" "\ @@ -19,8 +19,8 @@ Toggle Imenu support for frameworks and structural patterns. ;;;*** -;;;### (autoloads nil "js2-mode" "js2-mode.el" (22505 21387 337830 -;;;;;; 546000)) +;;;### (autoloads nil "js2-mode" "js2-mode.el" (22508 49890 917948 +;;;;;; 854000)) ;;; Generated autoloads from js2-mode.el (autoload 'js2-highlight-unused-variables-mode "js2-mode" "\ @@ -56,7 +56,7 @@ variables (`sgml-basic-offset' et al) locally, like so: ;;;*** ;;;### (autoloads nil nil ("js2-mode-pkg.el" "js2-old-indent.el") -;;;;;; (22505 21387 329830 547000)) +;;;;;; (22508 49890 913948 845000)) ;;;*** diff --git a/elpa/js2-mode-20160926.723/js2-mode-pkg.el b/elpa/js2-mode-20160926.1243/js2-mode-pkg.el similarity index 68% rename from elpa/js2-mode-20160926.723/js2-mode-pkg.el rename to elpa/js2-mode-20160926.1243/js2-mode-pkg.el index 08c9ead..49a9ade 100644 --- a/elpa/js2-mode-20160926.723/js2-mode-pkg.el +++ b/elpa/js2-mode-20160926.1243/js2-mode-pkg.el @@ -1,4 +1,4 @@ -(define-package "js2-mode" "20160926.723" "Improved JavaScript editing mode" +(define-package "js2-mode" "20160926.1243" "Improved JavaScript editing mode" '((emacs "24.1") (cl-lib "0.5")) :url "https://github.com/mooz/js2-mode/" :keywords diff --git a/elpa/js2-mode-20160926.723/js2-mode.el b/elpa/js2-mode-20160926.1243/js2-mode.el similarity index 99% rename from elpa/js2-mode-20160926.723/js2-mode.el rename to elpa/js2-mode-20160926.1243/js2-mode.el index 1e7f61b..e6d1c00 100644 --- a/elpa/js2-mode-20160926.723/js2-mode.el +++ b/elpa/js2-mode-20160926.1243/js2-mode.el @@ -7283,7 +7283,7 @@ are ignored." when (and (eq 'block (js2-comment-node-format node)) (save-excursion (goto-char (js2-node-abs-pos node)) - (looking-at "/\\* *global "))) + (looking-at "/\\* *global\\(?: \\|$\\)"))) append (js2-get-jslint-globals-in (match-end 0) (js2-node-abs-end node)))) diff --git a/elpa/js2-mode-20160926.723/js2-old-indent.el b/elpa/js2-mode-20160926.1243/js2-old-indent.el similarity index 100% rename from elpa/js2-mode-20160926.723/js2-old-indent.el rename to elpa/js2-mode-20160926.1243/js2-old-indent.el diff --git a/elpa/magit-20160926.517/AUTHORS.md b/elpa/magit-20160927.510/AUTHORS.md similarity index 100% rename from elpa/magit-20160926.517/AUTHORS.md rename to elpa/magit-20160927.510/AUTHORS.md diff --git a/elpa/magit-20160926.517/COPYING b/elpa/magit-20160927.510/COPYING similarity index 100% rename from elpa/magit-20160926.517/COPYING rename to elpa/magit-20160927.510/COPYING diff --git a/elpa/magit-20160926.517/dir b/elpa/magit-20160927.510/dir similarity index 100% rename from elpa/magit-20160926.517/dir rename to elpa/magit-20160927.510/dir diff --git a/elpa/magit-20160926.517/git-rebase.el b/elpa/magit-20160927.510/git-rebase.el similarity index 100% rename from elpa/magit-20160926.517/git-rebase.el rename to elpa/magit-20160927.510/git-rebase.el diff --git a/elpa/magit-20160926.517/magit-apply.el b/elpa/magit-20160927.510/magit-apply.el similarity index 100% rename from elpa/magit-20160926.517/magit-apply.el rename to elpa/magit-20160927.510/magit-apply.el diff --git a/elpa/magit-20160926.517/magit-autoloads.el b/elpa/magit-20160927.510/magit-autoloads.el similarity index 97% rename from elpa/magit-20160926.517/magit-autoloads.el rename to elpa/magit-20160927.510/magit-autoloads.el index b606671..2f0bfac 100644 --- a/elpa/magit-20160926.517/magit-autoloads.el +++ b/elpa/magit-20160927.510/magit-autoloads.el @@ -3,8 +3,8 @@ ;;; Code: (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) -;;;### (autoloads nil "git-rebase" "git-rebase.el" (22505 21412 141827 -;;;;;; 463000)) +;;;### (autoloads nil "git-rebase" "git-rebase.el" (22508 49899 553967 +;;;;;; 882000)) ;;; Generated autoloads from git-rebase.el (autoload 'git-rebase-mode "git-rebase" "\ @@ -23,7 +23,7 @@ running 'man git-rebase' at the command line) for details. ;;;*** -;;;### (autoloads nil "magit" "magit.el" (22505 21412 205827 455000)) +;;;### (autoloads nil "magit" "magit.el" (22508 49899 645968 80000)) ;;; Generated autoloads from magit.el (autoload 'magit-status "magit" "\ @@ -490,8 +490,8 @@ Git, and Emacs in the echo area. ;;;*** -;;;### (autoloads nil "magit-apply" "magit-apply.el" (22505 21412 -;;;;;; 157827 461000)) +;;;### (autoloads nil "magit-apply" "magit-apply.el" (22508 49899 +;;;;;; 581967 942000)) ;;; Generated autoloads from magit-apply.el (autoload 'magit-stage-file "magit-apply" "\ @@ -527,8 +527,8 @@ Remove all changes from the staging area. ;;;*** -;;;### (autoloads nil "magit-autorevert" "magit-autorevert.el" (22505 -;;;;;; 21412 101827 468000)) +;;;### (autoloads nil "magit-autorevert" "magit-autorevert.el" (22508 +;;;;;; 49899 517967 805000)) ;;; Generated autoloads from magit-autorevert.el (defvar magit-revert-buffers t) @@ -557,8 +557,8 @@ See `auto-revert-mode' for more information on Auto-Revert mode. ;;;*** -;;;### (autoloads nil "magit-bisect" "magit-bisect.el" (22505 21412 -;;;;;; 153827 461000)) +;;;### (autoloads nil "magit-bisect" "magit-bisect.el" (22508 49899 +;;;;;; 573967 925000)) ;;; Generated autoloads from magit-bisect.el (autoload 'magit-bisect-popup "magit-bisect" nil t) @@ -609,8 +609,8 @@ bisect run'. ;;;*** -;;;### (autoloads nil "magit-blame" "magit-blame.el" (22505 21412 -;;;;;; 193827 456000)) +;;;### (autoloads nil "magit-blame" "magit-blame.el" (22508 49899 +;;;;;; 633968 55000)) ;;; Generated autoloads from magit-blame.el (autoload 'magit-blame-popup "magit-blame" nil t) @@ -634,8 +634,8 @@ only arguments available from `magit-blame-popup' should be used. ;;;*** -;;;### (autoloads nil "magit-commit" "magit-commit.el" (22505 21412 -;;;;;; 109827 467000)) +;;;### (autoloads nil "magit-commit" "magit-commit.el" (22508 49899 +;;;;;; 521967 813000)) ;;; Generated autoloads from magit-commit.el (autoload 'magit-commit "magit-commit" "\ @@ -717,8 +717,8 @@ Create a squash commit targeting COMMIT and instantly rebase. ;;;*** -;;;### (autoloads nil "magit-diff" "magit-diff.el" (22505 21412 185827 -;;;;;; 457000)) +;;;### (autoloads nil "magit-diff" "magit-diff.el" (22508 49899 625968 +;;;;;; 38000)) ;;; Generated autoloads from magit-diff.el (autoload 'magit-diff-popup "magit-diff" "\ @@ -802,8 +802,8 @@ for a revision. ;;;*** -;;;### (autoloads nil "magit-ediff" "magit-ediff.el" (22505 21412 -;;;;;; 177827 458000)) +;;;### (autoloads nil "magit-ediff" "magit-ediff.el" (22508 49899 +;;;;;; 613968 12000)) ;;; Generated autoloads from magit-ediff.el (autoload 'magit-ediff-popup "magit-ediff" nil t) @@ -891,8 +891,8 @@ stash that were staged. ;;;*** -;;;### (autoloads nil "magit-extras" "magit-extras.el" (22505 21412 -;;;;;; 121827 465000)) +;;;### (autoloads nil "magit-extras" "magit-extras.el" (22508 49899 +;;;;;; 529967 831000)) ;;; Generated autoloads from magit-extras.el (autoload 'magit-run-git-gui "magit-extras" "\ @@ -962,8 +962,8 @@ on a position in a file-visiting buffer. ;;;*** -;;;### (autoloads nil "magit-log" "magit-log.el" (22505 21412 181827 -;;;;;; 458000)) +;;;### (autoloads nil "magit-log" "magit-log.el" (22508 49899 617968 +;;;;;; 20000)) ;;; Generated autoloads from magit-log.el (autoload 'magit-log-buffer-file-popup "magit-log" "\ @@ -1045,8 +1045,8 @@ Show commits in a branch that are not merged in the upstream branch. ;;;*** -;;;### (autoloads nil "magit-remote" "magit-remote.el" (22505 21412 -;;;;;; 217827 453000)) +;;;### (autoloads nil "magit-remote" "magit-remote.el" (22508 49899 +;;;;;; 657968 106000)) ;;; Generated autoloads from magit-remote.el (autoload 'magit-clone "magit-remote" "\ @@ -1278,8 +1278,8 @@ is asked to pull. START has to be reachable from that commit. ;;;*** -;;;### (autoloads nil "magit-sequence" "magit-sequence.el" (22505 -;;;;;; 21412 209827 454000)) +;;;### (autoloads nil "magit-sequence" "magit-sequence.el" (22508 +;;;;;; 49899 649968 89000)) ;;; Generated autoloads from magit-sequence.el (autoload 'magit-sequencer-continue "magit-sequence" "\ @@ -1429,8 +1429,8 @@ Abort the current rebase operation, restoring the original branch. ;;;*** -;;;### (autoloads nil "magit-stash" "magit-stash.el" (22505 21412 -;;;;;; 169827 459000)) +;;;### (autoloads nil "magit-stash" "magit-stash.el" (22508 49899 +;;;;;; 597967 977000)) ;;; Generated autoloads from magit-stash.el (autoload 'magit-stash-popup "magit-stash" nil t) @@ -1529,8 +1529,8 @@ Show all diffs of a stash in a buffer. ;;;*** -;;;### (autoloads nil "magit-submodule" "magit-submodule.el" (22505 -;;;;;; 21412 229827 452000)) +;;;### (autoloads nil "magit-submodule" "magit-submodule.el" (22508 +;;;;;; 49899 681968 158000)) ;;; Generated autoloads from magit-submodule.el (autoload 'magit-submodule-popup "magit-submodule" nil t) @@ -1620,8 +1620,8 @@ Display a list of the current repository's submodules. ;;;*** -;;;### (autoloads nil "magit-subtree" "magit-subtree.el" (22505 21412 -;;;;;; 145827 462000)) +;;;### (autoloads nil "magit-subtree" "magit-subtree.el" (22508 49899 +;;;;;; 565967 908000)) ;;; Generated autoloads from magit-subtree.el (autoload 'magit-subtree-popup "magit-subtree" nil t) @@ -1657,8 +1657,8 @@ Extract the history of the subtree PREFIX. ;;;*** -;;;### (autoloads nil "magit-wip" "magit-wip.el" (22505 21412 129827 -;;;;;; 464000)) +;;;### (autoloads nil "magit-wip" "magit-wip.el" (22508 49899 541967 +;;;;;; 857000)) ;;; Generated autoloads from magit-wip.el (defvar magit-wip-after-save-mode nil "\ @@ -1728,7 +1728,7 @@ command which is about to be called are committed. ;;;### (autoloads nil nil ("magit-core.el" "magit-git.el" "magit-mode.el" ;;;;;; "magit-pkg.el" "magit-process.el" "magit-section.el" "magit-utils.el") -;;;;;; (22505 21412 221827 453000)) +;;;;;; (22508 49899 669968 132000)) ;;;*** diff --git a/elpa/magit-20160926.517/magit-autorevert.el b/elpa/magit-20160927.510/magit-autorevert.el similarity index 100% rename from elpa/magit-20160926.517/magit-autorevert.el rename to elpa/magit-20160927.510/magit-autorevert.el diff --git a/elpa/magit-20160926.517/magit-bisect.el b/elpa/magit-20160927.510/magit-bisect.el similarity index 100% rename from elpa/magit-20160926.517/magit-bisect.el rename to elpa/magit-20160927.510/magit-bisect.el diff --git a/elpa/magit-20160926.517/magit-blame.el b/elpa/magit-20160927.510/magit-blame.el similarity index 100% rename from elpa/magit-20160926.517/magit-blame.el rename to elpa/magit-20160927.510/magit-blame.el diff --git a/elpa/magit-20160926.517/magit-commit.el b/elpa/magit-20160927.510/magit-commit.el similarity index 100% rename from elpa/magit-20160926.517/magit-commit.el rename to elpa/magit-20160927.510/magit-commit.el diff --git a/elpa/magit-20160926.517/magit-core.el b/elpa/magit-20160927.510/magit-core.el similarity index 100% rename from elpa/magit-20160926.517/magit-core.el rename to elpa/magit-20160927.510/magit-core.el diff --git a/elpa/magit-20160926.517/magit-diff.el b/elpa/magit-20160927.510/magit-diff.el similarity index 99% rename from elpa/magit-20160926.517/magit-diff.el rename to elpa/magit-20160927.510/magit-diff.el index a932fca..23132e1 100644 --- a/elpa/magit-20160926.517/magit-diff.el +++ b/elpa/magit-20160927.510/magit-diff.el @@ -1026,10 +1026,12 @@ which, as the name suggests always visits the actual file." (magit-display-file-buffer buffer) (with-current-buffer buffer (when line - (goto-char (point-min)) - (forward-line (1- line)) - (when col - (move-to-column col))) + (save-restriction + (widen) + (goto-char (point-min)) + (forward-line (1- line)) + (when col + (move-to-column col)))) (when unmerged-p (smerge-start-session)) (run-hooks 'magit-diff-visit-file-hook))))) diff --git a/elpa/magit-20160926.517/magit-ediff.el b/elpa/magit-20160927.510/magit-ediff.el similarity index 100% rename from elpa/magit-20160926.517/magit-ediff.el rename to elpa/magit-20160927.510/magit-ediff.el diff --git a/elpa/magit-20160926.517/magit-extras.el b/elpa/magit-20160927.510/magit-extras.el similarity index 100% rename from elpa/magit-20160926.517/magit-extras.el rename to elpa/magit-20160927.510/magit-extras.el diff --git a/elpa/magit-20160926.517/magit-git.el b/elpa/magit-20160927.510/magit-git.el similarity index 100% rename from elpa/magit-20160926.517/magit-git.el rename to elpa/magit-20160927.510/magit-git.el diff --git a/elpa/magit-20160926.517/magit-log.el b/elpa/magit-20160927.510/magit-log.el similarity index 100% rename from elpa/magit-20160926.517/magit-log.el rename to elpa/magit-20160927.510/magit-log.el diff --git a/elpa/magit-20160926.517/magit-mode.el b/elpa/magit-20160927.510/magit-mode.el similarity index 100% rename from elpa/magit-20160926.517/magit-mode.el rename to elpa/magit-20160927.510/magit-mode.el diff --git a/elpa/magit-20160926.517/magit-pkg.el b/elpa/magit-20160927.510/magit-pkg.el similarity index 82% rename from elpa/magit-20160926.517/magit-pkg.el rename to elpa/magit-20160927.510/magit-pkg.el index 597f4ea..72cc162 100644 --- a/elpa/magit-20160926.517/magit-pkg.el +++ b/elpa/magit-20160927.510/magit-pkg.el @@ -1,4 +1,4 @@ -(define-package "magit" "20160926.517" "A Git porcelain inside Emacs" +(define-package "magit" "20160927.510" "A Git porcelain inside Emacs" '((emacs "24.4") (async "20160711.223") (dash "20160820.501") diff --git a/elpa/magit-20160926.517/magit-process.el b/elpa/magit-20160927.510/magit-process.el similarity index 100% rename from elpa/magit-20160926.517/magit-process.el rename to elpa/magit-20160927.510/magit-process.el diff --git a/elpa/magit-20160926.517/magit-remote.el b/elpa/magit-20160927.510/magit-remote.el similarity index 100% rename from elpa/magit-20160926.517/magit-remote.el rename to elpa/magit-20160927.510/magit-remote.el diff --git a/elpa/magit-20160926.517/magit-section.el b/elpa/magit-20160927.510/magit-section.el similarity index 100% rename from elpa/magit-20160926.517/magit-section.el rename to elpa/magit-20160927.510/magit-section.el diff --git a/elpa/magit-20160926.517/magit-sequence.el b/elpa/magit-20160927.510/magit-sequence.el similarity index 100% rename from elpa/magit-20160926.517/magit-sequence.el rename to elpa/magit-20160927.510/magit-sequence.el diff --git a/elpa/magit-20160926.517/magit-stash.el b/elpa/magit-20160927.510/magit-stash.el similarity index 100% rename from elpa/magit-20160926.517/magit-stash.el rename to elpa/magit-20160927.510/magit-stash.el diff --git a/elpa/magit-20160926.517/magit-submodule.el b/elpa/magit-20160927.510/magit-submodule.el similarity index 100% rename from elpa/magit-20160926.517/magit-submodule.el rename to elpa/magit-20160927.510/magit-submodule.el diff --git a/elpa/magit-20160926.517/magit-subtree.el b/elpa/magit-20160927.510/magit-subtree.el similarity index 100% rename from elpa/magit-20160926.517/magit-subtree.el rename to elpa/magit-20160927.510/magit-subtree.el diff --git a/elpa/magit-20160926.517/magit-utils.el b/elpa/magit-20160927.510/magit-utils.el similarity index 100% rename from elpa/magit-20160926.517/magit-utils.el rename to elpa/magit-20160927.510/magit-utils.el diff --git a/elpa/magit-20160926.517/magit-wip.el b/elpa/magit-20160927.510/magit-wip.el similarity index 100% rename from elpa/magit-20160926.517/magit-wip.el rename to elpa/magit-20160927.510/magit-wip.el diff --git a/elpa/magit-20160926.517/magit.el b/elpa/magit-20160927.510/magit.el similarity index 100% rename from elpa/magit-20160926.517/magit.el rename to elpa/magit-20160927.510/magit.el diff --git a/elpa/magit-20160926.517/magit.info b/elpa/magit-20160927.510/magit.info similarity index 100% rename from elpa/magit-20160926.517/magit.info rename to elpa/magit-20160927.510/magit.info diff --git a/elpa/magit-20160926.517/magit.info-1 b/elpa/magit-20160927.510/magit.info-1 similarity index 100% rename from elpa/magit-20160926.517/magit.info-1 rename to elpa/magit-20160927.510/magit.info-1 diff --git a/elpa/magit-20160926.517/magit.info-2 b/elpa/magit-20160927.510/magit.info-2 similarity index 100% rename from elpa/magit-20160926.517/magit.info-2 rename to elpa/magit-20160927.510/magit.info-2 diff --git a/elpa/magithub-20160926.2044/magithub-autoloads.el b/elpa/magithub-20160928.1650/magithub-autoloads.el similarity index 93% rename from elpa/magithub-20160926.2044/magithub-autoloads.el rename to elpa/magithub-20160928.1650/magithub-autoloads.el index 46b11bc..c3594aa 100644 --- a/elpa/magithub-20160926.2044/magithub-autoloads.el +++ b/elpa/magithub-20160928.1650/magithub-autoloads.el @@ -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") (22506 -;;;;;; 26931 120335 726000)) +;;;;;; "magithub-issue.el" "magithub-pkg.el" "magithub.el") (22508 +;;;;;; 49897 853964 203000)) ;;;*** diff --git a/elpa/magithub-20160926.2044/magithub-cache.el b/elpa/magithub-20160928.1650/magithub-cache.el similarity index 55% rename from elpa/magithub-20160926.2044/magithub-cache.el rename to elpa/magithub-20160928.1650/magithub-cache.el index 7a872f5..3c5ab5d 100644 --- a/elpa/magithub-20160926.2044/magithub-cache.el +++ b/elpa/magithub-20160928.1650/magithub-cache.el @@ -24,43 +24,64 @@ ;;; Code: -(defvar magithub-cache--cache (make-hash-table) - "A hash table to use as a cache. +(require 'magithub-core) + +(defvar magithub-cache--cache () + "An alist of hash tables to use as thr cache. Entries are of the form (time-entered . value).") (defvar magithub-cache-refresh-seconds-plist - (list :issues 600 :ci-status 60) + (list :issues 600 :ci-status 60 t 60) "The number of seconds that have to pass for GitHub data to be considered outdated.") -(defun magithub-cache (cache default) +(defun magithub-cache--get-table (repo) + (declare (indent defun)) + (let ((table (cdr (assoc repo magithub-cache--cache)))) + (unless table + (add-to-list 'magithub-cache--cache (cons repo (make-hash-table))) + (setq table (cdr (assoc repo magithub-cache--cache)))) + table)) + +(defun magithub-cache--table (table cache default) "The cached value for CACHE (set to DEFAULT if necessary)." (declare (indent defun)) - (let ((cached-value (gethash cache magithub-cache--cache :no-value))) + (let ((cached-value (gethash cache table :no-value))) (if (or (eq cached-value :no-value) - (< (plist-get magithub-cache-refresh-seconds-plist cache) + (< (or (plist-get magithub-cache-refresh-seconds-plist cache) + (plist-get magithub-cache-refresh-seconds-plist t)) (time-to-seconds (time-since (car cached-value))))) - (cdr (puthash cache (cons (current-time) (eval default)) - magithub-cache--cache)) + (cdr (puthash cache (cons (current-time) (eval default)) table)) (when magithub-debug-mode (message "Using cached value for %S (retrieved %s)" cache (format-time-string "%F %T" (car cached-value)))) (cdr cached-value)))) -(defun magithub-cache-value (cache) +(defun magithub-cache (repo cache default) + (declare (indent defun)) + (magithub-cache--table (magithub-cache--get-table repo) cache default)) + +(defun magithub-cache-value--table (table cache) "The cached value for CACHE." - (let ((c (gethash cache magithub-cache--cache :no-value))) + (let ((c (gethash cache table :no-value))) (unless (eq c :no-value) (cdr c)))) -(defun magithub-cache-clear (cache) - "Clear the cache." - (remhash cache magithub-cache--cache)) +(defun magithub-cache-value (repo cache) + "The cached value for CACHE." + (magithub-cache-value--table (magithub-cache--get-table repo) cache)) + +(defun magithub-cache-clear (repo &optional cache) + "Clear the cache for CACHE. +If CACHE is nil, the entire cache is cleared." + (if cache (remhash cache (magithub-cache--get-table repo)) + (cl-delete repo magithub-cache--cache + :key #'car :test #'equal))) (defun magithub-refresh () "Refresh all GitHub data." (interactive) - (setq magithub-cache--cache (make-hash-table)) + (magithub-cache-clear) (magit-refresh)) (provide 'magithub-cache) diff --git a/elpa/magithub-20160926.2044/magithub-ci.el b/elpa/magithub-20160928.1650/magithub-ci.el similarity index 73% rename from elpa/magithub-20160926.2044/magithub-ci.el rename to elpa/magithub-20160928.1650/magithub-ci.el index 4ed6b8e..ade391c 100644 --- a/elpa/magithub-20160926.2044/magithub-ci.el +++ b/elpa/magithub-20160928.1650/magithub-ci.el @@ -31,22 +31,46 @@ (require 'magithub-core) (require 'magithub-cache) +(defun magithub-ci-enabled-p () + "Non-nil if CI is enabled for this repository. +If magithub.ci.enabled is not set, CI is considered to be enabled." + (when (member (magit-get "magithub" "ci" "enabled") '(nil "yes")) t)) +(defun magithub-ci-disable () + "Disable CI for this repository." + (magit-set "no" "magithub" "ci" "enabled")) +(defun magithub-ci-enable () + "Enable CI for this repository." + (magit-set "yes" "magithub" "ci" "enabled")) + (defun magithub-maybe-insert-ci-status-header () "If this is a GitHub repository, insert the CI status header." - (when (and (magithub-github-repository-p) - (executable-find magithub-hub-executable)) + (when (and (magithub-ci-enabled-p) + (magithub-usable-p)) (magithub-insert-ci-status-header))) +(defun magithub-ci-toggle () + "Toggle CI integration." + (interactive) + (if (magithub-ci-enabled-p) + (magithub-ci-disable) + (magithub-ci-enable)) + (when (derived-mode-p 'magit-status-mode) + (magit-refresh))) + +(magit-define-popup-action 'magithub-dispatch-popup + ?~ "Toggle CI for this repository" #'magithub-ci-toggle ?`) + (defun magithub-ci-status () "One of 'success, 'error, 'failure, 'pending, or 'no-status." (let ((same-commit (string-equal (magit-rev-parse "HEAD") (magithub-ci-status-current-commit)))) (unless same-commit - (magithub-cache-clear :ci-status)) - (if (eq (magithub-cache-value :ci-status) 'success) + (magithub-cache-clear (magithub-repo-id) :ci-status)) + (if (eq (magithub-cache-value (magithub-repo-id) :ci-status) + 'success) 'success - (magithub-cache :ci-status + (magithub-cache (magithub-repo-id) :ci-status '(magithub-ci-status--internal))))) (defun magithub-ci-status-current-commit (&optional new-value) @@ -55,22 +79,32 @@ (if new-value (apply #'magit-set new-value keys) (apply #'magit-get keys)))) -(defun magithub-ci-status--internal (&optional ignore-ci-skips) +(defun magithub-ci-status--internal (&optional for-commit) "One of 'success, 'error, 'failure, 'pending, or 'no-status." (with-temp-message "Updating CI status..." - (let* ((last-commit (when ignore-ci-skips (magithub-ci-status--last-commit))) - (output (car (magithub--command-output "ci-status" last-commit)))) - (if output - (let* ((output (replace-regexp-in-string "\s" "-" output)) - (status (intern output))) - (if (and (not ignore-ci-skips) (eq status 'no-status)) - (magithub-ci-status--internal t) - (magithub-ci-status-current-commit (magit-rev-parse "HEAD")) + (let* ((current-commit (magit-rev-parse "HEAD")) + (last-commit (or for-commit current-commit)) + (output (car (magithub--command-output "ci-status" `("-v" ,last-commit))))) + (if (string-match (rx bos (group (+ (any alpha space))) + (? ": " (group (+ (not (any " "))))) eos) + output) + (let (status url) + (setq status (intern (replace-regexp-in-string "\s" "-" (match-string 1 output))) + url (match-string 2 output)) + (when url (magit-set url "magithub" "ci" "url")) + (if (and (not for-commit) (eq status 'no-status)) + (let ((last-commit (magithub-ci-status--last-commit))) + (unless (string-equal current-commit last-commit) + (magithub-ci-status--internal last-commit)) + (magithub-ci-status-current-commit current-commit) + status) + (magithub-ci-status-current-commit current-commit) status)) (beep) (setq magithub-hub-error (message (concat "Hub didn't have any output for \"ci-status\"!\n" + "Are you connected to the internet?\n" "Consider submitting an issue to github/hub."))) 'internal-error)))) @@ -162,7 +196,7 @@ Sets up magithub.ci.url if necessary." (defun magithub-ci-refresh () "Invalidate the CI cache and refresh the buffer." (interactive) - (magithub-cache-clear :ci-status) + (magithub-cache-clear (magithub-repo-id) :ci-status) (when (derived-mode-p 'magit-status-mode) (magit-refresh))) diff --git a/elpa/magithub-20160926.2044/magithub-core.el b/elpa/magithub-20160928.1650/magithub-core.el similarity index 83% rename from elpa/magithub-20160926.2044/magithub-core.el rename to elpa/magithub-20160928.1650/magithub-core.el index af2124f..39cb1fa 100644 --- a/elpa/magithub-20160926.2044/magithub-core.el +++ b/elpa/magithub-20160928.1650/magithub-core.el @@ -33,6 +33,10 @@ (s-prefix? "https://github.com/" url) (s-prefix? "git://github.com/" url)))) +(defun magithub-repo-id () + "Returns an identifying value for this repository." + (magit-get "remote" "origin" "url")) + (defun magithub--api-available-p () "Non-nil if the API is available." (let ((magit-git-executable "ping") @@ -118,6 +122,37 @@ See /.github/ISSUE_TEMPLATE.md in this repository." (interactive) (browse-url "https://gitter.im/vermiculus/magithub")) +(defun magithub-enable () + "Enable Magithub for this repository." + (interactive) + (magit-set "yes" "magithub" "enabled") + (when (derived-mode-p 'magit-status-mode) + (magit-refresh))) + +(defun magithub-disable () + "Disable Magithub for this repository." + (interactive) + (magit-set "no" "magithub" "enabled") + (when (derived-mode-p 'magit-status-mode) + (magit-refresh))) + +(defun magithub-enabled-p () + "Returns non-nil when Magithub is enabled for this repository." + (when (member (magit-get "magithub" "enabled") '("yes" nil)) t)) + +(defun magithub-enabled-toggle () + "Toggle Magithub" + (interactive) + (if (magithub-enabled-p) + (magithub-disable) + (magithub-enable))) + +(defun magithub-usable-p () + "Non-nil if Magithub should do its thing." + (and (executable-find magithub-hub-executable) + (magithub-enabled-p) + (magithub-github-repository-p))) + (defun magithub-error (err-message tag &optional trace) "Report a Magithub error." (setq trace (or trace (with-output-to-string (backtrace)))) diff --git a/elpa/magithub-20160926.2044/magithub-issue.el b/elpa/magithub-20160928.1650/magithub-issue.el similarity index 96% rename from elpa/magithub-20160926.2044/magithub-issue.el rename to elpa/magithub-20160928.1650/magithub-issue.el index a95e94a..5517383 100644 --- a/elpa/magithub-20160926.2044/magithub-issue.el +++ b/elpa/magithub-20160928.1650/magithub-issue.el @@ -108,7 +108,7 @@ Returns a plist with the following properties: (defun magithub-issue-list () "Return a list of issues for the current repository." - (magithub-cache :issues + (magithub-cache (magithub-repo-id) :issues '(with-temp-message "Retrieving issue list..." (magithub-issue-list--internal)))) @@ -144,7 +144,7 @@ If `issue' is nil, open the repository's issues page." (defun magithub-issue-refresh () (interactive) - (magithub-cache-clear :issues) + (magithub-cache-clear (magithub-repo-id) :issues) (when (derived-mode-p 'magit-status-mode) (magit-refresh))) @@ -164,11 +164,10 @@ If `issue' is nil, open the repository's issues page." (defun magithub-issue--insert-section () "Insert GitHub issues if appropriate." - (when (and (magithub-github-repository-p) - (executable-find magithub-hub-executable)) + (when (magithub-usable-p) (let* ((issues (magithub-issue-list))) (magit-insert-section (magithub-issue-list) - (magit-insert-heading "Issues and Pull Requests") + (magit-insert-heading "Issues and Pull Requests:") (if issues (mapc #'magithub-issue--insert issues) (insert " No issues.\n")))))) diff --git a/elpa/magithub-20160926.2044/magithub-pkg.el b/elpa/magithub-20160928.1650/magithub-pkg.el similarity index 81% rename from elpa/magithub-20160926.2044/magithub-pkg.el rename to elpa/magithub-20160928.1650/magithub-pkg.el index 6bf3c59..d06bb9e 100644 --- a/elpa/magithub-20160926.2044/magithub-pkg.el +++ b/elpa/magithub-20160928.1650/magithub-pkg.el @@ -1,4 +1,4 @@ -(define-package "magithub" "20160926.2044" "Magit interfaces for GitHub" +(define-package "magithub" "20160928.1650" "Magit interfaces for GitHub" '((emacs "24.3") (magit "2.8.0") (git-commit "20160821.1338") diff --git a/elpa/magithub-20160926.2044/magithub.el b/elpa/magithub-20160928.1650/magithub.el similarity index 98% rename from elpa/magithub-20160926.2044/magithub.el rename to elpa/magithub-20160928.1650/magithub.el index 665b5a5..0c488d8 100644 --- a/elpa/magithub-20160926.2044/magithub.el +++ b/elpa/magithub-20160928.1650/magithub.el @@ -65,6 +65,7 @@ (?i "Issues" magithub-issues-popup) (?p "Submit a pull request" magithub-pull-request-popup) "Meta" + (?` "Toggle Magithub-Status integration" magithub-enabled-toggle) (?g "Refresh all GitHub data" magithub-refresh) (?& "Request a feature or report a bug" magithub--meta-new-issue) (?h "Ask for help on Gitter" magithub--meta-help))) diff --git a/elpa/markdown-mode-20160920.743/markdown-mode-autoloads.el b/elpa/markdown-mode-20160928.932/markdown-mode-autoloads.el similarity index 76% rename from elpa/markdown-mode-20160920.743/markdown-mode-autoloads.el rename to elpa/markdown-mode-20160928.932/markdown-mode-autoloads.el index a5b2c3b..4898574 100644 --- a/elpa/markdown-mode-20160920.743/markdown-mode-autoloads.el +++ b/elpa/markdown-mode-20160928.932/markdown-mode-autoloads.el @@ -1,10 +1,10 @@ ;;; markdown-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 "markdown-mode" "markdown-mode.el" (22499 37034 -;;;;;; 850000 0)) +;;;### (autoloads nil "markdown-mode" "markdown-mode.el" (22508 49896 +;;;;;; 581961 427000)) ;;; Generated autoloads from markdown-mode.el (autoload 'markdown-mode "markdown-mode" "\ diff --git a/elpa/markdown-mode-20160920.743/markdown-mode-pkg.el b/elpa/markdown-mode-20160928.932/markdown-mode-pkg.el similarity index 63% rename from elpa/markdown-mode-20160920.743/markdown-mode-pkg.el rename to elpa/markdown-mode-20160928.932/markdown-mode-pkg.el index b075ba6..14d7a57 100644 --- a/elpa/markdown-mode-20160920.743/markdown-mode-pkg.el +++ b/elpa/markdown-mode-20160928.932/markdown-mode-pkg.el @@ -1 +1,2 @@ -(define-package "markdown-mode" "20160920.743" "Major mode for Markdown-formatted text" '((emacs "24") (cl-lib "0.5")) :url "http://jblevins.org/projects/markdown-mode/" :keywords '("markdown" "github flavored markdown" "itex")) +;;; -*- no-byte-compile: t -*- +(define-package "markdown-mode" "20160928.932" "Major mode for Markdown-formatted text" '((emacs "24") (cl-lib "0.5")) :url "http://jblevins.org/projects/markdown-mode/" :keywords '("markdown" "github flavored markdown" "itex")) diff --git a/elpa/markdown-mode-20160920.743/markdown-mode.el b/elpa/markdown-mode-20160928.932/markdown-mode.el similarity index 99% rename from elpa/markdown-mode-20160920.743/markdown-mode.el rename to elpa/markdown-mode-20160928.932/markdown-mode.el index 964f08f..de553aa 100644 --- a/elpa/markdown-mode-20160920.743/markdown-mode.el +++ b/elpa/markdown-mode-20160928.932/markdown-mode.el @@ -33,7 +33,7 @@ ;; Maintainer: Jason R. Blevins ;; Created: May 24, 2007 ;; Version: 2.1 -;; Package-Version: 20160920.743 +;; Package-Version: 20160928.932 ;; Package-Requires: ((emacs "24") (cl-lib "0.5")) ;; Keywords: Markdown, GitHub Flavored Markdown, itex ;; URL: http://jblevins.org/projects/markdown-mode/ @@ -1443,7 +1443,7 @@ Groups 1 and 3 match opening and closing dollar signs. Group 3 matches the mathematical expression contained within.") (defconst markdown-regex-math-display - "^\\(\\\\\\[\\)\\(\\(?:.\\|\n\\)*\\)?\\(\\\\\\]\\)$" + "^\\(\\\\\\[\\)\\(\\(?:.\\|\n\\)*?\\)?\\(\\\\\\]\\)$" "Regular expression for itex \[..\] display mode expressions. Groups 1 and 3 match the opening and closing delimiters. Group 2 matches the mathematical expression contained within.") @@ -6477,9 +6477,9 @@ This is an exact copy of `line-number-at-pos' for use in emacs21." ;; Update font lock keywords with extensions (setq markdown-mode-font-lock-keywords (append + (markdown-mode-font-lock-keywords-math) markdown-mode-font-lock-keywords-basic - (markdown-mode-font-lock-keywords-wiki-links) - (markdown-mode-font-lock-keywords-math))) + (markdown-mode-font-lock-keywords-wiki-links))) ;; Update font lock defaults (setq font-lock-defaults '(markdown-mode-font-lock-keywords diff --git a/elpa/projectile-20160921.902/projectile-pkg.el b/elpa/projectile-20160921.902/projectile-pkg.el deleted file mode 100644 index 40b5d39..0000000 --- a/elpa/projectile-20160921.902/projectile-pkg.el +++ /dev/null @@ -1 +0,0 @@ -(define-package "projectile" "20160921.902" "Manage and navigate projects in Emacs easily" '((pkg-info "0.4")) :url "https://github.com/bbatsov/projectile" :keywords '("project" "convenience")) diff --git a/elpa/projectile-20160921.902/projectile-autoloads.el b/elpa/projectile-20160926.1133/projectile-autoloads.el similarity index 98% rename from elpa/projectile-20160921.902/projectile-autoloads.el rename to elpa/projectile-20160926.1133/projectile-autoloads.el index 169a872..a62f8d0 100644 --- a/elpa/projectile-20160921.902/projectile-autoloads.el +++ b/elpa/projectile-20160926.1133/projectile-autoloads.el @@ -1,10 +1,10 @@ ;;; projectile-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 "projectile" "projectile.el" (22499 37033 362000 -;;;;;; 0)) +;;;### (autoloads nil "projectile" "projectile.el" (22508 49895 417958 +;;;;;; 873000)) ;;; Generated autoloads from projectile.el (autoload 'projectile-version "projectile" "\ @@ -425,7 +425,8 @@ Otherwise behave as if called interactively. (defvar projectile-global-mode nil "\ Non-nil if Projectile-Global mode is enabled. -See the command `projectile-global-mode' for a description of this minor mode. +See the `projectile-global-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 `projectile-global-mode'.") diff --git a/elpa/projectile-20160926.1133/projectile-pkg.el b/elpa/projectile-20160926.1133/projectile-pkg.el new file mode 100644 index 0000000..2e5ceca --- /dev/null +++ b/elpa/projectile-20160926.1133/projectile-pkg.el @@ -0,0 +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")) diff --git a/elpa/projectile-20160921.902/projectile.el b/elpa/projectile-20160926.1133/projectile.el similarity index 99% rename from elpa/projectile-20160921.902/projectile.el rename to elpa/projectile-20160926.1133/projectile.el index 9b48888..e9b6678 100644 --- a/elpa/projectile-20160921.902/projectile.el +++ b/elpa/projectile-20160926.1133/projectile.el @@ -4,7 +4,7 @@ ;; Author: Bozhidar Batsov ;; URL: https://github.com/bbatsov/projectile -;; Package-Version: 20160921.902 +;; Package-Version: 20160926.1133 ;; Keywords: project, convenience ;; Version: 0.15.0-cvs ;; Package-Requires: ((pkg-info "0.4")) @@ -38,11 +38,12 @@ ;;; Code: (require 'cl-lib) -(require 'thingatpt) -(require 'ibuffer) -(require 'ibuf-ext) (require 'compile) +(require 'eshell) (require 'grep) +(require 'ibuf-ext) +(require 'ibuffer) +(require 'thingatpt) (eval-when-compile (defvar ag-ignore-list) @@ -1076,9 +1077,29 @@ 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 (shell-command-to-string command) "\0" t)) + (split-string (projectile-shell-command-to-string command) "\0" t)) (defun projectile-index-directory (directory patterns progress-reporter) "Index DIRECTORY taking into account PATTERNS. @@ -2847,8 +2868,8 @@ Invokes the command referenced by `projectile-switch-project-action' on switch. With a prefix ARG invokes `projectile-commander' instead of `projectile-switch-project-action.'" (let ((switch-project-action (if arg - 'projectile-commander - projectile-switch-project-action))) + 'projectile-commander + projectile-switch-project-action))) (run-hooks 'projectile-before-switch-project-hook) ;; use a temporary buffer to load PROJECT-TO-SWITCH's dir-locals before calling SWITCH-PROJECT-ACTION (with-temp-buffer diff --git a/elpa/s-20160922.443/s-pkg.el b/elpa/s-20160922.443/s-pkg.el deleted file mode 100644 index 806d229..0000000 --- a/elpa/s-20160922.443/s-pkg.el +++ /dev/null @@ -1 +0,0 @@ -(define-package "s" "20160922.443" "The long lost Emacs string manipulation library." 'nil :keywords '("strings")) diff --git a/elpa/s-20160922.443/s-autoloads.el b/elpa/s-20160928.636/s-autoloads.el similarity index 57% rename from elpa/s-20160922.443/s-autoloads.el rename to elpa/s-20160928.636/s-autoloads.el index 764aba4..4fc948d 100644 --- a/elpa/s-20160922.443/s-autoloads.el +++ b/elpa/s-20160928.636/s-autoloads.el @@ -1,9 +1,9 @@ ;;; s-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 nil ("s.el") (22501 3213 968694 183000)) +;;;### (autoloads nil nil ("s.el") (22508 49894 705957 302000)) ;;;*** diff --git a/elpa/s-20160928.636/s-pkg.el b/elpa/s-20160928.636/s-pkg.el new file mode 100644 index 0000000..4337f6b --- /dev/null +++ b/elpa/s-20160928.636/s-pkg.el @@ -0,0 +1,2 @@ +;;; -*- no-byte-compile: t -*- +(define-package "s" "20160928.636" "The long lost Emacs string manipulation library." 'nil :keywords '("strings")) diff --git a/elpa/s-20160922.443/s.el b/elpa/s-20160928.636/s.el similarity index 92% rename from elpa/s-20160922.443/s.el rename to elpa/s-20160928.636/s.el index 7c586cd..e75c592 100644 --- a/elpa/s-20160922.443/s.el +++ b/elpa/s-20160928.636/s.el @@ -4,7 +4,7 @@ ;; Author: Magnar Sveen ;; Version: 1.10.0 -;; Package-Version: 20160922.443 +;; Package-Version: 20160928.636 ;; Keywords: strings ;; This program is free software; you can redistribute it and/or modify @@ -32,15 +32,17 @@ (defun s-trim-left (s) "Remove whitespace at the beginning of S." - (if (string-match "\\`[ \t\n\r]+" s) - (replace-match "" t t s) - s)) + (save-match-data + (if (string-match "\\`[ \t\n\r]+" s) + (replace-match "" t t s) + s))) (defun s-trim-right (s) "Remove whitespace at the end of S." - (if (string-match "[ \t\n\r]+\\'" s) - (replace-match "" t t s) - s)) + (save-match-data + (if (string-match "[ \t\n\r]+\\'" s) + (replace-match "" t t s) + s))) (defun s-trim (s) "Remove whitespace at the beginning and end of S." @@ -55,7 +57,8 @@ If OMIT-NULLS is non-nil, zero-length substrings are omitted. This is a simple wrapper around the built-in `split-string'." - (split-string s separator omit-nulls)) + (save-match-data + (split-string s separator omit-nulls))) (defun s-split-up-to (separator s n &optional omit-nulls) "Split S up to N times into substrings bounded by matches for regexp SEPARATOR. @@ -181,11 +184,12 @@ See also `s-split'." (defun s-word-wrap (len s) "If S is longer than LEN, wrap the words with newlines." - (with-temp-buffer - (insert s) - (let ((fill-column len)) - (fill-region (point-min) (point-max))) - (buffer-substring (point-min) (point-max)))) + (save-match-data + (with-temp-buffer + (insert s) + (let ((fill-column len)) + (fill-region (point-min) (point-max))) + (buffer-substring (point-min) (point-max))))) (defun s-center (len s) "If S is shorter than LEN, pad it with spaces so it is centered." @@ -410,32 +414,34 @@ attention to case differences." Each element itself is a list of matches, as per `match-string'. Multiple matches at the same position will be ignored after the first." - (let ((all-strings ()) - (i 0)) - (while (and (< i (length string)) - (string-match regex string i)) - (setq i (1+ (match-beginning 0))) - (let (strings - (num-matches (/ (length (match-data)) 2)) - (match 0)) - (while (/= match num-matches) - (push (match-string match string) strings) - (setq match (1+ match))) - (push (nreverse strings) all-strings))) - (nreverse all-strings))) + (save-match-data + (let ((all-strings ()) + (i 0)) + (while (and (< i (length string)) + (string-match regex string i)) + (setq i (1+ (match-beginning 0))) + (let (strings + (num-matches (/ (length (match-data)) 2)) + (match 0)) + (while (/= match num-matches) + (push (match-string match string) strings) + (setq match (1+ match))) + (push (nreverse strings) all-strings))) + (nreverse all-strings)))) (defun s-matched-positions-all (regexp string &optional subexp-depth) "Return a list of matched positions for REGEXP in STRING. SUBEXP-DEPTH is 0 by default." (if (null subexp-depth) (setq subexp-depth 0)) - (let ((pos 0) result) - (while (and (string-match regexp string pos) - (< pos (length string))) - (let ((m (match-end subexp-depth))) - (push (cons (match-beginning subexp-depth) (match-end subexp-depth)) result) - (setq pos (match-end 0)))) - (nreverse result))) + (save-match-data + (let ((pos 0) result) + (while (and (string-match regexp string pos) + (< pos (length string))) + (let ((m (match-end subexp-depth))) + (push (cons (match-beginning subexp-depth) (match-end subexp-depth)) result) + (setq pos (match-end 0)))) + (nreverse result)))) (defun s-match (regexp s &optional start) "When the given expression matches the string, this function returns a list @@ -608,10 +614,11 @@ interpolated with \"%S\"." `start', inclusive, and `end', exclusive, delimit the part of `s' to match. " - (with-temp-buffer - (insert s) - (goto-char (point-min)) - (count-matches regexp (or start 1) (or end (point-max))))) + (save-match-data + (with-temp-buffer + (insert s) + (goto-char (point-min)) + (count-matches regexp (or start 1) (or end (point-max)))))) (defun s-wrap (s prefix &optional suffix) "Wrap string S with PREFIX and optionally SUFFIX. diff --git a/elpa/zone-nyan-20160102.1456/zone-nyan-pkg.el b/elpa/zone-nyan-20160102.1456/zone-nyan-pkg.el deleted file mode 100644 index ebf970e..0000000 --- a/elpa/zone-nyan-20160102.1456/zone-nyan-pkg.el +++ /dev/null @@ -1,2 +0,0 @@ -;;; -*- no-byte-compile: t -*- -(define-package "zone-nyan" "20160102.1456" "Zone out with nyan cat" '((esxml "0.3.1")) :url "https://github.com/wasamasa/zone-nyan" :keywords '("zone")) diff --git a/elpa/zone-nyan-20160102.1456/zone-nyan-autoloads.el b/elpa/zone-nyan-20160928.229/zone-nyan-autoloads.el similarity index 86% rename from elpa/zone-nyan-20160102.1456/zone-nyan-autoloads.el rename to elpa/zone-nyan-20160928.229/zone-nyan-autoloads.el index 50704b2..9a81689 100644 --- a/elpa/zone-nyan-20160102.1456/zone-nyan-autoloads.el +++ b/elpa/zone-nyan-20160928.229/zone-nyan-autoloads.el @@ -3,8 +3,8 @@ ;;; Code: (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path)))) -;;;### (autoloads nil "zone-nyan" "zone-nyan.el" (22506 10602 481977 -;;;;;; 318000)) +;;;### (autoloads nil "zone-nyan" "zone-nyan.el" (22508 49894 333956 +;;;;;; 480000)) ;;; Generated autoloads from zone-nyan.el (autoload 'zone-nyan "zone-nyan" "\ diff --git a/elpa/zone-nyan-20160928.229/zone-nyan-pkg.el b/elpa/zone-nyan-20160928.229/zone-nyan-pkg.el new file mode 100644 index 0000000..f2c8e2c --- /dev/null +++ b/elpa/zone-nyan-20160928.229/zone-nyan-pkg.el @@ -0,0 +1,2 @@ +;;; -*- no-byte-compile: t -*- +(define-package "zone-nyan" "20160928.229" "Zone out with nyan cat" '((esxml "0.3.1")) :url "https://github.com/wasamasa/zone-nyan" :keywords '("zone")) diff --git a/elpa/zone-nyan-20160102.1456/zone-nyan.el b/elpa/zone-nyan-20160928.229/zone-nyan.el similarity index 98% rename from elpa/zone-nyan-20160102.1456/zone-nyan.el rename to elpa/zone-nyan-20160928.229/zone-nyan.el index 5f7c451..b35a720 100644 --- a/elpa/zone-nyan-20160102.1456/zone-nyan.el +++ b/elpa/zone-nyan-20160928.229/zone-nyan.el @@ -4,7 +4,7 @@ ;; Author: Vasilij Schneidermann ;; URL: https://github.com/wasamasa/zone-nyan -;; Package-Version: 20160102.1456 +;; Package-Version: 20160928.229 ;; Version: 0.2.2 ;; Package-Requires: ((esxml "0.3.1")) ;; Keywords: zone @@ -729,6 +729,11 @@ vector with a X and Y component, width, height and fill color." :type '(repeat string) :group 'zone-nyan) +(defcustom zone-nyan-hide-progress nil + "Won’t report progress information if set." + :type 'boolean + :group zone-nyan) + (defvar zone-nyan-bg-music-process nil "Current BG music process.") @@ -743,8 +748,9 @@ It fires every 100ms.") "Progress function. It informs the user just how many seconds they've wasted on watching nyan cat run." - (message "You've nyaned for %.1f seconds" - (/ zone-nyan-progress 10.0)) + (unless zone-nyan-hide-progress + (message "You've nyaned for %.1f seconds" + (/ zone-nyan-progress 10.0))) (setq zone-nyan-progress (1+ zone-nyan-progress))) ;;;###autoload