Update packages

This commit is contained in:
Gergely Polonkai 2016-10-22 16:25:44 +02:00
parent 42b437055b
commit 0d078ffb05
1156 changed files with 238 additions and 219 deletions

View File

@ -3,7 +3,7 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "ag" "ag.el" (22454 5337 972625 179000))
;;;### (autoloads nil "ag" "ag.el" (22539 28068 810569 198000))
;;; Generated autoloads from ag.el
(autoload 'ag "ag" "\

View File

@ -1,2 +1,2 @@
;;; -*- no-byte-compile: t -*-
(define-package "ag" "20160731.1323" "A front-end for ag ('the silver searcher'), the C ack replacement." '((dash "2.8.0") (s "1.9.0") (cl-lib "0.5")))
(define-package "ag" "20161021.2133" "A front-end for ag ('the silver searcher'), the C ack replacement." '((dash "2.8.0") (s "1.9.0") (cl-lib "0.5")))

View File

@ -5,7 +5,7 @@
;; Author: Wilfred Hughes <me@wilfred.me.uk>
;; Created: 11 January 2013
;; Version: 0.48
;; Package-Version: 20160731.1323
;; Package-Version: 20161021.2133
;; Package-Requires: ((dash "2.8.0") (s "1.9.0") (cl-lib "0.5"))
;;; Commentary:
@ -195,9 +195,9 @@ different window, according to `ag-reuse-window'."
(defun ag/buffer-name (search-string directory regexp)
"Return a buffer name formatted according to ag.el conventions."
(cond
(ag-reuse-buffers "*ag search*")
(regexp (format "*ag search regexp:%s dir:%s*" search-string directory))
(:else (format "*ag search text:%s dir:%s*" search-string directory))))
(ag-reuse-buffers "*ag search")
(regexp (format "*ag search regexp:%s dir:%s" search-string directory))
(:else (format "*ag search text:%s dir:%s" search-string directory))))
(defun ag/format-ignore (ignores)
"Prepend '--ignore' to every item in IGNORES."

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "flycheck" "flycheck.el" (22535 7931 202223
;;;;;; 337000))
;;;### (autoloads nil "flycheck" "flycheck.el" (22541 41885 978061
;;;;;; 448000))
;;; 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") (22535 7931 198223 338000))
;;;;;; "flycheck-pkg.el") (22541 41885 968061 448000))
;;;***

View File

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

View File

@ -979,9 +979,11 @@ Only has effect when variable `global-flycheck-mode' is non-nil."
"Syntax Checking"
'(["Enable on-the-fly syntax checking" flycheck-mode
:style toggle :selected flycheck-mode
;; Don't let users toggle the mode if there is no syntax checker for this
;; buffer
:enable (or flycheck-mode (flycheck-get-checker-for-buffer))]
:enable (or flycheck-mode
;; Don't let users toggle the mode if there is no syntax
;; checker for this buffer
(seq-find #'flycheck-checker-supports-major-mode-p
flycheck-checkers))]
["Check current buffer" flycheck-buffer flycheck-mode]
["Clear errors in buffer" flycheck-clear t]
"---"
@ -1446,23 +1448,6 @@ A checker is disabled if it is contained in
`flycheck-disabled-checkers'."
(memq checker flycheck-disabled-checkers))
(defun flycheck-possibly-suitable-checkers ()
"Find possibly suitable checkers for the current buffer.
Return a list of all syntax checkers which could possibly be
suitable for the current buffer, if any problems in their setup
were fixed.
Currently this function collects all registered syntax checkers
whose `:modes' contain the current major mode or which do not
have any `:modes', but a `:predicate' that returns non-nil for
the current buffer."
(let (checkers)
(dolist (checker flycheck-checkers)
(when (flycheck-checker-supports-major-mode-p checker major-mode)
(push checker checkers)))
(nreverse checkers)))
;;; Generic syntax checkers
(defconst flycheck-generic-checker-version 2
@ -2161,7 +2146,9 @@ possible problems are shown."
(save-buffer))
(let ((buffer (current-buffer))
(checkers (flycheck-possibly-suitable-checkers)))
;; Get all checkers that support the current major mode
(checkers (seq-filter #'flycheck-checker-supports-major-mode-p
flycheck-checkers)))
;; Now print all applicable checkers
(with-help-window (get-buffer-create " *Flycheck checkers*")
@ -2607,7 +2594,7 @@ discarded."
(error "Unknown status %s from syntax checker %s"
status checker))))))))
(defun flycheck-finish-current-syntax-check (errors cwd)
(defun flycheck-finish-current-syntax-check (errors working-dir)
"Finish the current syntax-check in the current buffer with ERRORS.
ERRORS is a list of `flycheck-error' objects reported by the
@ -2615,18 +2602,19 @@ current syntax check in `flycheck-current-syntax-check'.
Report all ERRORS and potentially start any next syntax checkers.
If the current syntax checker reported excessive errors, it is disabled
via `flycheck-disable-excessive-checker' for subsequent syntax
checks.
If the current syntax checker reported excessive errors, it is
disabled via `flycheck-disable-excessive-checker' for subsequent
syntax checks.
Relative file names in ERRORS will be expanded relative to CWD directory."
Relative file names in ERRORS will be expanded relative to
WORKING-DIR."
(let* ((syntax-check flycheck-current-syntax-check)
(checker (flycheck-syntax-check-checker syntax-check))
(errors (flycheck-relevant-errors
(flycheck-fill-and-expand-error-file-names
(flycheck-filter-errors
(flycheck-assert-error-list-p errors) checker)
cwd))))
working-dir))))
(unless (flycheck-disable-excessive-checker checker errors)
(flycheck-report-current-errors errors))
(let ((next-checker (flycheck-get-next-checker-for-buffer checker)))
@ -3117,18 +3105,18 @@ with `flycheck-process-error-functions'."
(setq flycheck-current-errors nil)
(flycheck-report-status 'not-checked))
(defun flycheck-fill-and-expand-error-file-names (errors cwd)
"Fill and expand file names in ERRORS.
(defun flycheck-fill-and-expand-error-file-names (errors directory)
"Fill and expand file names in ERRORS relative to DIRECTORY.
Expand all file names of ERRORS against the CWD directory.
If the file name of an error is nil fill in the result of
function `buffer-file-name' in the current buffer.
Expand all file names of ERRORS against DIRECTORY. If the file
name of an error is nil fill in the result of function
`buffer-file-name' in the current buffer.
Return ERRORS, modified in-place."
(seq-do (lambda (err)
(setf (flycheck-error-filename err)
(-if-let (filename (flycheck-error-filename err))
(expand-file-name filename cwd)
(expand-file-name filename directory)
(buffer-file-name))))
errors)
errors)

View File

@ -1,2 +0,0 @@
;;; -*- no-byte-compile: t -*-
(define-package "ggtags" "20161001.1836" "emacs frontend to GNU Global source code tagging system" '((emacs "24") (cl-lib "0.5")) :url "https://github.com/leoliu/ggtags" :keywords '("tools" "convenience"))

View File

@ -3,7 +3,7 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "ggtags" "ggtags.el" (22514 17682 180745 86000))
;;;### (autoloads nil "ggtags" "ggtags.el" (22539 28064 510569 202000))
;;; Generated autoloads from ggtags.el
(autoload 'ggtags-find-project "ggtags" "\

View File

@ -0,0 +1,2 @@
;;; -*- no-byte-compile: t -*-
(define-package "ggtags" "20161022.251" "emacs frontend to GNU Global source code tagging system" '((emacs "24") (cl-lib "0.5")) :url "https://github.com/leoliu/ggtags" :keywords '("tools" "convenience"))

View File

@ -3,8 +3,8 @@
;; Copyright (C) 2013-2016 Free Software Foundation, Inc.
;; Author: Leo Liu <sdl.web@gmail.com>
;; Version: 0.8.12
;; Package-Version: 20161001.1836
;; Version: 0.8.13
;; Package-Version: 20161022.251
;; Keywords: tools, convenience
;; Created: 2013-01-29
;; URL: https://github.com/leoliu/ggtags
@ -554,7 +554,7 @@ Value is new modtime if updated."
project)
(setq ggtags-last-default-directory default-directory)
(setq ggtags-project-root
(or (ignore-errors-unless-debug
(or (ignore-errors
(file-name-as-directory
(concat (file-remote-p default-directory)
;; Resolves symbolic links

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "helm-adaptive" "helm-adaptive.el" (22536 47020
;;;;;; 422666 353000))
;;;### (autoloads nil "helm-adaptive" "helm-adaptive.el" (22541 41895
;;;;;; 808061 444000))
;;; 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" (22536 47020 390666
;;;;;; 378000))
;;;### (autoloads nil "helm-apt" "helm-apt.el" (22541 41895 748061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 474666 314000))
;;;### (autoloads nil "helm-bookmark" "helm-bookmark.el" (22541 41895
;;;;;; 888061 444000))
;;; 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" (22536 47020
;;;;;; 378666 386000))
;;;### (autoloads nil "helm-buffers" "helm-buffers.el" (22541 41895
;;;;;; 728061 444000))
;;; 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" (22536 47020 462666
;;;;;; 323000))
;;;### (autoloads nil "helm-color" "helm-color.el" (22541 41895 868061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 326666 426000))
;;;### (autoloads nil "helm-command" "helm-command.el" (22541 41895
;;;;;; 638061 444000))
;;; 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" (22536 47020
;;;;;; 470666 317000))
;;;### (autoloads nil "helm-config" "helm-config.el" (22541 41895
;;;;;; 878061 444000))
;;; Generated autoloads from helm-config.el
(autoload 'helm-configuration "helm-config" "\
@ -117,8 +117,8 @@ Customize `helm'.
;;;***
;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22536 47020
;;;;;; 398666 371000))
;;;### (autoloads nil "helm-dabbrev" "helm-dabbrev.el" (22541 41895
;;;;;; 758061 444000))
;;; 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" (22536 47020 466666
;;;;;; 320000))
;;;### (autoloads nil "helm-elisp" "helm-elisp.el" (22541 41895 868061
;;;;;; 444000))
;;; 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"
;;;;;; (22536 47020 330666 423000))
;;;;;; (22541 41895 638061 444000))
;;; 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" (22536 47020
;;;;;; 314666 434000))
;;;### (autoloads nil "helm-elscreen" "helm-elscreen.el" (22541 41895
;;;;;; 608061 444000))
;;; 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" (22536 47020
;;;;;; 350666 407000))
;;;### (autoloads nil "helm-eshell" "helm-eshell.el" (22541 41895
;;;;;; 668061 444000))
;;; 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" (22536 47020 426666
;;;;;; 350000))
;;;### (autoloads nil "helm-eval" "helm-eval.el" (22541 41895 828061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 302666 444000))
;;;### (autoloads nil "helm-external" "helm-external.el" (22541 41895
;;;;;; 598061 444000))
;;; 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" (22536 47020 402666
;;;;;; 368000))
;;;### (autoloads nil "helm-files" "helm-files.el" (22541 41895 768061
;;;;;; 444000))
;;; 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" (22536 47020 354666
;;;;;; 404000))
;;;### (autoloads nil "helm-font" "helm-font.el" (22541 41895 678061
;;;;;; 444000))
;;; 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" (22536 47020 478666
;;;;;; 311000))
;;;### (autoloads nil "helm-grep" "helm-grep.el" (22541 41895 898061
;;;;;; 444000))
;;; 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" (22536 47020 298666
;;;;;; 447000))
;;;### (autoloads nil "helm-help" "helm-help.el" (22541 41895 588061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 386666 380000))
;;;### (autoloads nil "helm-id-utils" "helm-id-utils.el" (22541 41895
;;;;;; 748061 444000))
;;; 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" (22536 47020 366666
;;;;;; 395000))
;;;### (autoloads nil "helm-imenu" "helm-imenu.el" (22541 41895 708061
;;;;;; 444000))
;;; 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" (22536 47020 362666
;;;;;; 398000))
;;;### (autoloads nil "helm-info" "helm-info.el" (22541 41895 688061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 306666 440000))
;;;### (autoloads nil "helm-locate" "helm-locate.el" (22541 41895
;;;;;; 598061 444000))
;;; 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" (22536 47020 430666
;;;;;; 347000))
;;;### (autoloads nil "helm-man" "helm-man.el" (22541 41895 838061
;;;;;; 444000))
;;; 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" (22536 47020 414666
;;;;;; 359000))
;;;### (autoloads nil "helm-misc" "helm-misc.el" (22541 41895 798061
;;;;;; 444000))
;;; 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" (22536 47020 286666
;;;;;; 456000))
;;;### (autoloads nil "helm-mode" "helm-mode.el" (22541 41895 558061
;;;;;; 444000))
;;; 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" (22536 47020 450666
;;;;;; 331000))
;;;### (autoloads nil "helm-net" "helm-net.el" (22541 41895 858061
;;;;;; 444000))
;;; 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" (22536 47020 482666
;;;;;; 308000))
;;;### (autoloads nil "helm-org" "helm-org.el" (22541 41895 898061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 442666 338000))
;;;### (autoloads nil "helm-regexp" "helm-regexp.el" (22541 41895
;;;;;; 848061 444000))
;;; 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" (22536 47020 294666
;;;;;; 450000))
;;;### (autoloads nil "helm-ring" "helm-ring.el" (22541 41895 578061
;;;;;; 444000))
;;; 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" (22536 47020
;;;;;; 370666 392000))
;;;### (autoloads nil "helm-semantic" "helm-semantic.el" (22541 41895
;;;;;; 718061 444000))
;;; 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" (22536 47020 394666
;;;;;; 374000))
;;;### (autoloads nil "helm-sys" "helm-sys.el" (22541 41895 758061
;;;;;; 444000))
;;; 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" (22536 47020 346666
;;;;;; 411000))
;;;### (autoloads nil "helm-tags" "helm-tags.el" (22541 41895 658061
;;;;;; 444000))
;;; 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" (22536 47020 318666
;;;;;; 431000))
;;;### (autoloads nil "helm-utils" "helm-utils.el" (22541 41895 628061
;;;;;; 444000))
;;; 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")
;;;;;; (22536 47020 486666 305000))
;;;;;; (22541 41895 908061 444000))
;;;***

View File

@ -928,6 +928,9 @@ These extensions will be added to command line with --include arg of grep."
((candidates-process :initform 'helm-grep-collect-candidates)
(filter-one-by-one :initform 'helm-grep-filter-one-by-one)
(keymap :initform helm-grep-map)
(pcre :initarg :pcre :initform nil
:documentation
" Backend is using pcre regexp engine when non--nil.")
(nohighlight :initform t)
(nomark :initform t)
(backend :initarg :backend
@ -984,10 +987,11 @@ in recurse, and ignore EXTS, search being made recursively on files matching
(file-remote-p helm-ff-default-directory))
(error "Error: Remote operation not supported with ack-grep."))
(let* (non-essential
(ack-rec-p (helm-grep-use-ack-p :where 'recursive))
(exts (and recurse
;; [FIXME] I could handle this from helm-walk-directory.
(not (eq backend 'zgrep)) ; zgrep doesn't handle -r opt.
(not (helm-grep-use-ack-p :where 'recursive))
(not ack-rec-p)
(or exts (helm-grep-get-file-extensions targets))))
(include-files
(and exts
@ -1000,7 +1004,7 @@ in recurse, and ignore EXTS, search being made recursively on files matching
(types (and (not include-files)
(not (eq backend 'zgrep))
recurse
(helm-grep-use-ack-p :where 'recursive)
ack-rec-p
;; When %e format spec is not specified
;; ignore types and do not prompt for choice.
(string-match "%e" helm-grep-default-command)
@ -1034,7 +1038,8 @@ in recurse, and ignore EXTS, search being made recursively on files matching
'default-directory helm-ff-default-directory) ;; [1]
;; Setup the source.
(set source (helm-make-source src-name 'helm-grep-class
:backend backend))
:backend backend
:pcre (if recurse ack-rec-p (helm-grep-use-ack-p))))
(helm
:sources source
:buffer (format "*helm %s*" (helm-grep-command recurse backend))
@ -1413,6 +1418,9 @@ if available with current AG version."
(defclass helm-grep-ag-class (helm-source-async)
((nohighlight :initform t)
(pcre :initarg :pcre :initform t
:documentation
" Backend is using pcre regexp engine when non--nil.")
(keymap :initform helm-grep-map)
(help-message :initform 'helm-grep-help-message)
(filter-one-by-one :initform 'helm-grep-filter-one-by-one)

View File

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

View File

@ -267,7 +267,8 @@ 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)))
(with-helm-current-buffer
(unless helm-yank-point (setq helm-yank-point (point))))
(goto-char (point-min))
(helm-goto-char (point-at-bol lineno))
(unless noanim
@ -612,7 +613,12 @@ If STRING is non--nil return instead a space separated string."
(catch 'empty-line
(cl-loop with ov
for r in (helm-remove-if-match
"\\`!" (split-string helm-input))
"\\`!" (split-string
;; Needed for highlighting AG matches.
(if (with-helm-buffer
(assq 'pcre (helm-get-current-source)))
(helm--translate-pcre-to-elisp helm-input)
helm-input)))
do (save-excursion
(goto-char start-match)
(while (condition-case _err
@ -630,6 +636,26 @@ If STRING is non--nil return instead a space separated string."
(overlay-put ov 'priority 1)))))))
(recenter)))
(defun helm--translate-pcre-to-elisp (regexp)
"Should translate pcre REGEXP to elisp regexp.
Assume regexp is a pcre based regexp."
(with-temp-buffer
(insert " " regexp " ")
(goto-char (point-min))
(save-excursion
;; match (){}| unquoted
(helm-awhile (and (re-search-forward "\\([(){}|]\\)" nil t)
(match-string 1))
(let ((pos (match-beginning 1)))
(if (eql (char-before pos) ?\\)
(delete-region pos (1- pos))
(replace-match (concat "\\" it) t t nil 1)))))
;; match \s or \S
(helm-awhile (and (re-search-forward "\\S\\?\\(\\s\\[sS]\\)[^-]" nil t)
(match-string 1))
(replace-match (concat it "-") t t nil 1))
(buffer-substring (1+ (point-min)) (1- (point-max)))))
(defun helm-match-line-cleanup ()
(when helm-match-line-overlay
(delete-overlay helm-match-line-overlay)

View File

@ -3,7 +3,7 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "helm" "helm.el" (22538 14678 331196 868000))
;;;### (autoloads nil "helm" "helm.el" (22541 41903 478061 441000))
;;; 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") (22538 14678 343196 850000))
;;;;;; "helm-source.el") (22541 41903 498061 441000))
;;;***

View File

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

View File

@ -63,21 +63,16 @@ when these options are used."
;;; Build regexps
;;
;;
(defvar helm-mm-space-regexp "[\\ ] "
(defconst helm-mm-space-regexp "\\s\\\\s-"
"Regexp to represent space itself in multiple regexp match.")
(defun helm-mm-split-pattern (pattern)
"Split PATTERN if it contain spaces and return resulting list.
If spaces in PATTERN are escaped, don't split at this place.
i.e \"foo bar\"=> (\"foo\" \"bar\")
but \"foo\ bar\"=> (\"foobar\")."
(if (string= pattern "")
'("")
(cl-loop for s in (split-string
(replace-regexp-in-string helm-mm-space-regexp
"\000\000" pattern)
" " t)
collect (replace-regexp-in-string "\000\000" " " s))))
i.e \"foo bar baz\"=> (\"foo\" \"bar\" \"baz\")
but \"foo\\ bar baz\"=> (\"foo\\s-bar\" \"baz\")."
(split-string
(replace-regexp-in-string helm-mm-space-regexp "\\\\s-" pattern)))
(defun helm-mm-1-make-regexp (pattern)
"Replace spaces in PATTERN with \"\.*\"."

View File

@ -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" (22538 14680 167194
;;;;;; 56000))
;;;### (autoloads nil "git-rebase" "git-rebase.el" (22541 41908 238061
;;;;;; 440000))
;;; 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" (22538 14680 243193 940000))
;;;### (autoloads nil "magit" "magit.el" (22541 41908 348061 440000))
;;; 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" (22538 14680
;;;;;; 187194 25000))
;;;### (autoloads nil "magit-apply" "magit-apply.el" (22541 41908
;;;;;; 268061 440000))
;;; 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" (22538
;;;;;; 14680 139194 99000))
;;;### (autoloads nil "magit-autorevert" "magit-autorevert.el" (22541
;;;;;; 41908 158061 440000))
;;; 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" (22538 14680
;;;;;; 179194 37000))
;;;### (autoloads nil "magit-bisect" "magit-bisect.el" (22541 41908
;;;;;; 258061 440000))
;;; 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" (22538 14680
;;;;;; 231193 959000))
;;;### (autoloads nil "magit-blame" "magit-blame.el" (22541 41908
;;;;;; 338061 440000))
;;; 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" (22538 14680
;;;;;; 143194 93000))
;;;### (autoloads nil "magit-commit" "magit-commit.el" (22541 41908
;;;;;; 168061 440000))
;;; 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" (22538 14680 223193
;;;;;; 968000))
;;;### (autoloads nil "magit-diff" "magit-diff.el" (22541 41908 318061
;;;;;; 440000))
;;; 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" (22538 14680
;;;;;; 211193 989000))
;;;### (autoloads nil "magit-ediff" "magit-ediff.el" (22541 41908
;;;;;; 308061 440000))
;;; 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" (22538 14680
;;;;;; 147194 87000))
;;;### (autoloads nil "magit-extras" "magit-extras.el" (22541 41908
;;;;;; 188061 440000))
;;; 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" (22538 14680 215193
;;;;;; 982000))
;;;### (autoloads nil "magit-log" "magit-log.el" (22541 41908 308061
;;;;;; 440000))
;;; 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" (22538 14680
;;;;;; 263193 909000))
;;;### (autoloads nil "magit-remote" "magit-remote.el" (22541 41908
;;;;;; 388061 439000))
;;; 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" (22538
;;;;;; 14680 251193 925000))
;;;### (autoloads nil "magit-sequence" "magit-sequence.el" (22541
;;;;;; 41908 368061 440000))
;;; 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" (22538 14680
;;;;;; 199194 6000))
;;;### (autoloads nil "magit-stash" "magit-stash.el" (22541 41908
;;;;;; 288061 440000))
;;; 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" (22538
;;;;;; 14680 279193 884000))
;;;### (autoloads nil "magit-submodule" "magit-submodule.el" (22541
;;;;;; 41908 408061 439000))
;;; 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" (22538 14680
;;;;;; 171194 49000))
;;;### (autoloads nil "magit-subtree" "magit-subtree.el" (22541 41908
;;;;;; 248061 440000))
;;; 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" (22538 14680 155194
;;;;;; 73000))
;;;### (autoloads nil "magit-wip" "magit-wip.el" (22541 41908 208061
;;;;;; 440000))
;;; 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")
;;;;;; (22538 14680 271193 896000))
;;;;;; (22541 41908 388061 439000))
;;;***

View File

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

View File

@ -796,8 +796,8 @@ as argument."
(when (featurep 'dired)
(dired-uncache default-dir))
(when (buffer-live-p process-buf)
(magit-process-unset-mode-line)
(with-current-buffer process-buf
(magit-process-unset-mode-line)
(let ((inhibit-read-only t)
(marker (magit-section-start section)))
(goto-char marker)
@ -834,18 +834,18 @@ as argument."
(if magit-process-raise-error
(signal 'magit-git-error (list (format "%s (in %s)" msg default-dir)))
(when (buffer-live-p process-buf)
(--when-let (magit-mode-get-buffer 'magit-status-mode)
(when (buffer-live-p it)
(with-current-buffer it
(setq magit-this-error msg))))
(message "%s ... [%s buffer %s for details]" msg
(-if-let (key (and (buffer-live-p command-buf)
(with-current-buffer command-buf
(car (where-is-internal
'magit-process-buffer)))))
(format "Hit %s to see" (key-description key))
"See")
(buffer-name process-buf))))))
(with-current-buffer process-buf
(-when-let (status-buf (magit-mode-get-buffer 'magit-status-mode))
(with-current-buffer status-buf
(setq magit-this-error msg)))))
(message "%s ... [%s buffer %s for details]" msg
(-if-let (key (and (buffer-live-p command-buf)
(with-current-buffer command-buf
(car (where-is-internal
'magit-process-buffer)))))
(format "Hit %s to see" (key-description key))
"See")
(buffer-name process-buf)))))
arg)
(defun magit-process-display-buffer (process)

View File

@ -3123,7 +3123,7 @@ Also see *note (gitman)git-bisect:: .
When bisecting is not in progress, then the popup buffer features the
following commands.
B s (magit-bisect-start)
B B (magit-bisect-start)
Start a bisect session.
@ -3131,7 +3131,7 @@ following commands.
command starts such a bisect session by asking for a known good and
a bad commit.
B u (magit-bisect-run)
B s (magit-bisect-run)
Bisect automatically by running commands after each step.
@ -7561,6 +7561,7 @@ Appendix B Keystroke Index
* A s: Cherry picking. (line 39)
* B: Bisecting. (line 8)
* b: The branch popup. (line 12)
* B B: Bisecting. (line 16)
* B b: Bisecting. (line 31)
* b b: The branch popup. (line 29)
* b c: The branch popup. (line 47)
@ -7570,9 +7571,8 @@ Appendix B Keystroke Index
* b n: The branch popup. (line 37)
* B r: Bisecting. (line 47)
* b r: The branch popup. (line 105)
* B s: Bisecting. (line 16)
* B s: Bisecting. (line 24)
* b s: The branch popup. (line 54)
* B u: Bisecting. (line 24)
* b x: The branch popup. (line 82)
* c: Initiating a commit. (line 8)
* c <1>: Editing rebase sequences.

View File

@ -1,5 +0,0 @@
(define-package "multiple-cursors" "20160719.216" "Multiple cursors for Emacs."
'((cl-lib "0.5")))
;; Local Variables:
;; no-byte-compile: t
;; End:

View File

@ -1,10 +1,10 @@
;;; multiple-cursors-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 "mc-edit-lines" "mc-edit-lines.el" (22490 32823
;;;;;; 997859 430000))
;;;### (autoloads nil "mc-edit-lines" "mc-edit-lines.el" (22539 28048
;;;;;; 230569 207000))
;;; Generated autoloads from mc-edit-lines.el
(autoload 'mc/edit-lines "mc-edit-lines" "\
@ -34,7 +34,7 @@ Add one cursor to the beginning of each line in the active region.
;;;***
;;;### (autoloads nil "mc-hide-unmatched-lines-mode" "mc-hide-unmatched-lines-mode.el"
;;;;;; (22490 32824 21859 382000))
;;;;;; (22539 28048 260569 207000))
;;; Generated autoloads from mc-hide-unmatched-lines-mode.el
(autoload 'mc-hide-unmatched-lines-mode "mc-hide-unmatched-lines-mode" "\
@ -48,8 +48,8 @@ mode. To leave this mode press <return> or \"C-g\"
;;;***
;;;### (autoloads nil "mc-mark-more" "mc-mark-more.el" (22490 32824
;;;;;; 45859 333000))
;;;### (autoloads nil "mc-mark-more" "mc-mark-more.el" (22539 28048
;;;;;; 270569 207000))
;;; Generated autoloads from mc-mark-more.el
(autoload 'mc/mark-next-like-this "mc-mark-more" "\
@ -246,8 +246,8 @@ Mark the tag we're in and its pair for renaming.
;;;***
;;;### (autoloads nil "mc-mark-pop" "mc-mark-pop.el" (22490 32824
;;;;;; 13859 397000))
;;;### (autoloads nil "mc-mark-pop" "mc-mark-pop.el" (22539 28048
;;;;;; 250569 207000))
;;; Generated autoloads from mc-mark-pop.el
(autoload 'mc/mark-pop "mc-mark-pop" "\
@ -259,7 +259,7 @@ to the popped mark.
;;;***
;;;### (autoloads nil "mc-separate-operations" "mc-separate-operations.el"
;;;;;; (22490 32824 29859 364000))
;;;;;; (22539 28048 260569 207000))
;;; Generated autoloads from mc-separate-operations.el
(autoload 'mc/insert-numbers "mc-separate-operations" "\
@ -299,7 +299,7 @@ Aligns all cursors with whitespace like `mc/vertical-align' does
;;;***
;;;### (autoloads nil "multiple-cursors-core" "multiple-cursors-core.el"
;;;;;; (22490 32823 989859 446000))
;;;;;; (22539 28048 220569 207000))
;;; Generated autoloads from multiple-cursors-core.el
(autoload 'multiple-cursors-mode "multiple-cursors-core" "\
@ -310,7 +310,7 @@ Mode while multiple cursors are active.
;;;***
;;;### (autoloads nil "rectangular-region-mode" "rectangular-region-mode.el"
;;;;;; (22490 32824 9859 405000))
;;;;;; (22539 28048 240569 207000))
;;; Generated autoloads from rectangular-region-mode.el
(autoload 'set-rectangular-region-anchor "rectangular-region-mode" "\
@ -329,7 +329,7 @@ A mode for creating a rectangular region to edit
;;;***
;;;### (autoloads nil nil ("mc-cycle-cursors.el" "multiple-cursors-pkg.el"
;;;;;; "multiple-cursors.el") (22490 32824 65463 898000))
;;;;;; "multiple-cursors.el") (22539 28048 280569 207000))
;;;***

View File

@ -575,9 +575,11 @@ from being executed if in multiple-cursors-mode."
(overlay-put cursor 'kill-ring kill-ring)
(overlay-put cursor 'kill-ring-yank-pointer kill-ring-yank-pointer)))))))
(defvar mc/list-file (locate-user-emacs-file ".mc-lists.el")
(defcustom mc/list-file (locate-user-emacs-file ".mc-lists.el")
"The position of the file that keeps track of your preferences
for running commands with multiple cursors.")
for running commands with multiple cursors."
:type 'file
:group 'multiple-cursors)
(defun mc/dump-list (list-symbol)
"Insert (setq 'LIST-SYMBOL LIST-VALUE) to current buffer."

View File

@ -0,0 +1,5 @@
(define-package "multiple-cursors" "20161021.1431" "Multiple cursors for Emacs."
'((cl-lib "0.5")))
;; Local Variables:
;; no-byte-compile: t
;; End:

View File

@ -1,7 +0,0 @@
(define-package "yasnippet" "20160924.2001" "Yet another snippet extension for Emacs."
'((cl-lib "0.5"))
:url "http://github.com/capitaomorte/yasnippet" :keywords
'("convenience" "emulation"))
;; Local Variables:
;; no-byte-compile: t
;; End:

Some files were not shown because too many files have changed in this diff Show More