Fixes https://github.com/jwiegley/use-package/issues/566
(format "package.el %s failed to define keymap %s"
package keymap-symbol)))))
+;;;###autoload
(defun use-package-normalize-binder (name keyword args)
(let ((arg args)
args*)
(tail (cdr xs))
(normalizer (intern (concat "use-package-normalize/"
(symbol-name keyword))))
- (arg (cond ((functionp normalizer)
- (funcall normalizer name keyword args))
- ((= (length args) 1)
- (car args))
- (t
- args))))
+ (arg (and (functionp normalizer)
+ (funcall normalizer name keyword args))))
(if (memq keyword use-package-keywords)
(progn
(setq plist (use-package-normalize-plist