Update packages

elpa/ace-window-20161018.1624/ace-window-autoloads.el

@@ -3,8 +3,8 @@
 ;;; Code:
 (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
 
-;;;### (autoloads nil "ace-window" "ace-window.el" (22527 12801 878759
-;;;;;;  425000))
+;;;### (autoloads nil "ace-window" "ace-window.el" (22535 7932 710222
+;;;;;;  652000))
 ;;; Generated autoloads from ace-window.el
 
 (autoload 'ace-select-window "ace-window" "\

elpa/ace-window-20161018.1624/ace-window-pkg.el

@@ -1,2 +1,2 @@
 ;;; -*- no-byte-compile: t -*-
-(define-package "ace-window" "20160923.1117" "Quickly switch windows." '((avy "0.2.0")) :url "https://github.com/abo-abo/ace-window" :keywords '("window" "location"))
+(define-package "ace-window" "20161018.1624" "Quickly switch windows." '((avy "0.2.0")) :url "https://github.com/abo-abo/ace-window" :keywords '("window" "location"))

elpa/ace-window-20161018.1624/ace-window.el

@@ -5,7 +5,7 @@
 ;; Author: Oleh Krehel <ohwoeowho@gmail.com>
 ;; Maintainer: Oleh Krehel <ohwoeowho@gmail.com>
 ;; URL: https://github.com/abo-abo/ace-window
-;; Package-Version: 20160923.1117
+;; Package-Version: 20161018.1624
 ;; Version: 0.9.0
 ;; Package-Requires: ((avy "0.2.0"))
 ;; Keywords: window, location
@@ -109,6 +109,11 @@ This will make `ace-window' act different from `other-window' for
   one or two windows."
   :type 'boolean)
 
+(defcustom aw-reverse-frame-list nil
+  "When non-nil `ace-window' will order frames for selection in
+the reverse of `frame-list'"
+  :type 'boolean)
+
 (defface aw-leading-char-face
     '((((class color)) (:foreground "red"))
       (((background dark)) (:foreground "gray100"))
@@ -395,7 +400,7 @@ Windows are numbered top down, left to right."
         (e2 (window-edges wnd2)))
     (cond ((string< (frame-parameter f1 'window-id)
                     (frame-parameter f2 'window-id))
-           nil)
+           aw-reverse-frame-list)
           ((< (car e1) (car e2))
            t)
           ((> (car e1) (car e2))

elpa/dash-20160820.501/dash-pkg.el

@@ -1 +0,0 @@
-(define-package "dash" "20160820.501" "A modern list library for Emacs" 'nil :keywords '("lists"))

elpa/dash-20161018.136/dash-autoloads.el

@@ -1,10 +1,9 @@
 ;;; dash-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 ("dash-pkg.el" "dash.el") (22490 24939
-;;;;;;  339398 67000))
+;;;### (autoloads nil nil ("dash.el") (22533 64997 280351 636000))
 
 ;;;***
 

elpa/dash-20161018.136/dash-pkg.el

@@ -0,0 +1,2 @@
+;;; -*- no-byte-compile: t -*-
+(define-package "dash" "20161018.136" "A modern list library for Emacs" 'nil :keywords '("lists"))

elpa/dash-20161018.136/dash.el

@@ -4,7 +4,7 @@
 
 ;; Author: Magnar Sveen <magnars@gmail.com>
 ;; Version: 2.13.0
-;; Package-Version: 20160820.501
+;; Package-Version: 20161018.136
 ;; Keywords: lists
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -1261,6 +1261,7 @@ See also: `-select-columns', `-select-by-indices'"
 in the first form, making a list of it if it is not a list
 already. If there are more forms, insert the first form as the
 second item in second form, etc."
+  (declare (debug (form &rest [&or symbolp (sexp &rest form)])))
   (cond
    ((null form) x)
    ((null more) (if (listp form)
@@ -1273,6 +1274,7 @@ second item in second form, etc."
 in the first form, making a list of it if it is not a list
 already. If there are more forms, insert the first form as the
 last item in second form, etc."
+  (declare (debug ->))
   (cond
    ((null form) x)
    ((null more) (if (listp form)
@@ -1285,6 +1287,7 @@ last item in second form, etc."
 signified by the token `it' in the first form. If there are more
 forms, insert the first form at the position signified by `it' in
 in second form, etc."
+  (declare (debug ->))
   (if (null more)
       (if (listp form)
           (--map-when (eq it 'it) x form)
@@ -1294,6 +1297,7 @@ in second form, etc."
 (defmacro -some-> (x &optional form &rest more)
   "When expr is non-nil, thread it through the first form (via `->'),
 and when that result is non-nil, through the next form, etc."
+  (declare (debug ->))
   (if (null form) x
     (let ((result (make-symbol "result")))
       `(-some-> (-when-let (,result ,x)
@@ -1303,6 +1307,7 @@ and when that result is non-nil, through the next form, etc."
 (defmacro -some->> (x &optional form &rest more)
   "When expr is non-nil, thread it through the first form (via `->>'),
 and when that result is non-nil, through the next form, etc."
+  (declare (debug ->))
   (if (null form) x
     (let ((result (make-symbol "result")))
       `(-some->> (-when-let (,result ,x)
@@ -1312,6 +1317,7 @@ and when that result is non-nil, through the next form, etc."
 (defmacro -some--> (x &optional form &rest more)
   "When expr in non-nil, thread it through the first form (via `-->'),
 and when that result is non-nil, through the next form, etc."
+  (declare (debug ->))
   (if (null form) x
     (let ((result (make-symbol "result")))
       `(-some--> (-when-let (,result ,x)

elpa/flycheck-20161018.1343/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" (22527 12709 290696
-;;;;;;  478000))
+;;;### (autoloads nil "flycheck" "flycheck.el" (22535 7931 202223
+;;;;;;  337000))
 ;;; 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") (22527 12709 286696 474000))
+;;;;;;  "flycheck-pkg.el") (22535 7931 198223 338000))
 
 ;;;***
 

elpa/flycheck-20161018.1343/flycheck-pkg.el

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

elpa/flycheck-20161018.1343/flycheck.el

@@ -213,6 +213,7 @@ attention to case differences."
     php-phpmd
     php-phpcs
     processing
+    protobuf-protoc
     pug
     puppet-parser
     puppet-lint
@@ -246,6 +247,7 @@ attention to case differences."
     slim
     slim-lint
     sql-sqlint
+    systemd-analyze
     tex-chktex
     tex-lacheck
     texinfo
@@ -7974,6 +7976,26 @@ See https://github.com/processing/processing/wiki/Command-Line"
   ;; This syntax checker needs a file name
   :predicate (lambda () (buffer-file-name)))
 
+(flycheck-define-checker protobuf-protoc
+  "A protobuf syntax checker using the protoc compiler.
+
+See URL `https://developers.google.com/protocol-buffers/'."
+  :command ("protoc" "--error_format" "gcc"
+            (eval (concat "--java_out=" (flycheck-temp-dir-system)))
+            ;; Add the file directory of protobuf path to resolve import directives
+            (eval (concat "--proto_path=" (file-name-directory (buffer-file-name))))
+            source-inplace)
+  :error-patterns
+  ((info line-start (file-name) ":" line ":" column
+         ": note: " (message) line-end)
+   (error line-start (file-name) ":" line ":" column
+          ": " (message) line-end)
+   (error line-start
+          (message "In file included from") " " (file-name) ":" line ":"
+          column ":" line-end))
+  :modes protobuf-mode
+  :predicate (lambda () (buffer-file-name)))
+
 (flycheck-define-checker pug
   "A Pug syntax checker using the pug compiler.
 
@@ -9139,6 +9161,15 @@ See URL `https://github.com/purcell/sqlint'."
           line-end))
   :modes (sql-mode))
 
+(flycheck-define-checker systemd-analyze
+  "A systemd unit checker using systemd-analyze(1).
+
+See URL `https://www.freedesktop.org/software/systemd/man/systemd-analyze.html'."
+  :command ("systemd-analyze" "verify" source-original)
+  :error-patterns
+  ((error line-start "[" (file-name) ":" line "] " (message) line-end))
+  :modes (systemd-mode))
+
 (flycheck-def-config-file-var flycheck-chktexrc tex-chktex ".chktexrc"
   :safe #'stringp)
 

elpa/helm-20161018.1253/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" (22532 34656
-;;;;;;  132334 628000))
+;;;### (autoloads nil "helm-adaptive" "helm-adaptive.el" (22535 7928
+;;;;;;  746224 452000))
 ;;; 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" (22532 34656 96334
-;;;;;;  318000))
+;;;### (autoloads nil "helm-apt" "helm-apt.el" (22535 7928 710224
+;;;;;;  468000))
 ;;; 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" (22532 34656
-;;;;;;  188335 110000))
+;;;### (autoloads nil "helm-bookmark" "helm-bookmark.el" (22535 7928
+;;;;;;  806224 424000))
 ;;; 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" (22532 34656
-;;;;;;  80334 181000))
+;;;### (autoloads nil "helm-buffers" "helm-buffers.el" (22535 7928
+;;;;;;  698224 473000))
 ;;; 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" (22532 34656 168334
-;;;;;;  938000))
+;;;### (autoloads nil "helm-color" "helm-color.el" (22535 7928 786224
+;;;;;;  434000))
 ;;; 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" (22532 34656
-;;;;;;  32333 769000))
+;;;### (autoloads nil "helm-command" "helm-command.el" (22535 7928
+;;;;;;  650224 495000))
 ;;; 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" (22532 34656
-;;;;;;  184335 76000))
+;;;### (autoloads nil "helm-config" "helm-config.el" (22535 7928
+;;;;;;  794224 430000))
 ;;; Generated autoloads from helm-config.el
 
 (autoload 'helm-configuration "helm-config" "\
@@ -117,8 +117,8 @@ Customize `helm'.
 
 ;;;***
 
-;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22532 34656
-;;;;;;  112334 456000))
+;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22535 7928
+;;;;;;  718224 464000))
 ;;; 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" (22532 34656 176335
-;;;;;;  6000))
+;;;### (autoloads nil "helm-elisp" "helm-elisp.el" (22535 7928 790224
+;;;;;;  432000))
 ;;; 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"
-;;;;;;  (22532 34656 36333 804000))
+;;;;;;  (22535 7928 654224 493000))
 ;;; 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" (22532 34656
-;;;;;;  24333 700000))
+;;;### (autoloads nil "helm-elscreen" "helm-elscreen.el" (22535 7928
+;;;;;;  638224 500000))
 ;;; 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" (22532 34656
-;;;;;;  56333 975000))
+;;;### (autoloads nil "helm-eshell" "helm-eshell.el" (22535 7928
+;;;;;;  666224 488000))
 ;;; 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" (22532 34656 140334
-;;;;;;  698000))
+;;;### (autoloads nil "helm-eval" "helm-eval.el" (22535 7928 754224
+;;;;;;  448000))
 ;;; 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" (22532 34656
-;;;;;;  12333 596000))
+;;;### (autoloads nil "helm-external" "helm-external.el" (22535 7928
+;;;;;;  626224 506000))
 ;;; 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" (22532 34656 116334
-;;;;;;  491000))
+;;;### (autoloads nil "helm-files" "helm-files.el" (22535 7928 730224
+;;;;;;  458000))
 ;;; 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" (22532 34656 60334
-;;;;;;  9000))
+;;;### (autoloads nil "helm-font" "helm-font.el" (22535 7928 670224
+;;;;;;  486000))
 ;;; 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" (22532 34656 192335
-;;;;;;  144000))
+;;;### (autoloads nil "helm-grep" "helm-grep.el" (22535 7928 810224
+;;;;;;  422000))
 ;;; 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" (22532 34656 4333
-;;;;;;  529000))
+;;;### (autoloads nil "helm-help" "helm-help.el" (22535 7928 618224
+;;;;;;  510000))
 ;;; 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" (22532 34656
-;;;;;;  84334 216000))
+;;;### (autoloads nil "helm-id-utils" "helm-id-utils.el" (22535 7928
+;;;;;;  706224 470000))
 ;;; Generated autoloads from helm-id-utils.el
 
 (autoload 'helm-gid "helm-id-utils" "\
@@ -435,8 +435,8 @@ See <https://www.gnu.org/software/idutils/>.
 
 ;;;***
 
-;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22532 34656 68334
-;;;;;;  79000))
+;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22535 7928 686224
+;;;;;;  478000))
 ;;; 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" (22532 34656 64334
-;;;;;;  44000))
+;;;### (autoloads nil "helm-info" "helm-info.el" (22535 7928 678224
+;;;;;;  482000))
 ;;; 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" (22532 34656
-;;;;;;  20333 666000))
+;;;### (autoloads nil "helm-locate" "helm-locate.el" (22535 7928
+;;;;;;  634224 502000))
 ;;; 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" (22532 34656 144334
-;;;;;;  731000))
+;;;### (autoloads nil "helm-man" "helm-man.el" (22535 7928 758224
+;;;;;;  446000))
 ;;; 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" (22532 34656 124334
-;;;;;;  560000))
+;;;### (autoloads nil "helm-misc" "helm-misc.el" (22535 7928 742224
+;;;;;;  453000))
 ;;; 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" (22532 34655 992333
-;;;;;;  424000))
+;;;### (autoloads nil "helm-mode" "helm-mode.el" (22535 7928 606224
+;;;;;;  515000))
 ;;; 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" (22532 34656 164334
-;;;;;;  903000))
+;;;### (autoloads nil "helm-net" "helm-net.el" (22535 7928 778224
+;;;;;;  437000))
 ;;; 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" (22532 34656 196335
-;;;;;;  178000))
+;;;### (autoloads nil "helm-org" "helm-org.el" (22535 7928 814224
+;;;;;;  420000))
 ;;; 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" (22532 34656
-;;;;;;  160334 869000))
+;;;### (autoloads nil "helm-regexp" "helm-regexp.el" (22535 7928
+;;;;;;  770224 440000))
 ;;; 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" (22532 34656 333
-;;;;;;  494000))
+;;;### (autoloads nil "helm-ring" "helm-ring.el" (22535 7928 614224
+;;;;;;  511000))
 ;;; 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" (22532 34656
-;;;;;;  76334 146000))
+;;;### (autoloads nil "helm-semantic" "helm-semantic.el" (22535 7928
+;;;;;;  690224 477000))
 ;;; 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" (22532 34656 104334
-;;;;;;  388000))
+;;;### (autoloads nil "helm-sys" "helm-sys.el" (22535 7928 714224
+;;;;;;  466000))
 ;;; 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" (22532 34656 48333
-;;;;;;  906000))
+;;;### (autoloads nil "helm-tags" "helm-tags.el" (22535 7928 662224
+;;;;;;  490000))
 ;;; 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" (22532 34656 28333
-;;;;;;  734000))
+;;;### (autoloads nil "helm-utils" "helm-utils.el" (22535 7928 642224
+;;;;;;  498000))
 ;;; 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")
-;;;;;;  (22532 34656 204335 248000))
+;;;;;;  (22535 7928 818224 419000))
 
 ;;;***
 

elpa/helm-20161018.1253/helm-grep.el

@@ -206,6 +206,34 @@ Possible value are:
   :group 'helm-grep
   :type '(alist :key-type string :value-type function))
 
+(defcustom helm-grep-pipe-cmd-switches nil
+  "A list of additional parameters to pass to grep pipe command.
+This will be used for pipe command for multiple pattern matching
+for grep, zgrep ack-grep and git-grep backends.
+If you add extra args for ack-grep, use ack-grep options,
+for others (grep, zgrep and git-grep) use grep options.
+Here are the commands where you may want to add switches:
+
+    grep --color=always
+    ack-grep --smart-case --color
+
+You probably don't need to use this unless you know what you are doing."
+  :group 'helm-grep
+  :type 'string)
+
+(defcustom helm-grep-ag-pipe-cmd-switches nil
+  "A list of additional parameters to pass to grep-ag pipe command.
+You can use either grep or ack-grep backend, give options according
+to which backend you use.
+Here are the commands where you may want to add switches:
+
+    grep --perl-regexp --color=always
+    ack-grep --smart-case --color
+
+You probably don't need to use this unless you know what you are doing."
+  :group 'helm-grep
+  :type 'string)
+
 
 ;;; Faces
 ;;
@@ -254,7 +282,6 @@ Possible value are:
     (define-key map (kbd "M-<up>")   'helm-goto-precedent-file)
     (define-key map (kbd "C-c o")    'helm-grep-run-other-window-action)
     (define-key map (kbd "C-c C-o")  'helm-grep-run-other-frame-action)
-    (define-key map (kbd "C-w")      'helm-yank-text-at-point)
     (define-key map (kbd "C-x C-s")  'helm-grep-run-save-buffer)
     (when helm-grep-use-ioccur-style-keys
       (define-key map (kbd "<right>")  'helm-execute-persistent-action)
@@ -267,7 +294,6 @@ Possible value are:
     (set-keymap-parent map helm-map)
     (define-key map (kbd "M-<down>") 'helm-goto-next-file)
     (define-key map (kbd "M-<up>")   'helm-goto-precedent-file)
-    (define-key map (kbd "C-w")      'helm-yank-text-at-point)
     map)
   "Keymap used in pdfgrep.")
 
@@ -426,19 +452,19 @@ It is intended to use as a let-bound variable, DON'T set this globaly.")
          (helm-grep-default-command
           (concat helm-grep-default-command " %m")) ; `%m' like multi.
          (patterns (split-string helm-pattern))
+         (pipe-switches (mapconcat 'identity helm-grep-pipe-cmd-switches " "))
          (pipes
           (helm-aif (cdr patterns)
               (cl-loop with pipcom = (pcase (helm-grep-command)
                                        ;; Use grep for GNU regexp based tools.
                                        ((or "grep" "zgrep" "git-grep")
-                                        (replace-regexp-in-string
-                                         "\\s-\\'" ""
-                                         (format "grep --color=always %s"
-                                                 (if smartcase "-i" ""))))
+                                        (format "grep --color=always%s %s"
+                                                 (if smartcase " -i" "")
+                                                 pipe-switches))
                                        ;; Use ack-grep for PCRE based tools.
                                        ;; Sometimes ack-grep cmd is ack only.
                                        ((and (pred (string-match-p "ack")) ack)
-                                        (format "%s --smart-case --color" ack)))
+                                        (format "%s --smart-case --color %s" ack pipe-switches)))
                        for p in it concat
                        (format " | %s %s" pipcom (shell-quote-argument p)))
             "")))
@@ -1328,11 +1354,17 @@ if available with current AG version."
          (smartcase (let ((case-fold-search nil))
                       (string-match-p
                        "[[:upper:]]" helm-pattern)))
-         (pipe-cmd (cond ((executable-find "ack") "ack --smart-case --color")
-                         ((executable-find "ack-grep") "ack-grep --smart-case --color")
-                         (t (replace-regexp-in-string
-                             "\\s-\\'" "" (format "grep --perl-regexp --color=always %s"
-                                                  (if smartcase "-i" ""))))))
+         (pipe-switches (mapconcat 'identity helm-grep-ag-pipe-cmd-switches " "))
+         (pipe-cmd (helm-acond ((or (executable-find "ack")
+                                    (executable-find "ack-grep"))
+                                (replace-regexp-in-string
+                                 "\\s-\\'" ""
+                                 (format "%s --smart-case --color %s"
+                                         (helm-basename it)
+                                         pipe-switches)))
+                                (t (format "grep --perl-regexp --color=always%s %s"
+                                           (if smartcase " -i" "")
+                                           pipe-switches))))
          (cmd (format helm-grep-ag-command
                       (mapconcat 'identity type " ")
                       (shell-quote-argument (car patterns))

elpa/helm-20161018.1253/helm-locate.el

@@ -128,7 +128,6 @@ For Windows and `es' use something like \"es -r ^%s.*%s.*$\"."
     (define-key map (kbd "C-c C-x") 'helm-ff-run-open-file-externally)
     (define-key map (kbd "C-c X")   'helm-ff-run-open-file-with-default-tool)
     (define-key map (kbd "M-.")     'helm-ff-run-etags)
-    (define-key map (kbd "C-w")     'helm-yank-text-at-point)
     (define-key map (kbd "C-c @")   'helm-ff-run-insert-org-link)
     map)
   "Generic Keymap for files.")

elpa/helm-20161018.1253/helm-pkg.el

@@ -1,4 +1,4 @@
-(define-package "helm" "20161016.827" "Helm is an Emacs incremental and narrowing framework"
+(define-package "helm" "20161018.1253" "Helm is an Emacs incremental and narrowing framework"
   '((emacs "24.4")
     (async "1.9")
     (popup "0.5.3")

elpa/helm-20161018.1253/helm-regexp.el

@@ -82,7 +82,6 @@ Any other non--nil value update after confirmation."
     (set-keymap-parent map helm-map)
     (define-key map (kbd "M-<down>") 'helm-goto-next-file)
     (define-key map (kbd "M-<up>")   'helm-goto-precedent-file)
-    (define-key map (kbd "C-w")      'helm-yank-text-at-point)
     (define-key map (kbd "C-c o")    'helm-moccur-run-goto-line-ow)
     (define-key map (kbd "C-c C-o")  'helm-moccur-run-goto-line-of)
     (define-key map (kbd "C-x C-s")  'helm-moccur-run-save-buffer)

elpa/helm-20161018.1253/helm-tags.el

@@ -96,7 +96,6 @@ one match."
     (set-keymap-parent map helm-map)
     (define-key map (kbd "M-<down>") 'helm-goto-next-file)
     (define-key map (kbd "M-<up>")   'helm-goto-precedent-file)
-    (define-key map (kbd "C-w")      'helm-yank-text-at-point)
     (define-key map (kbd "C-c o")    'helm-etags-run-switch-other-window)
     (define-key map (kbd "C-c C-o")  'helm-etags-run-switch-other-frame)
     map)

elpa/helm-20161018.1253/helm-utils.el

@@ -267,6 +267,7 @@ Default is `helm-current-buffer'."
 Animation is used unless NOANIM is non--nil."
   (helm-log-run-hook 'helm-goto-line-before-hook)
   (helm-match-line-cleanup)
+  (unless helm-yank-point (setq helm-yank-point (point)))
   (goto-char (point-min))
   (helm-goto-char (point-at-bol lineno))
   (unless noanim

elpa/helm-core-20161017.2343/helm-core-autoloads.el

@@ -3,7 +3,7 @@
 ;;; Code:
 (add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
 
-;;;### (autoloads nil "helm" "helm.el" (22532 34653 700313 729000))
+;;;### (autoloads nil "helm" "helm.el" (22533 65002 208349 656000))
 ;;; Generated autoloads from helm.el
 
 (autoload 'helm-define-multi-key "helm" "\
@@ -188,7 +188,7 @@ Enable/disable helm debugging from outside of helm session.
 ;;;***
 
 ;;;### (autoloads nil nil ("helm-core-pkg.el" "helm-lib.el" "helm-multi-match.el"
-;;;;;;  "helm-source.el") (22532 34653 712313 831000))
+;;;;;;  "helm-source.el") (22533 65002 228349 648000))
 
 ;;;***
 

elpa/helm-core-20161017.2343/helm-core-pkg.el

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

elpa/helm-core-20161017.2343/helm-lib.el

@@ -803,23 +803,40 @@ That is what completion commands operate on."
 ;; Yank text at point.
 ;;
 ;;
-(defun helm-yank-text-at-point ()
+(defun helm-yank-text-at-point (arg)
   "Yank text at point in `helm-current-buffer' into minibuffer."
-  (interactive)
+  (interactive "p")
   (with-helm-current-buffer
-    (let ((fwd-fn (or helm-yank-text-at-point-function #'forward-word)))
+    (let ((fwd-fn (or helm-yank-text-at-point-function #'forward-word))
+          diff)
       ;; Start to initial point if C-w have never been hit.
       (unless helm-yank-point (setq helm-yank-point (point)))
       (save-excursion
         (goto-char helm-yank-point)
-        (funcall fwd-fn 1)
         (helm-set-pattern
+         (if (< arg 0)
+             (with-temp-buffer
+               (insert helm-pattern)
+               (let ((end (point-max)))
+                 (goto-char end)
+                 (funcall fwd-fn -1)
+                 (setq diff (- end (point)))
+                 (delete-region (point) end)
+                 (buffer-string)))
+             (funcall fwd-fn arg)
              (concat
               helm-pattern (replace-regexp-in-string
                             "\\`\n" ""
                             (buffer-substring-no-properties
-                         helm-yank-point (point)))))
-        (setq helm-yank-point (point))))))
+                             helm-yank-point (point))))))
+        (setq helm-yank-point (if diff (- (point) diff) (point)))))))
+(put 'helm-yank-text-at-point 'helm-only t)
+
+(defun helm-undo-yank-text-at-point ()
+  "Undo last entry added by `helm-yank-text-at-point'."
+  (interactive)
+  (helm-yank-text-at-point -1))
+(put 'helm-undo-yank-text-at-point 'helm-only t)
 
 (defun helm-reset-yank-point ()
   (setq helm-yank-point nil))

elpa/helm-core-20161017.2343/helm.el

@@ -208,7 +208,6 @@ NOTE: SUBKEY and OTHER-SUBKEYS bindings support char syntax only
     (define-key map (kbd "M-m")        'helm-toggle-all-marks)
     (define-key map (kbd "M-a")        'helm-mark-all)
     (define-key map (kbd "M-U")        'helm-unmark-all)
-    (define-key map (kbd "C-w")        'helm-yank-text-at-point)
     (define-key map (kbd "C-M-a")      'helm-show-all-in-this-source-only)
     (define-key map (kbd "C-M-e")      'helm-display-all-sources)
     (define-key map (kbd "C-r")        'undefined)
@@ -239,6 +238,9 @@ NOTE: SUBKEY and OTHER-SUBKEYS bindings support char syntax only
     (define-key map [f1] nil)
     (define-key map (kbd "C-h C-h")    'undefined)
     (define-key map (kbd "C-h h")      'undefined)
+    (helm-define-key-with-subkeys map
+      (kbd "C-w") ?\C-w 'helm-yank-text-at-point
+      '((?\C-_ . helm-undo-yank-text-at-point)))
     ;; Use `describe-mode' key in `global-map'.
     (cl-dolist (k (where-is-internal 'describe-mode global-map))
       (define-key map k 'helm-help))
@@ -2287,6 +2289,7 @@ See :after-init-hook and :before-init-hook in `helm-source'."
         helm-saved-action nil
         helm-saved-selection nil
         helm-suspend-update-flag nil
+        ;; Ensure this is called BEFORE selecting helm-window.
         helm-current-buffer (helm--current-buffer)
         helm-buffer-file-name buffer-file-name
         helm-issued-errors nil
@@ -4808,10 +4811,10 @@ If N is positive enlarge, if negative narrow."
                    (delete-window w2)
                    (set-window-buffer
                     (setq w2 (split-window w1 nil helm--window-side-state)) b2)
-                   ;; Maybe resize the window holding helm-buffer.
+                   ;; Maybe resize the window holding `helm-current-buffer'.
                    (and resize (window-resize w2 resize split-state))
-                   (set-window-start w1 s2 t)
-                   (set-window-start w2 s1 t))
+                   (set-window-start w1 s1 t)
+                   (set-window-start w2 s2 t))
                  (setq helm--window-side-state (helm--get-window-side-state)))))
         (error "current window configuration not suitable for splitting"))))
 (put 'helm-swap-windows 'helm-only t)

elpa/magit-20161017.405/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" (22532 34650 788288
-;;;;;;  716000))
+;;;### (autoloads nil "git-rebase" "git-rebase.el" (22533 64999 636350
+;;;;;;  689000))
 ;;; 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" (22532 34650 876289 472000))
+;;;### (autoloads nil "magit" "magit.el" (22533 64999 724350 654000))
 ;;; Generated autoloads from magit.el
 
 (autoload 'magit-status "magit" "\
@@ -501,8 +501,8 @@ Git, and Emacs in the echo area.
 
 ;;;***
 
-;;;### (autoloads nil "magit-apply" "magit-apply.el" (22532 34650
-;;;;;;  812288 922000))
+;;;### (autoloads nil "magit-apply" "magit-apply.el" (22533 64999
+;;;;;;  656350 681000))
 ;;; Generated autoloads from magit-apply.el
 
 (autoload 'magit-stage-file "magit-apply" "\
@@ -538,8 +538,8 @@ Remove all changes from the staging area.
 
 ;;;***
 
-;;;### (autoloads nil "magit-autorevert" "magit-autorevert.el" (22532
-;;;;;;  34650 752288 407000))
+;;;### (autoloads nil "magit-autorevert" "magit-autorevert.el" (22533
+;;;;;;  64999 604350 702000))
 ;;; Generated autoloads from magit-autorevert.el
 
 (defvar magit-revert-buffers t)
@@ -568,8 +568,8 @@ See `auto-revert-mode' for more information on Auto-Revert mode.
 
 ;;;***
 
-;;;### (autoloads nil "magit-bisect" "magit-bisect.el" (22532 34650
-;;;;;;  808288 887000))
+;;;### (autoloads nil "magit-bisect" "magit-bisect.el" (22533 64999
+;;;;;;  652350 683000))
 ;;; Generated autoloads from magit-bisect.el
  (autoload 'magit-bisect-popup "magit-bisect" nil t)
 
@@ -620,8 +620,8 @@ bisect run'.
 
 ;;;***
 
-;;;### (autoloads nil "magit-blame" "magit-blame.el" (22532 34650
-;;;;;;  860289 334000))
+;;;### (autoloads nil "magit-blame" "magit-blame.el" (22533 64999
+;;;;;;  708350 660000))
 ;;; Generated autoloads from magit-blame.el
  (autoload 'magit-blame-popup "magit-blame" nil t)
 
@@ -645,8 +645,8 @@ only arguments available from `magit-blame-popup' should be used.
 
 ;;;***
 
-;;;### (autoloads nil "magit-commit" "magit-commit.el" (22532 34650
-;;;;;;  760288 476000))
+;;;### (autoloads nil "magit-commit" "magit-commit.el" (22533 64999
+;;;;;;  608350 700000))
 ;;; Generated autoloads from magit-commit.el
 
 (autoload 'magit-commit "magit-commit" "\
@@ -728,8 +728,8 @@ Create a squash commit targeting COMMIT and instantly rebase.
 
 ;;;***
 
-;;;### (autoloads nil "magit-diff" "magit-diff.el" (22532 34650 856289
-;;;;;;  300000))
+;;;### (autoloads nil "magit-diff" "magit-diff.el" (22533 64999 700350
+;;;;;;  663000))
 ;;; Generated autoloads from magit-diff.el
 
 (autoload 'magit-diff-popup "magit-diff" "\
@@ -813,8 +813,8 @@ for a revision.
 
 ;;;***
 
-;;;### (autoloads nil "magit-ediff" "magit-ediff.el" (22532 34650
-;;;;;;  840289 163000))
+;;;### (autoloads nil "magit-ediff" "magit-ediff.el" (22533 64999
+;;;;;;  688350 669000))
 ;;; Generated autoloads from magit-ediff.el
  (autoload 'magit-ediff-popup "magit-ediff" nil t)
 
@@ -902,8 +902,8 @@ stash that were staged.
 
 ;;;***
 
-;;;### (autoloads nil "magit-extras" "magit-extras.el" (22532 34650
-;;;;;;  764288 510000))
+;;;### (autoloads nil "magit-extras" "magit-extras.el" (22533 64999
+;;;;;;  612350 699000))
 ;;; Generated autoloads from magit-extras.el
 
 (autoload 'magit-run-git-gui "magit-extras" "\
@@ -973,8 +973,8 @@ on a position in a file-visiting buffer.
 
 ;;;***
 
-;;;### (autoloads nil "magit-log" "magit-log.el" (22532 34650 844289
-;;;;;;  196000))
+;;;### (autoloads nil "magit-log" "magit-log.el" (22533 64999 692350
+;;;;;;  667000))
 ;;; Generated autoloads from magit-log.el
 
 (autoload 'magit-log-buffer-file-popup "magit-log" "\
@@ -1056,8 +1056,8 @@ Show commits in a branch that are not merged in the upstream branch.
 
 ;;;***
 
-;;;### (autoloads nil "magit-remote" "magit-remote.el" (22532 34650
-;;;;;;  892289 610000))
+;;;### (autoloads nil "magit-remote" "magit-remote.el" (22533 64999
+;;;;;;  740350 648000))
 ;;; Generated autoloads from magit-remote.el
 
 (autoload 'magit-clone "magit-remote" "\
@@ -1289,8 +1289,8 @@ is asked to pull.  START has to be reachable from that commit.
 
 ;;;***
 
-;;;### (autoloads nil "magit-sequence" "magit-sequence.el" (22532
-;;;;;;  34650 884289 540000))
+;;;### (autoloads nil "magit-sequence" "magit-sequence.el" (22533
+;;;;;;  64999 728350 652000))
 ;;; Generated autoloads from magit-sequence.el
 
 (autoload 'magit-sequencer-continue "magit-sequence" "\
@@ -1440,8 +1440,8 @@ Abort the current rebase operation, restoring the original branch.
 
 ;;;***
 
-;;;### (autoloads nil "magit-stash" "magit-stash.el" (22532 34650
-;;;;;;  832289 94000))
+;;;### (autoloads nil "magit-stash" "magit-stash.el" (22533 64999
+;;;;;;  672350 675000))
 ;;; Generated autoloads from magit-stash.el
  (autoload 'magit-stash-popup "magit-stash" nil t)
 
@@ -1540,8 +1540,8 @@ Show all diffs of a stash in a buffer.
 
 ;;;***
 
-;;;### (autoloads nil "magit-submodule" "magit-submodule.el" (22532
-;;;;;;  34650 908289 747000))
+;;;### (autoloads nil "magit-submodule" "magit-submodule.el" (22533
+;;;;;;  64999 756350 641000))
 ;;; Generated autoloads from magit-submodule.el
  (autoload 'magit-submodule-popup "magit-submodule" nil t)
 
@@ -1631,8 +1631,8 @@ Display a list of the current repository's submodules.
 
 ;;;***
 
-;;;### (autoloads nil "magit-subtree" "magit-subtree.el" (22532 34650
-;;;;;;  792288 750000))
+;;;### (autoloads nil "magit-subtree" "magit-subtree.el" (22533 64999
+;;;;;;  644350 686000))
 ;;; Generated autoloads from magit-subtree.el
  (autoload 'magit-subtree-popup "magit-subtree" nil t)
 
@@ -1668,8 +1668,8 @@ Extract the history of the subtree PREFIX.
 
 ;;;***
 
-;;;### (autoloads nil "magit-wip" "magit-wip.el" (22532 34650 776288
-;;;;;;  613000))
+;;;### (autoloads nil "magit-wip" "magit-wip.el" (22533 64999 620350
+;;;;;;  696000))
 ;;; Generated autoloads from magit-wip.el
 
 (defvar magit-wip-after-save-mode nil "\
@@ -1739,7 +1739,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")
-;;;;;;  (22532 34650 896289 644000))
+;;;;;;  (22533 64999 748350 644000))
 
 ;;;***
 

elpa/magit-20161017.405/magit-blame.el

@@ -197,8 +197,8 @@ and then turned on again when turning off the latter."
   :man-page "git-blame"
   :switches '((?w "Ignore whitespace" "-w")
               (?r "Do not treat root commits as boundaries" "--root"))
-  :options  '((?C "Detect lines moved or copied between files" "-C")
-              (?M "Detect lines moved or copied within a file" "-M"))
+  :options  '((?M "Detect lines moved or copied within a file" "-M")
+              (?C "Detect lines moved or copied between files" "-C"))
   :actions  '((?b "Blame" magit-blame))
   :default-arguments '("-w")
   :default-action 'magit-blame)

elpa/magit-20161017.405/magit-pkg.el

@@ -1,4 +1,4 @@
-(define-package "magit" "20161016.1325" "A Git porcelain inside Emacs"
+(define-package "magit" "20161017.405" "A Git porcelain inside Emacs"
   '((emacs "24.4")
     (async "20160711.223")
     (dash "20160820.501")

elpa/org-20161010/org-pkg.el

@@ -1,3 +0,0 @@
-(define-package "org"
-  "20161010" "Outline-based notes management and organizer" ( ))
-;; no-byte-compile: t