]> git.eshelyaron.com Git - emacs.git/commitdiff
Stylistic changes
authorJohn Wiegley <johnw@newartisans.com>
Fri, 13 Mar 2015 08:25:32 +0000 (03:25 -0500)
committerJohn Wiegley <johnw@newartisans.com>
Fri, 13 Mar 2015 08:25:32 +0000 (03:25 -0500)
lisp/use-package/use-package.el

index b619dcf0ce4af21b88c3f1888c8faca2acdfb948..aa80eb0547f5eeabb3eaaa3727141df2fc62cbf1 100644 (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