Fixed upgrade bug and cleared whitespace.

This commit is contained in:
larstvei 2013-12-24 03:02:44 +01:00
parent f8a5c05fc3
commit 78337bae43
2 changed files with 49 additions and 45 deletions

View File

@ -30,7 +30,9 @@ PACKAGE is installed and the current version is deleted."
(unless (newest-package-installed-p package) (unless (newest-package-installed-p package)
(let ((pkg-desc (assq package package-alist))) (let ((pkg-desc (assq package package-alist)))
(when pkg-desc (when pkg-desc
(package-delete package (package-desc-vers (cdr pkg-desc)))) (package-delete (symbol-name package)
(package-version-join
(package-desc-vers (cdr pkg-desc)))))
(package-install package)))) (package-install package))))
(let ((packages (let ((packages

View File

@ -77,7 +77,9 @@
(unless (newest-package-installed-p package) (unless (newest-package-installed-p package)
(let ((pkg-desc (assq package package-alist))) (let ((pkg-desc (assq package package-alist)))
(when pkg-desc (when pkg-desc
(package-delete package (package-desc-vers (cdr pkg-desc)))) (package-delete (symbol-name package)
(package-version-join
(package-desc-vers (cdr pkg-desc)))))
(package-install package)))) (package-install package))))
#+END_SRC #+END_SRC