updates

elpa/0blayout-20190703.527/0blayout-autoloads.el

@@ -0,0 +1,39 @@
+;;; 0blayout-autoloads.el --- automatically extracted autoloads
+;;
+;;; Code:
+
+(add-to-list 'load-path (directory-file-name
+                         (or (file-name-directory #$) (car load-path))))
+
+
+;;;### (autoloads nil "0blayout" "0blayout.el" (0 0 0 0))
+;;; Generated autoloads from 0blayout.el
+
+(autoload '0blayout-add-keybindings-with-prefix "0blayout" "\
+Add 0blayout keybindings using the prefix PREFIX.
+
+\(fn PREFIX)" nil nil)
+
+(defvar 0blayout-mode nil "\
+Non-nil if 0blayout mode is enabled.
+See the `0blayout-mode' command
+for a description of this minor mode.")
+
+(custom-autoload '0blayout-mode "0blayout" nil)
+
+(autoload '0blayout-mode "0blayout" "\
+Handle layouts with ease
+
+\(fn &optional ARG)" t nil)
+
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "0blayout" '("0blayout-")))
+
+;;;***
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; coding: utf-8
+;; End:
+;;; 0blayout-autoloads.el ends here

elpa/0blayout-20190703.527/0blayout-pkg.el

@@ -0,0 +1,2 @@
+;;; -*- no-byte-compile: t -*-
+(define-package "0blayout" "20190703.527" "Layout grouping with ease" 'nil :commit "fd9a8f353dbd45b4628b5f84b8d8c2525ebf571d" :authors '(("Elis \"etu\" Axelsson")) :maintainer '("Elis \"etu\" Axelsson") :keywords '("convenience" "window-management") :url "https://github.com/etu/0blayout")

elpa/0blayout-20161007.2307/0blayout.el → elpa/0blayout-20190703.527/0blayout.el

@@ -4,7 +4,8 @@
 
 ;; Author: Elis "etu" Axelsson
 ;; URL: https://github.com/etu/0blayout
-;; Package-Version: 20161007.2307
+;; Package-Commit: fd9a8f353dbd45b4628b5f84b8d8c2525ebf571d
+;; Package-Version: 20190703.527
 ;; Package-X-Original-Version: 20160918.0
 ;; Version: 1.0.2
 ;; Keywords: convenience, window-management
@@ -50,13 +51,15 @@
 ;;; Code:
 
 (defgroup 0blayout nil
-  "Configuration settings for 0blayout-mode.")
+  "Configuration settings for 0blayout-mode."
+  :group 'convenience)
 
 (defvar 0blayout-alist ()
   "List of the currently defined layouts.")
 
 (defcustom 0blayout-default "default"
   "Name of default layout used."
+  :type 'string
   :group '0blayout)
 
 (defvar 0blayout-keys-map '(("C-c" . 0blayout-new)

elpa/ag-20161228.1641/ag-autoloads.el → elpa/ag-20201031.2202/ag-autoloads.el

@@ -1,9 +1,12 @@
 ;;; ag-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 "ag" "ag.el" (22708 30414 0 0))
+;;;### (autoloads nil "ag" "ag.el" (0 0 0 0))
 ;;; Generated autoloads from ag.el
 
 (autoload 'ag "ag" "\
@@ -112,11 +115,14 @@ Kill all `ag-mode' buffers other than the current buffer.
 
 \(fn)" t nil)
 
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "ag" '("ag-" "ag/")))
+
 ;;;***
 
 ;; Local Variables:
 ;; version-control: never
 ;; no-byte-compile: t
 ;; no-update-autoloads: t
+;; coding: utf-8
 ;; End:
 ;;; ag-autoloads.el ends here

elpa/ag-20201031.2202/ag-pkg.el

@@ -0,0 +1,2 @@
+;;; -*- no-byte-compile: t -*-
+(define-package "ag" "20201031.2202" "A front-end for ag ('the silver searcher'), the C ack replacement." '((dash "2.8.0") (s "1.9.0") (cl-lib "0.5")) :commit "ed7e32064f92f1315cecbfc43f120bbc7508672c" :authors '(("Wilfred Hughes" . "me@wilfred.me.uk")) :maintainer '("Wilfred Hughes" . "me@wilfred.me.uk") :url "https://github.com/Wilfred/ag.el")

elpa/ag-20161228.1641/ag.el → elpa/ag-20201031.2202/ag.el

@@ -3,9 +3,11 @@
 ;; Copyright (C) 2013-2014 Wilfred Hughes <me@wilfred.me.uk>
 ;;
 ;; Author: Wilfred Hughes <me@wilfred.me.uk>
+;; URL: https://github.com/Wilfred/ag.el
+;; Package-Version: 20201031.2202
+;; Package-Commit: ed7e32064f92f1315cecbfc43f120bbc7508672c
 ;; Created: 11 January 2013
 ;; Version: 0.48
-;; Package-Version: 20161228.1641
 ;; Package-Requires: ((dash "2.8.0") (s "1.9.0") (cl-lib "0.5"))
 ;;; Commentary:
 
@@ -63,6 +65,12 @@ print line numbers when the input is a stream."
   :type '(repeat (string))
   :group 'ag)
 
+(defcustom ag-dired-arguments
+  (list "--nocolor" "-S")
+  "Additional arguments passed to ag-dired."
+  :type '(repeat (string))
+  :group 'ag)
+
 (defcustom ag-context-lines nil
   "Number of context lines to include before and after a matching line."
   :type 'integer
@@ -111,6 +119,8 @@ If set to nil, fall back to finding VCS root directories."
   "A list of patterns for files/directories to ignore when searching."
   :type '(repeat (string))
   :group 'ag)
+(make-variable-buffer-local 'ag-ignore-list)
+(put 'ag-ignore-list 'safe-local-variable #'listp)
 
 (require 'compile)
 
@@ -205,8 +215,9 @@ different window, according to `ag-reuse-window'."
          (mapcar (lambda (item) (list "--ignore" item)) ignores)))
 
 (cl-defun ag/search (string directory
-                            &key (regexp nil) (file-regex nil) (file-type nil))
+                            &key (regexp nil) (file-regex nil) (file-type nil) (files '(".")))
   "Run ag searching for the STRING given in DIRECTORY.
+If `files` is passed, tell ag to look only on those files.
 If REGEXP is non-nil, treat STRING as a regular expression."
   (let ((default-directory (file-name-as-directory directory))
         (arguments ag-arguments)
@@ -241,7 +252,7 @@ If REGEXP is non-nil, treat STRING as a regular expression."
       (error "No such directory %s" default-directory))
     (let ((command-string
            (mapconcat #'shell-quote-argument
-                      (append (list ag-executable) arguments (list string "."))
+                      (append (list ag-executable) arguments (append `(,string) files))
                       " ")))
       ;; If we're called with a prefix, let the user modify the command before
       ;; running it. Typically this means they want to pass additional arguments.
@@ -540,10 +551,17 @@ See also `find-dired'."
          (buffer-name (if ag-reuse-buffers
                           "*ag dired*"
                         (format "*ag dired pattern:%s dir:%s*" regexp dir)))
-         (cmd (concat ag-executable " --nocolor -g '" regexp "' "
-                      (shell-quote-argument dir)
-                      " | grep -v '^$' | sed s/\\'/\\\\\\\\\\'/ | xargs -I '{}' ls "
-                      dired-listing-switches " '{}' &")))
+         (cmd (if (string= system-type "windows-nt")
+                  (concat ag-executable " " (combine-and-quote-strings ag-dired-arguments " ") " -g \"" regexp "\" "
+                          (shell-quote-argument dir)
+                          " | grep -v \"^$\" | sed \"s/'/\\\\\\\\'/g\" | xargs -I '{}' "
+                          insert-directory-program " "
+                          dired-listing-switches " '{}' &")
+                (concat ag-executable " " (combine-and-quote-strings ag-dired-arguments " ") " -g '" regexp "' "
+                        (shell-quote-argument dir)
+                        " | grep -v '^$' | sed s/\\'/\\\\\\\\\\'/g | xargs -I '{}' "
+                        insert-directory-program " "
+                        dired-listing-switches " '{}' &"))))
     (with-current-buffer (get-buffer-create buffer-name)
       (switch-to-buffer (current-buffer))
       (widen)