From c0f349295a0b51d02f2c5787b1042e1c208cd1d4 Mon Sep 17 00:00:00 2001 From: Steve Purcell Date: Wed, 18 Apr 2012 10:40:11 +0100 Subject: [PATCH] Fix references to non-local variables --- package-build.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/package-build.el b/package-build.el index 5b0d1294..8acbe304 100644 --- a/package-build.el +++ b/package-build.el @@ -199,8 +199,8 @@ seconds; the server cuts off after 10 requests in 20 seconds.") (delete-directory dir t nil)) (print "cloning repository") (pb/run-process nil "svn" "checkout" repo dir))) - (let ((files (pb/expand-file-list pkg-cwd - (or (plist-get cfg :files) + (let ((files (pb/expand-file-list dir + (or (plist-get config :files) (list "*.el"))))) (apply 'pb/run-process dir "svn" "info" files)) (while (setq ts (ignore-errors @@ -237,8 +237,8 @@ seconds; the server cuts off after 10 requests in 20 seconds.") (pb/run-process nil "git" "clone" repo dir))) (when commit (pb/run-process dir "git" "checkout" commit)) - (let ((files (pb/expand-file-list pkg-cwd - (or (plist-get cfg :files) + (let ((files (pb/expand-file-list dir + (or (plist-get config :files) (list "*.el"))))) (apply 'pb/run-process dir "git" "log" "-n1" "--pretty=format:'\%ci'" files)) (pb/find-parse-time