list-packagesが失敗する。

Emacs 24.4.1

Mac Os X 10.9.5

 

list-packagesが失敗する。

 

こんな感じのエラーが出てくる。

package-read-all-archive-contents: Wrong number of arguments: (lambda nil "Re-read `archive-contents' and `builtin-packages', if they exist.
Will set `package-archive-contents' and `package--builtins' if successful.
Will throw an error if the archive version is too new." (let *1 (builtins (package--read-archive-file "builtin-packages"))) (if archive-contents (setq package-archive-contents archive-contents)) (if builtins (let *2 (result package--builtins-base)) (setq package--builtins (let *3 (if (package-version-compare our-version (car elt) (quote >=)) (setq result (append ... result))) (setq --dolist-tail-- (cdr --dolist-tail--))) (setq elt nil) result)))))), 1

 

見にくいがデバッグした結果package.elでエラーが発生しているとわかる。

init.elを確認してみると、いつのまにか下記のコードが追加されていた?(いつ追加されているのか不明)

自分で設定した箇所があるので、下記をコメントアウトしたら正常に動くようになった。

 

;; elpa
;;; This was installed by package-install.el.
;;; This provides support for the package system and
;;; interfacing with ELPA, the package archive.
;;; Move this code earlier if you want to reference
;;; packages in your .emacs.
 (when
     (load
      (expand-file-name "~/.emacs.d/elpa/package.el"))
   (package-initialize))

*1:archive-contents (package--read-archive-file "archive-contents"

*2:our-version (package-version-split emacs-version

*3:--dolist-tail-- builtins) elt) (while --dolist-tail-- (setq elt (car --dolist-tail--