emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: missing quote in define-package arg


From: Thien-Thi Nguyen
Subject: Re: missing quote in define-package arg
Date: Sat, 24 May 2014 10:02:53 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3 (gnu/linux)

() Thien-Thi Nguyen <address@hidden>
() Sat, 24 May 2014 09:18:25 +0200

   So there must be some other flow, hmmm.
   What's the real story, here?

Yes, the other flow is in package.el.  Things go smoothly if
‘package--alist-to-plist’ is changed to:

 (defun package--alist-to-plist (alist)
   (mapcar (lambda (x)
             (if (and (not (consp x))
                      (or (keywordp x)
                          (not (symbolp x))
                          (memq x '(nil t))))
                 x `',x))
           (apply #'nconc (mapcar (lambda (pair)
                                    (list (car pair) (cdr pair)))
                                  alist))))

w/ the wrapping ‘(mapcar (lambda (x) ...) ...)’ snarfed from
‘archive--alist-to-plist-args’.  Surprising this has gone so far
unnoticed.  Probably everyone "installs" directly from repo.  :-D

-- 
Thien-Thi Nguyen
   GPG key: 4C807502
   (if you're human and you know it)
      read my lisp: (responsep (questions 'technical)
                               (not (via 'mailing-list)))
                     => nil

Attachment: pgpbCOk51IO_g.pgp
Description: PGP signature


reply via email to

[Prev in Thread] Current Thread [Next in Thread]