Fix ELPA symlink creation type mismatch

This commit is contained in:
Kyle Hargraves 2011-10-03 16:13:33 -05:00
parent a54ad73fee
commit 295d6b8f4a

View File

@ -72,8 +72,9 @@ the recipe, then return nil."
(defun el-get-elpa-symlink-package (package)
"ln -s ../elpa/<package> ~/.emacs.d/el-get/<package>"
(let ((elpa-dir (file-relative-name
(el-get-elpa-package-directory package) el-get-dir)))
(let* ((package (el-get-as-string package))
(elpa-dir (file-relative-name
(el-get-elpa-package-directory package) el-get-dir)))
(unless (el-get-package-exists-p package)
;; better style would be to check for (fboundp 'make-symbolic-link) but
;; that would be true on Vista, where by default only administrator is