masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-06 04:09:37 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Stylistic changes

Browse source
This commit is contained in:
John Wiegley 2015-03-13 03:25:32 -05:00
parent f8bf1b0986
commit 30da0769bf
1 changed files with 5 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lisp/use-package/use-package.el
View file

@ -135,7 +135,7 @@ Return nil when the queue is empty."
(remhash priority use-package-idle-forms))
first-form))
(defun use-package-idle-eval()
(defun use-package-idle-eval ()
"Start to eval idle-commands from the idle queue."
(let ((next (use-package-idle-pop)))
(if next
@ -366,7 +366,6 @@ For full documentation. please see commentary.
;; force this immediately -- one off cost
(unless (use-package-plist-get args :disabled)
(when archive-name
(use-package-pin-package name archive-name))
@ -380,7 +379,6 @@ For full documentation. please see commentary.
(require 'package)
(use-package-ensure-elpa package-name)))
(if diminish-var
(setq
config-body
@ -406,7 +404,6 @@ For full documentation. please see commentary.
(if (and commands (symbolp commands))
(setq commands (list commands)))
(when idle-body
(when (null idle-priority)
(setq idle-priority 5))
@ -457,26 +454,22 @@ For full documentation. please see commentary.
(funcall init-for-commands-or-keymaps
(lambda (binding)
`(bind-key ,(car binding)
(quote ,(cdr binding))))
`(bind-key ,(car binding) (quote ,(cdr binding))))
keybindings-alist)
(funcall init-for-commands-or-keymaps
(lambda (binding)
`(bind-key* ,(car binding)
(quote ,(cdr binding))))
`(bind-key* ,(car binding) (quote ,(cdr binding))))
overriding-keybindings-alist)
(funcall init-for-commands-or-keymaps
(lambda (mode)
`(add-to-list 'auto-mode-alist
(quote ,mode)))
`(add-to-list 'auto-mode-alist (quote ,mode)))
mode-alist)
(funcall init-for-commands-or-keymaps
(lambda (interpreter)
`(add-to-list 'interpreter-mode-alist
(quote ,interpreter)))
`(add-to-list 'interpreter-mode-alist (quote ,interpreter)))
interpreter-alist))
`(progn