[Misc] Package updates
This commit is contained in:
parent
b55dbfa9d3
commit
1d579ffa14
|
@ -1,2 +0,0 @@
|
||||||
;;; -*- no-byte-compile: t -*-
|
|
||||||
(define-package "dash" "20171028.854" "A modern list library for Emacs" 'nil :commit "91d8cb01e62bab0d6267d3d4dbcabd6da6fdea78" :keywords '("lists"))
|
|
|
@ -3,7 +3,7 @@
|
||||||
;;; Code:
|
;;; Code:
|
||||||
(add-to-list 'load-path (directory-file-name (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.el") (23028 47952 758677 500000))
|
;;;### (autoloads nil nil ("dash.el") (23179 13963 741041 342000))
|
||||||
|
|
||||||
;;;***
|
;;;***
|
||||||
|
|
|
@ -0,0 +1,2 @@
|
||||||
|
;;; -*- no-byte-compile: t -*-
|
||||||
|
(define-package "dash" "20180206.2124" "A modern list library for Emacs" 'nil :commit "48a5015dd1314a8bcad48f2ad8866dd911001b01" :keywords '("lists"))
|
|
@ -4,7 +4,7 @@
|
||||||
|
|
||||||
;; Author: Magnar Sveen <magnars@gmail.com>
|
;; Author: Magnar Sveen <magnars@gmail.com>
|
||||||
;; Version: 2.13.0
|
;; Version: 2.13.0
|
||||||
;; Package-Version: 20171028.854
|
;; Package-Version: 20180206.2124
|
||||||
;; Keywords: lists
|
;; Keywords: lists
|
||||||
|
|
||||||
;; This program is free software; you can redistribute it and/or modify
|
;; This program is free software; you can redistribute it and/or modify
|
||||||
|
@ -1325,7 +1325,7 @@ combinations created by taking one element from each list in
|
||||||
order. The results are flattened, ignoring the tensor structure
|
order. The results are flattened, ignoring the tensor structure
|
||||||
of the result. This is equivalent to calling:
|
of the result. This is equivalent to calling:
|
||||||
|
|
||||||
(-flatten-n (1- (length lists)) (apply '-table fn lists))
|
(-flatten-n (1- (length lists)) (apply \\='-table fn lists))
|
||||||
|
|
||||||
but the implementation here is much more efficient.
|
but the implementation here is much more efficient.
|
||||||
|
|
||||||
|
@ -2047,7 +2047,7 @@ execute body."
|
||||||
"Tests for equality use this function or `equal' if this is nil.
|
"Tests for equality use this function or `equal' if this is nil.
|
||||||
It should only be set using dynamic scope with a let, like:
|
It should only be set using dynamic scope with a let, like:
|
||||||
|
|
||||||
(let ((-compare-fn #'=)) (-union numbers1 numbers2 numbers3)")
|
(let ((-compare-fn #\\='=)) (-union numbers1 numbers2 numbers3)")
|
||||||
|
|
||||||
(defun -distinct (list)
|
(defun -distinct (list)
|
||||||
"Return a new list with all duplicates removed.
|
"Return a new list with all duplicates removed.
|
||||||
|
@ -2116,6 +2116,12 @@ or with `-compare-fn' if that's non-nil."
|
||||||
"Return all suffixes of LIST"
|
"Return all suffixes of LIST"
|
||||||
(-reductions-r-from 'cons nil list))
|
(-reductions-r-from 'cons nil list))
|
||||||
|
|
||||||
|
(defun -common-prefix (&rest lists)
|
||||||
|
"Return the longest common prefix of LISTS."
|
||||||
|
(declare (pure t) (side-effect-free t))
|
||||||
|
(--reduce (--take-while (and acc (equal (pop acc) it)) it)
|
||||||
|
lists))
|
||||||
|
|
||||||
(defun -contains? (list element)
|
(defun -contains? (list element)
|
||||||
"Return non-nil if LIST contains ELEMENT.
|
"Return non-nil if LIST contains ELEMENT.
|
||||||
|
|
||||||
|
@ -2503,12 +2509,15 @@ structure such as plist or alist."
|
||||||
(eval-after-load 'lisp-mode
|
(eval-after-load 'lisp-mode
|
||||||
'(progn
|
'(progn
|
||||||
(let ((new-keywords '(
|
(let ((new-keywords '(
|
||||||
|
"!cons"
|
||||||
|
"!cdr"
|
||||||
"-each"
|
"-each"
|
||||||
"--each"
|
"--each"
|
||||||
"-each-indexed"
|
"-each-indexed"
|
||||||
"--each-indexed"
|
"--each-indexed"
|
||||||
"-each-while"
|
"-each-while"
|
||||||
"--each-while"
|
"--each-while"
|
||||||
|
"-doto"
|
||||||
"-dotimes"
|
"-dotimes"
|
||||||
"--dotimes"
|
"--dotimes"
|
||||||
"-map"
|
"-map"
|
||||||
|
@ -2581,6 +2590,10 @@ structure such as plist or alist."
|
||||||
"-last"
|
"-last"
|
||||||
"--last"
|
"--last"
|
||||||
"-first-item"
|
"-first-item"
|
||||||
|
"-second-item"
|
||||||
|
"-third-item"
|
||||||
|
"-fourth-item"
|
||||||
|
"-fifth-item"
|
||||||
"-last-item"
|
"-last-item"
|
||||||
"-butlast"
|
"-butlast"
|
||||||
"-count"
|
"-count"
|
||||||
|
@ -2593,8 +2606,13 @@ structure such as plist or alist."
|
||||||
"--any-p"
|
"--any-p"
|
||||||
"-some-p"
|
"-some-p"
|
||||||
"--some-p"
|
"--some-p"
|
||||||
|
"-some->"
|
||||||
|
"-some->>"
|
||||||
|
"-some-->"
|
||||||
"-all?"
|
"-all?"
|
||||||
|
"-all-p"
|
||||||
"--all?"
|
"--all?"
|
||||||
|
"--all-p"
|
||||||
"-every?"
|
"-every?"
|
||||||
"--every?"
|
"--every?"
|
||||||
"-all-p"
|
"-all-p"
|
||||||
|
@ -2612,6 +2630,8 @@ structure such as plist or alist."
|
||||||
"-slice"
|
"-slice"
|
||||||
"-take"
|
"-take"
|
||||||
"-drop"
|
"-drop"
|
||||||
|
"-drop-last"
|
||||||
|
"-take-last"
|
||||||
"-take-while"
|
"-take-while"
|
||||||
"--take-while"
|
"--take-while"
|
||||||
"-drop-while"
|
"-drop-while"
|
||||||
|
@ -2635,6 +2655,10 @@ structure such as plist or alist."
|
||||||
"-partition-in-steps"
|
"-partition-in-steps"
|
||||||
"-partition-all"
|
"-partition-all"
|
||||||
"-partition"
|
"-partition"
|
||||||
|
"-partition-after-item"
|
||||||
|
"-partition-after-pred"
|
||||||
|
"-partition-before-item"
|
||||||
|
"-partition-before-pred"
|
||||||
"-partition-by"
|
"-partition-by"
|
||||||
"--partition-by"
|
"--partition-by"
|
||||||
"-partition-by-header"
|
"-partition-by-header"
|
||||||
|
@ -2643,10 +2667,12 @@ structure such as plist or alist."
|
||||||
"--group-by"
|
"--group-by"
|
||||||
"-interpose"
|
"-interpose"
|
||||||
"-interleave"
|
"-interleave"
|
||||||
|
"-unzip"
|
||||||
"-zip-with"
|
"-zip-with"
|
||||||
"--zip-with"
|
"--zip-with"
|
||||||
"-zip"
|
"-zip"
|
||||||
"-zip-fill"
|
"-zip-fill"
|
||||||
|
"-zip-pair"
|
||||||
"-cycle"
|
"-cycle"
|
||||||
"-pad"
|
"-pad"
|
||||||
"-annotate"
|
"-annotate"
|
||||||
|
@ -2670,6 +2696,7 @@ structure such as plist or alist."
|
||||||
"->"
|
"->"
|
||||||
"->>"
|
"->>"
|
||||||
"-->"
|
"-->"
|
||||||
|
"-as->"
|
||||||
"-when-let"
|
"-when-let"
|
||||||
"-when-let*"
|
"-when-let*"
|
||||||
"--when-let"
|
"--when-let"
|
||||||
|
@ -2688,6 +2715,7 @@ structure such as plist or alist."
|
||||||
"-permutations"
|
"-permutations"
|
||||||
"-inits"
|
"-inits"
|
||||||
"-tails"
|
"-tails"
|
||||||
|
"-common-prefix"
|
||||||
"-contains?"
|
"-contains?"
|
||||||
"-contains-p"
|
"-contains-p"
|
||||||
"-same-items?"
|
"-same-items?"
|
|
@ -3,7 +3,7 @@
|
||||||
;;; Code:
|
;;; Code:
|
||||||
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
|
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
|
||||||
|
|
||||||
;;;### (autoloads nil "hydra" "hydra.el" (23074 63707 509730 106000))
|
;;;### (autoloads nil "hydra" "hydra.el" (23179 13926 352819 118000))
|
||||||
;;; Generated autoloads from hydra.el
|
;;; Generated autoloads from hydra.el
|
||||||
|
|
||||||
(autoload 'defhydra "hydra" "\
|
(autoload 'defhydra "hydra" "\
|
||||||
|
@ -65,7 +65,7 @@ result of `defhydra'.
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil nil ("hydra-examples.el" "hydra-ox.el" "hydra-pkg.el"
|
;;;### (autoloads nil nil ("hydra-examples.el" "hydra-ox.el" "hydra-pkg.el"
|
||||||
;;;;;; "lv.el") (23074 63707 525730 189000))
|
;;;;;; "lv.el") (23179 13926 364819 184000))
|
||||||
|
|
||||||
;;;***
|
;;;***
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
(define-package "hydra" "20171120.1042" "Make bindings that stick around."
|
(define-package "hydra" "20180201.846" "Make bindings that stick around."
|
||||||
'((cl-lib "0.5"))
|
'((cl-lib "0.5"))
|
||||||
:url "https://github.com/abo-abo/hydra" :keywords
|
:url "https://github.com/abo-abo/hydra" :keywords
|
||||||
'("bindings"))
|
'("bindings"))
|
|
@ -738,15 +738,15 @@ BODY-KEY is the body key binding.
|
||||||
BODY-NAME is the symbol that identifies the Hydra.
|
BODY-NAME is the symbol that identifies the Hydra.
|
||||||
HEADS is a list of heads."
|
HEADS is a list of heads."
|
||||||
(format
|
(format
|
||||||
"Create a hydra with %s body and the heads:\n\n%s\n\n%s"
|
"The heads for the associated hydra are:\n\n%s\n\n%s%s."
|
||||||
(if body-key
|
|
||||||
(format "a \"%s\"" body-key)
|
|
||||||
"no")
|
|
||||||
(mapconcat
|
(mapconcat
|
||||||
(lambda (x)
|
(lambda (x)
|
||||||
(format "\"%s\": `%S'" (car x) (cadr x)))
|
(format "\"%s\": `%S'" (car x) (cadr x)))
|
||||||
heads ",\n")
|
heads ",\n")
|
||||||
(format "The body can be accessed via `%S'." body-name)))
|
(format "The body can be accessed via `%S'" body-name)
|
||||||
|
(if body-key
|
||||||
|
(format ", which is bound to \"%s\"" body-key)
|
||||||
|
"")))
|
||||||
|
|
||||||
(defun hydra--call-interactively-remap-maybe (cmd)
|
(defun hydra--call-interactively-remap-maybe (cmd)
|
||||||
"`call-interactively' the given CMD or its remapped equivalent.
|
"`call-interactively' the given CMD or its remapped equivalent.
|
||||||
|
@ -783,8 +783,10 @@ BODY-AFTER-EXIT is added to the end of the wrapper."
|
||||||
(hydra--make-callable
|
(hydra--make-callable
|
||||||
(cadr head))))
|
(cadr head))))
|
||||||
(doc (if (car head)
|
(doc (if (car head)
|
||||||
(format "%s\n\nCall the head: `%S'." doc (cadr head))
|
(format "Call the head `%S' in the \"%s\" hydra.\n\n%s"
|
||||||
doc))
|
(cadr head) name doc)
|
||||||
|
(format "Call the body in the \"%s\" hydra.\n\n%s"
|
||||||
|
name doc)))
|
||||||
(hint (intern (format "%S/hint" name)))
|
(hint (intern (format "%S/hint" name)))
|
||||||
(body-foreign-keys (hydra--body-foreign-keys body))
|
(body-foreign-keys (hydra--body-foreign-keys body))
|
||||||
(body-timeout (plist-get body :timeout))
|
(body-timeout (plist-get body :timeout))
|
|
@ -4,7 +4,7 @@
|
||||||
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
|
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-bind-key" "use-package-bind-key.el"
|
;;;### (autoloads nil "use-package-bind-key" "use-package-bind-key.el"
|
||||||
;;;;;; (23094 13913 221017 92000))
|
;;;;;; (23179 13836 404336 368000))
|
||||||
;;; Generated autoloads from use-package-bind-key.el
|
;;; Generated autoloads from use-package-bind-key.el
|
||||||
|
|
||||||
(autoload 'use-package-autoload-keymap "use-package-bind-key" "\
|
(autoload 'use-package-autoload-keymap "use-package-bind-key" "\
|
||||||
|
@ -55,8 +55,8 @@ deferred until the prefix key sequence is pressed.
|
||||||
|
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-core" "use-package-core.el" (23094
|
;;;### (autoloads nil "use-package-core" "use-package-core.el" (23179
|
||||||
;;;;;; 13913 161016 787000))
|
;;;;;; 13836 312335 874000))
|
||||||
;;; Generated autoloads from use-package-core.el
|
;;; Generated autoloads from use-package-core.el
|
||||||
|
|
||||||
(autoload 'use-package "use-package-core" "\
|
(autoload 'use-package "use-package-core" "\
|
||||||
|
@ -121,7 +121,7 @@ this file. Usage:
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-delight" "use-package-delight.el"
|
;;;### (autoloads nil "use-package-delight" "use-package-delight.el"
|
||||||
;;;;;; (23094 13913 181016 889000))
|
;;;;;; (23179 13836 356336 111000))
|
||||||
;;; Generated autoloads from use-package-delight.el
|
;;; Generated autoloads from use-package-delight.el
|
||||||
|
|
||||||
(autoload 'use-package-normalize/:delight "use-package-delight" "\
|
(autoload 'use-package-normalize/:delight "use-package-delight" "\
|
||||||
|
@ -137,7 +137,7 @@ Normalize arguments to delight.
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-diminish" "use-package-diminish.el"
|
;;;### (autoloads nil "use-package-diminish" "use-package-diminish.el"
|
||||||
;;;;;; (23094 13913 205017 10000))
|
;;;;;; (23179 13836 388336 282000))
|
||||||
;;; Generated autoloads from use-package-diminish.el
|
;;; Generated autoloads from use-package-diminish.el
|
||||||
|
|
||||||
(autoload 'use-package-normalize/:diminish "use-package-diminish" "\
|
(autoload 'use-package-normalize/:diminish "use-package-diminish" "\
|
||||||
|
@ -153,7 +153,7 @@ Normalize arguments to delight.
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-ensure" "use-package-ensure.el"
|
;;;### (autoloads nil "use-package-ensure" "use-package-ensure.el"
|
||||||
;;;;;; (23094 13913 177016 868000))
|
;;;;;; (23179 13836 340336 24000))
|
||||||
;;; Generated autoloads from use-package-ensure.el
|
;;; Generated autoloads from use-package-ensure.el
|
||||||
|
|
||||||
(autoload 'use-package-normalize/:ensure "use-package-ensure" "\
|
(autoload 'use-package-normalize/:ensure "use-package-ensure" "\
|
||||||
|
@ -168,8 +168,8 @@ Normalize arguments to delight.
|
||||||
|
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-jump" "use-package-jump.el" (23094
|
;;;### (autoloads nil "use-package-jump" "use-package-jump.el" (23179
|
||||||
;;;;;; 13913 213017 52000))
|
;;;;;; 13836 400336 347000))
|
||||||
;;; Generated autoloads from use-package-jump.el
|
;;; Generated autoloads from use-package-jump.el
|
||||||
|
|
||||||
(autoload 'use-package-jump-to-package-form "use-package-jump" "\
|
(autoload 'use-package-jump-to-package-form "use-package-jump" "\
|
||||||
|
@ -183,8 +183,8 @@ instead.
|
||||||
|
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil "use-package-lint" "use-package-lint.el" (23094
|
;;;### (autoloads nil "use-package-lint" "use-package-lint.el" (23179
|
||||||
;;;;;; 13913 189016 929000))
|
;;;;;; 13836 372336 197000))
|
||||||
;;; Generated autoloads from use-package-lint.el
|
;;; Generated autoloads from use-package-lint.el
|
||||||
|
|
||||||
(autoload 'use-package-lint "use-package-lint" "\
|
(autoload 'use-package-lint "use-package-lint" "\
|
||||||
|
@ -197,7 +197,7 @@ with the specified `:load-path' the module cannot be found.
|
||||||
;;;***
|
;;;***
|
||||||
|
|
||||||
;;;### (autoloads nil nil ("use-package-pkg.el" "use-package.el")
|
;;;### (autoloads nil nil ("use-package-pkg.el" "use-package.el")
|
||||||
;;;;;; (23094 13913 209017 32000))
|
;;;;;; (23179 13836 392336 304000))
|
||||||
|
|
||||||
;;;***
|
;;;***
|
||||||
|
|
|
@ -112,6 +112,13 @@ otherwise requested."
|
||||||
:type '(repeat symbol)
|
:type '(repeat symbol)
|
||||||
:group 'use-package)
|
:group 'use-package)
|
||||||
|
|
||||||
|
(defcustom use-package-ignore-unknown-keywords nil
|
||||||
|
"If non-nil, issue warning instead of error when unknown
|
||||||
|
keyword is encountered. The unknown keyword and its associated
|
||||||
|
arguments will be ignored in the `use-package' expansion."
|
||||||
|
:type 'boolean
|
||||||
|
:group 'use-package)
|
||||||
|
|
||||||
(defcustom use-package-verbose nil
|
(defcustom use-package-verbose nil
|
||||||
"Whether to report about loading and configuration details.
|
"Whether to report about loading and configuration details.
|
||||||
If you customize this, then you should require the `use-package'
|
If you customize this, then you should require the `use-package'
|
||||||
|
@ -504,7 +511,8 @@ This is in contrast to merely setting it to 0."
|
||||||
"Given a pseudo-plist, normalize it to a regular plist.
|
"Given a pseudo-plist, normalize it to a regular plist.
|
||||||
The normalized key/value pairs from input are added to PLIST,
|
The normalized key/value pairs from input are added to PLIST,
|
||||||
extending any keys already present."
|
extending any keys already present."
|
||||||
(when input
|
(if (null input)
|
||||||
|
plist
|
||||||
(let* ((keyword (car input))
|
(let* ((keyword (car input))
|
||||||
(xs (use-package-split-list #'keywordp (cdr input)))
|
(xs (use-package-split-list #'keywordp (cdr input)))
|
||||||
(args (car xs))
|
(args (car xs))
|
||||||
|
@ -513,7 +521,8 @@ extending any keys already present."
|
||||||
(intern-soft (concat "use-package-normalize/"
|
(intern-soft (concat "use-package-normalize/"
|
||||||
(symbol-name keyword))))
|
(symbol-name keyword))))
|
||||||
(arg (and (functionp normalizer)
|
(arg (and (functionp normalizer)
|
||||||
(funcall normalizer name keyword args))))
|
(funcall normalizer name keyword args)))
|
||||||
|
(error-string (format "Unrecognized keyword: %s" keyword)))
|
||||||
(if (memq keyword use-package-keywords)
|
(if (memq keyword use-package-keywords)
|
||||||
(progn
|
(progn
|
||||||
(setq plist (use-package-normalize-plist
|
(setq plist (use-package-normalize-plist
|
||||||
|
@ -523,7 +532,12 @@ extending any keys already present."
|
||||||
(funcall merge-function keyword arg
|
(funcall merge-function keyword arg
|
||||||
(plist-get plist keyword))
|
(plist-get plist keyword))
|
||||||
arg)))
|
arg)))
|
||||||
(use-package-error (format "Unrecognized keyword: %s" keyword))))))
|
(if use-package-ignore-unknown-keywords
|
||||||
|
(progn
|
||||||
|
(display-warning 'use-package error-string)
|
||||||
|
(use-package-normalize-plist
|
||||||
|
name tail plist merge-function))
|
||||||
|
(use-package-error error-string))))))
|
||||||
|
|
||||||
(defun use-package-unalias-keywords (name args)
|
(defun use-package-unalias-keywords (name args)
|
||||||
(setq args (cl-nsubstitute :if :when args))
|
(setq args (cl-nsubstitute :if :when args))
|
||||||
|
@ -559,6 +573,15 @@ extending any keys already present."
|
||||||
(let* ((name-symbol (if (stringp name) (intern name) name))
|
(let* ((name-symbol (if (stringp name) (intern name) name))
|
||||||
(name-string (symbol-name name-symbol)))
|
(name-string (symbol-name name-symbol)))
|
||||||
|
|
||||||
|
;; The function `elisp--local-variables' inserts this unbound variable into
|
||||||
|
;; macro forms to determine the locally bound variables for
|
||||||
|
;; `elisp-completion-at-point'. It ends up throwing a lot of errors since it
|
||||||
|
;; can occupy the position of a keyword (or look like a second argument to a
|
||||||
|
;; keyword that takes one). Deleting it when it's at the top level should be
|
||||||
|
;; harmless since there should be no locally bound variables to discover
|
||||||
|
;; here anyway.
|
||||||
|
(setq args (delq 'elisp--witness--lisp args))
|
||||||
|
|
||||||
;; Reduce the set of keywords down to its most fundamental expression.
|
;; Reduce the set of keywords down to its most fundamental expression.
|
||||||
(setq args (use-package-unalias-keywords name-symbol args))
|
(setq args (use-package-unalias-keywords name-symbol args))
|
||||||
|
|
||||||
|
@ -972,6 +995,9 @@ meaning:
|
||||||
(float-time (gethash :preface-secs hash 0))
|
(float-time (gethash :preface-secs hash 0))
|
||||||
(float-time (gethash :use-package-secs hash 0))))))
|
(float-time (gethash :use-package-secs hash 0))))))
|
||||||
use-package-statistics)
|
use-package-statistics)
|
||||||
|
(goto-char (point-min))
|
||||||
|
(orgtbl-mode)
|
||||||
|
(org-table-align)
|
||||||
(display-buffer (current-buffer))))
|
(display-buffer (current-buffer))))
|
||||||
|
|
||||||
(defun use-package-statistics-gather (keyword name after)
|
(defun use-package-statistics-gather (keyword name after)
|
||||||
|
@ -1351,7 +1377,7 @@ no keyword implies `:all'."
|
||||||
(spec (nth 1 def)))
|
(spec (nth 1 def)))
|
||||||
(when (or (not face)
|
(when (or (not face)
|
||||||
(not spec)
|
(not spec)
|
||||||
(> (length arg) 2))
|
(> (length def) 2))
|
||||||
(use-package-error error-msg))))))
|
(use-package-error error-msg))))))
|
||||||
|
|
||||||
(defun use-package-handler/:custom-face (name keyword args rest state)
|
(defun use-package-handler/:custom-face (name keyword args rest state)
|
||||||
|
@ -1510,10 +1536,11 @@ this file. Usage:
|
||||||
(condition-case-unless-debug err
|
(condition-case-unless-debug err
|
||||||
(use-package-core name args)
|
(use-package-core name args)
|
||||||
(error
|
(error
|
||||||
(display-warning
|
(ignore
|
||||||
'use-package
|
(display-warning
|
||||||
(format "Failed to parse package %s: %s"
|
'use-package
|
||||||
name (error-message-string err)) :error))))
|
(format "Failed to parse package %s: %s"
|
||||||
|
name (error-message-string err)) :error)))))
|
||||||
(when use-package-compute-statistics
|
(when use-package-compute-statistics
|
||||||
`((use-package-statistics-gather :use-package ',name t)))))))
|
`((use-package-statistics-gather :use-package ',name t)))))))
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
(define-package "use-package" "20171215.2248" "A configuration macro for simplifying your .emacs"
|
(define-package "use-package" "20180206.1414" "A configuration macro for simplifying your .emacs"
|
||||||
'((emacs "24.3")
|
'((emacs "24.3")
|
||||||
(bind-key "2.4"))
|
(bind-key "2.4"))
|
||||||
:url "https://github.com/jwiegley/use-package" :keywords
|
:url "https://github.com/jwiegley/use-package" :keywords
|
Loading…
Reference in New Issue