branch: master commit 6340c15fb07a979b6c7bd2e8913e499091c257ff Merge: cb4b138 e2737d0 Author: Artur Malabarba <bruce.connor...@gmail.com> Commit: Artur Malabarba <bruce.connor...@gmail.com>
Merge commit 'e2737d0adb7f8d8f79c2ca0fee5b13b6f8ae164b' --- packages/names/names.el | 20 ++++++++++++++------ 1 files changed, 14 insertions(+), 6 deletions(-) diff --git a/packages/names/names.el b/packages/names/names.el index 71bd0d1..f0fee8d 100644 --- a/packages/names/names.el +++ b/packages/names/names.el @@ -5,7 +5,7 @@ ;; Author: Artur Malabarba <bruce.connor...@gmail.com> ;; Maintainer: Artur Malabarba <bruce.connor...@gmail.com> ;; URL: http://github.com/Bruce-Connor/names -;; Version: 20150618.0 +;; Version: 20150723.0 ;; Package-Requires: ((emacs "24.1") (cl-lib "0.5")) ;; Keywords: extensions lisp ;; Prefix: names @@ -48,8 +48,9 @@ (setq edebug-inhibit-emacs-lisp-mode-bindings t) ;; And the `C-xX' binds. (defvar global-edebug-prefix) - (when (or (null (boundp 'global-edebug-prefix)) - (eq ?\C-x (elt global-edebug-prefix 0))) + (when (ignore-errors + (or (null (boundp 'global-edebug-prefix)) + (eq ?\C-x (elt global-edebug-prefix 0)))) (setq global-edebug-prefix ""))) (require 'edebug) (require 'bytecomp) @@ -125,7 +126,7 @@ it will set PROP." ;;; --------------------------------------------------------------- ;;; Variables -(defconst names-version "20150618.0" "Version of the names.el package.") +(defconst names-version "20150723.0" "Version of the names.el package.") (defvar names--name nil "Name of the current namespace inside the `define-namespace' macro.") @@ -443,8 +444,15 @@ See `define-namespace' for more information." (push key-and-args names--keywords)) ;; First have to populate the bound and fbound lists. So we read - ;; the entire form (without evaluating it). - (mapc 'names-convert-form body) + ;; the entire form (without return it). + (if names--inside-make-autoload + ;; Dependencies haven't been loaded during autoload + ;; generation, so we better ignore errors here. Ideally we + ;; would only go through the forms marked for autoloading, + ;; but then we wouldn't know what symbols are var/function + ;; names. + (mapc (lambda (form) (ignore-errors (names-convert-form form))) body) + (mapc #'names-convert-form body)) (setq names--current-run (1+ names--current-run)) ;; Then we go back and actually namespace the entire form, which