[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 6340c15 4/4: Merge commit 'e2737d0adb7f8d8f79c2ca0fee5b13b
From: |
Artur Malabarba |
Subject: |
[elpa] master 6340c15 4/4: Merge commit 'e2737d0adb7f8d8f79c2ca0fee5b13b6f8ae164b' |
Date: |
Thu, 23 Jul 2015 13:51:31 +0000 |
branch: master
commit 6340c15fb07a979b6c7bd2e8913e499091c257ff
Merge: cb4b138 e2737d0
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
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 <address@hidden>
;; Maintainer: Artur Malabarba <address@hidden>
;; 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