[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#14639: package-initialize not run
From: |
Juanma Barranquero |
Subject: |
bug#14639: package-initialize not run |
Date: |
Mon, 17 Jun 2013 15:35:37 +0200 |
On Mon, Jun 17, 2013 at 4:34 AM, Juanma Barranquero <lekktu@gmail.com> wrote:
> or modifying package--description-file to return an absolute path.
--- lisp/startup.el 2013-06-15 15:36:11 +0000
+++ lisp/startup.el 2013-06-17 13:34:39 +0000
@@ -423,5 +423,6 @@
(defun package--description-file (dir)
- (concat (let ((subdir (file-name-nondirectory
+ (concat (file-name-as-directory dir)
+ (let ((subdir (file-name-nondirectory
(directory-file-name dir))))
(if (string-match
"\\([^.].*?\\)-\\([0-9]+\\(?:[.][0-9]+\\|\\(?:pre\\|beta\\|alpha\\)[0-9]+\\)*\\)"
subdir)