From 63e216f4d2da70f67f6402d1f8b0b63608daebf0 Mon Sep 17 00:00:00 2001 From: "Ryan C. Thompson" Date: Fri, 13 Jan 2012 14:45:10 -0800 Subject: [PATCH 1/2] Add missing paren in docstring No code change --- el-get-custom.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/el-get-custom.el b/el-get-custom.el index 6abbf083..79e45c60 100644 --- a/el-get-custom.el +++ b/el-get-custom.el @@ -77,7 +77,7 @@ definition provided by `el-get' recipes locally. The name of the package. It can be different from the name of the directory where the package is stored (after a `git - clone' for example, in which case a symlink will be created. + clone' for example), in which case a symlink will be created. :depends From 4efbd40d51542d74e1f8f2be4cc7dd50ccda695b Mon Sep 17 00:00:00 2001 From: "Ryan C. Thompson" Date: Fri, 13 Jan 2012 15:05:45 -0800 Subject: [PATCH 2/2] Minor refactor of el-get-start-process-list --- el-get-core.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/el-get-core.el b/el-get-core.el index 34b66459..80f0abe4 100644 --- a/el-get-core.el +++ b/el-get-core.el @@ -290,6 +290,7 @@ Any other property will get put into the process object. (condition-case err (if commands (let* ((c (car commands)) + (next (cdr commands)) (cdir (plist-get c :default-directory)) (cname (plist-get c :command-name)) (cbuf (plist-get c :buffer-name)) @@ -316,8 +317,7 @@ Any other property will get put into the process object. (dummy (message "el-get is waiting for %S to complete" cname)) (status (apply startf program infile cbuf t args)) (message (plist-get c :message)) - (errorm (plist-get c :error)) - (next (cdr commands))) + (errorm (plist-get c :error))) (when el-get-verbose (message "%S" (with-current-buffer cbuf (buffer-string)))) (if (eq 0 status) @@ -338,7 +338,7 @@ Any other property will get put into the process object. (process-put proc :el-get-sources el-get-sources) (process-put proc :el-get-package package) (process-put proc :el-get-final-func final-func) - (process-put proc :el-get-start-process-list (cdr commands)) + (process-put proc :el-get-start-process-list next) (when stdin (process-send-string proc (prin1-to-string stdin)) (process-send-eof proc))